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BUY  A  BANANA.  SAVE  A  BUNCH. 


Meet  the  Banana!"  the  very 
tough,  versatile,  portable,  and 
reliable  dot-matrix  printer  from 
Gorilla^" 

At  $249.95  retail  it's  an  ideal 
and  inexpensive  companion  for 
personal  computers  like  Apple'' 
tor  Apple  "look  alikes"such  as 
Franklin"  or  Albert"),  Ti;- 
Comniodoi-e,"  TRS-8(),-  Kayprof 
Timex,'  Osborne,"  etc. 

Afterthat,  it's  merely  com- 
parable to  other  printers  that  can 
cost  up  to  three  times  as  much: 
10"  carriages  (to  handle  standard 
9''l'"  paper),  80  coliunns,  graphics 
capability',  10  characters  per  inch 
( expandable  to  5  cpi)  draft-quality 
print  (for  perfectly  acceptable 
fomi  letters,  data  processing. 


business  reports,  etc.)  tractor 
feed  (for  precise  alignment  and 
quick  loading),  parallel  or  serial 
interface  (take  your  pick),  self- 
inking  ribbon  cassette  (for  long 
life  and  easy  installation),  10 
portable  pounds  in  weight,  and 
compatibility  with  so  many  of  the 
most  popular  personal  computers 
on  the  market. 

Plus  its  printhead  features  a 
unique  single-hammer  design  that 
eliminates  a  lot  of  moving  parts,  to 
eliminate  a  lot  of  annoying  repairs. 

That's  the  Banana:  silly  name, 
serious  service.  It's  everything 
the  expensive  dot-matrix  printers 
are  . . . 

Except  expensive. 


I.eadiriK  Edge  Products,  Inc.,  225  Turnpike  Street,  Canton,  Massachusetts  02021 
Toll-free:  1-800-343-6833;  In  Massachusetts  (617)  828-81.50.  Telex  951-624. 


FOR  YOUR 


WORDPROCESSING  NEEDS 
INVEST  IN  THE  BEST 
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WORDPRO  PLUS.  IN  A  ClASS  BY  ITSELF. 


When  choosing  a  Word  Processor  for  your  Commodore'"  computer,  there's 
no  reason  to  settle  for  anything  but  the  best  —  in  a  word . . .  WordPro". 

With  over  30,000  happy  clients  churning  out  letters  and  documents  all  over 
the  world,  the  WordPro  Plus"  Series  is  unquestionably  the  #1  selling  soft- 
ware package  on  Commodore  computers!  So  when  you  choose  WordPro, 
you  know  you're  investing  in  a  trial-tested  program  that's  a  real  winner.  And 
WordPro  is  NOW  available  for  your  Commodore  64"  computer— at  prices 
starting  as  low  as  S89.95. 

Designed  for  the  user  who  has  no  computer  or  word  processing  experience 
whatsoever,  WordPro  Plus  brings  a  new  dimension  to  the  term  "user- 
friendly."  fulore  than  just  easy  to  use,  WordPro  will  turn  your  Commodore 
computer  into  a  sophisticated  time  saving  word  processing  tool  —  loaded 
with  the  sanne  inventory  of  features  found  in  systems  costing  much,  much 
more. 

Our  nationwide  learn  of  over  600  Professional  Software/Commodore  com- 
puter dealers  will  help  you  choose  the  WordPro  Plus  system  that  is  best  for 
your  needs.  Our  full-service  dealers  have  been  set  up  to  provide  strong 
customer  support.  In  addition  to  helping  you  choose  the  right  system,  many 
Professional  Software  dealers  also  offer  WordPro  Plus  training  and  system 
installation. 

Professional  Software  offers  a  complete  spectrum  of  WordPro  word  process- 
ing software  for  Commodore  computers  ranging  from  the  Commodore  64  to 
the  more  business  oriented  8000/9000  series  computers.  And  WordPro  4 
Plus  and  5  Plus  a!so  interact  with  our  database  management  systems  includ- 
ing InfoPro  and  The  Administrator.  So  whatever  your  Word  Processing 
needs,  there's  a  WordPro  system  that's  right  for  you. 

WordPro™  and  WordPro  Plus"  are  trademarks  of  Professional  Software  Inc. 
Ttie  WordPro  Plus  Series  was  designed  and  written  by  Steve  Punter  of  Pro  Micro  Software  Ltd. 
Commodore"  and  the  Commodore  64'"  are  trademarks  of  Commodore  Electronics,  Inc. 
Dealer  inquines  invited. 


WordPro  3  FSia/64' 


Invest  in  the  best. . . 

WordPro  Plus.  In  a  class  by  itself. 

Call  us  today  for  the  name  of  the  WordPro  Plus  dealer  nearest  you. 

Professional  Software  Inc. 


51  Fremont  Street 
Needham,  MA  02194 


(617)444-5224 
Telex:  951 579 


SniMAKER^  LME  OF 
EARLY  LEARNING  GAMES 

IS  GROWING 

AS  EAST  AS  YOUR 

CMLDSMIND. 


Watching  your  kids  grow  up  is  a  lot  of  fun.  But 
making  sure  their  minds  grow  as  fast  as  their 
bodies  is  even  more  rewarding.  That's  where  we 
can  help.  With  a  growing  line  of  Early  Learning 
Programs  that  are  not  only  lots  of  fun  to  play  but 
also  educational. 

Some  of  the  games  you  see  on  these  two  pages 
help  exercise  your  child's  creativity  Others  help 
improve  vocabulary  and  spelling  skills.  While  others 


improve  your  child's  writing  and  reading  abilities. 
And  all  of  them  help  your  child  understand  how  to 
use  the  computer. 

So  if  you're  looking  for  computer  programs  that 
do  more  than  just  "babysit"  for  your  kids,  read  on. 
You'll  find  that  our  Early  Learning  Programs  are  not 
only  compatible  with  Apple®  Atari®  IBM®  and 
Commodore  64^"  computers,  but  also  with  kids 
who  like  to  have  fun. 


FRACTION  FEVER™  brings  frac±ions  into  play. 
Ages  7  to  Adult. 

FRACTION  FEVER  is  a  fast- 
paced  arcade  game  that 
challenges  a  child's  under- 
standing of  fi-actions.  As  kids 
race  aaoss  the  screen  in  search 
of  the  assigned  fraction, 
they're  actually  developing  a 
basic  understanding  of  what 
a  fraction  is  and  of  relationships  between  fractions. 
They're  even  discovering  that  the  same  fraction  may  be 
written  in  a  number  of  different  ways. 
All  in  all.  FRACTION  FEVER  encourages  kids  to  learn 
as  much  as  they  can  about  fractions  -just  for  the 
ftjn  of  it! 


Anne.  IBM  ano  A>an'  are  regtstmd  tnUeiTOrtts  of  Appte  ComputEr,  Inc.,  imaratioral 
©  1983.  Spinnaker  Software  Corp  AJI  nghts  reserved. 


aaines  Machines  Corp.  and  Atan.  Inc  respectively.  Oxnmakn  64  is  j  trBdemarti  of  Commodore  Bmrailcs  LimltKl. 


The  story  of  STORY  MACHINE™  Ages  S  to  9. 


STORY  MACHINE  is 

like  a  storybook  come 
to  life.  Using  the  key- 
board, your  children 
write  their  own  fun 
little  stories.  The 
computer  then 
takes  what  they've 
written  and  animates  their 
story  on  the  screen,  com- 


plete with  full  color 
graphics  and  sound. 
STORY  MACHINE 
helps  your  children 
learn  to  write  correctly, 
become  familiar  with 
the  keyboard,  and  lets 
them  have  fun  exercising 
their  creativity  at  the  same  time. 


KINDERC0MP7"  Numbers,  shapes,  letters,  words  and 
drawings  make  fun.  Ages  3  to  8. 


KiNDERCOMPis 
a  game  that  allows 
very  young  children 
to  start  learning  on 
the  computer  It's  a 
collection  of  learning 
exercises  that  ask 
your  children  to  match 
shapes  and  letters,  write  their 
names,  draw  pictures,  or  fill  in 
missing  numbers.  And  KINDER- 
COMP  will  delight  kids  with  color 


ful  rewards,  as  the 
screen  comes  to 
life  when  correct 
answers  are 
given. 

As  a  parent 
you  can  enjoy 
the  fact  that 
your  children  are  having 
fun  while  improving  their 
reading  readiness  and 
counting  skills. 


PACEMAKER™  makes  faces  fiin.  Ages  4  to  12. 


PACEMAKER  lets  chil- 
dren create  their  own 
funny  faces  on  the 
screen.  Once  a  face  is 
completed,  your 
children  will  giggle 
with  delight  as  they 
make  it  do  all  kinds 
of  neat  things:  wink,  smile, 
wiggle  its  ears,  or  whatever 
their  imagination  desires. 


Plus,  PACEMAKER  helps 
children  become  com- 
fortable with  computer 
fundamentals  such  as: 
menus,  cursors,  the 
return  key,  the  space  bar. 
simple  programs,  and 
graphics.  PACEMAKER 
won't  make  parents  frown  because 
their  children  will  have  fun  making 
friends  with  the  computer 


s^nat^e^ 


Dbks  for:  Apple,  Atari,  IBM,  Commodore  64, 
Cartridges  for:  Atari.  Commodore  64 


Wfe  make  learning  fun. 


The  Rammaster"'32  Introduces 
you  to  tt)e  world  of  more  powerful 
computing.  Now  VIC  20^  owners 
hiave  one  of  the  most  advanced 
memory  devices  available.  It's  what 
you'd  expect  from  mosak  meworx. 
This  is  a  full  service  memory  device. 
Not  only  will  the  RammQster'"give 
you  7  times  the  computing  RAM 
power  (as  much  usable  memory  as 
the  Commodore  64  'J  but  also  many 
advanced  features. 

Th  e  expansion  port  allows      ^ 
you  to  use  your  cartridges 
without  unplugging 


EXPANSION  . 
PORT 


GOLD  EDGE. 
CONNECTORS 


the  memory  board,  saving  wear  and 
tear  on  your  computer  It's  much 
more  effective.  With  the  flexibility  the 
Master  Control  switches  give  you, 
you'll  have  no  need  for  a  mother 
board.  The  Write  Protect  switch 
protects  your  programs'  subroutines 
and  data  from  accidental 
interference  from  basic  language 
and  the  automatic  erase  built  into 
some  cartridges.  There's  a  pause 
switch  built  In  to  stop  in  the  middle  of 
a  program,  plus  an  external  port  is 

built  in  for  a  convenient 
^    .   optional  cable  pause/reset 
switch.  You  even  have  a 
switch  to  overlay  a  3K 
b.        blocl<ofRAMfor 


^  MASTER 
CONTROL 
SWITCHES 


expansion  to  4QK.  The  Master  Control 
gives  you  complete  control  over  the 
configuration  of  your  VIC  20-^ 
ti/lemory  Map  so  it  will  never  become 
obsolete. 

The  Rammaster'"  32  is  completely 
compatible  with  ail  the  VIC  20 ' 
products  and  programs,  and  will  be 
the  most  useful  peripheral  you'll  buy 
for  your  VIC  20"^  computer.  With 
MOSAK  MCMOftr  expand  your 
experience  into  more  powerful 
computing. 

$129.95 

32KRAM 

Built-in  expansion  port 

Pause  switch 

Write  protect 

\Master  con  irol  for  super  flexible 

'memory 

Cartridge  dissabler 
Blow  cost 

Gold  edge  connectors 

Picture  guided  instructions 
_  Compatible  with  VIC  20 '  software 

and  cartridges 

And  more  features 

Call  your  nearest  MOSAK  MEMOftX  cfeotec 
1-800-547.2807(653-7885  In  Oregon}. 


'    This  is  a  lower  CO 

Rammaster  32™.  It's  a  full  sen/ice  memory  device  just  lii<e 

the  Rammaster  32'"  With  16K  less  RAM.  Expand  up  to  37K 

using  the  Mosaic  Memory  Standard  16  cartridge  or  other 

VIC  20 16KRAM  cartridge.  That  will  give  you37KRAM 

usable  for  programming  or  cassette/disk  based  programs 

and  21 K  for  cartridge  based  programs. 


designed  to  give  you  a  low  cost 
way  to  expand  with  Mosaic  Memory.  This  has  no 
expansion  port  and  limited  memory  flexibility.  Use  it  with  the 
RAMMASTER  16'"  to  expand  to  37K  The  Standard  16  offers 
Mosaic  Memory's  exceptional  reliability  and  performance 
at  a  very  low  cost. 


ELECTRONICS.  INC.  \ 

■  ■  P.O.  Box  708  •  Oregon  City.  Oregon  97045  \ 
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EDITORS  NOTES 


Our  thanks  to  those  of  you 
who  recently  participated 
in  our  subscriber  survey.  Initial 
results  are  being  reported  now, 
and  we'll  share  some  of  those 
with  you.  One  of  the  number  sets 
of  most  interest  to  me  was  spouse 
readership.  This  industry  has 
quite  typically  been  reflected  in 
readership  studies  as  a  predomi- 
nantly male  audience.  While  this 
is  accurate,  we  have  maintained 
that,  as  a  "family"  oriented  maga- 
zine, we  have  a  high  degree  of 
family/spouse  participation  in 
computing  and  compute;.  We  sus- 
pected that,  in  addition  to  the 
seven  or  eight  percent  female 
readership  that  would  show  up  in 
response  to  a  normal  question, 
analysis  of  family  utilization 
would  show  far  more  general 
involvement.  We're  pleased  to 
report  that  this  is,  in  fact,  the  case. 
In  COMPUTE!  families,  we  dis- 
covered that  29  percent  of 
spouses  regularly  read  compute!. 
Further  evidence  that  our  in- 
dustry is  turning  into  a  truly 
broad-based  consumer  com- 
puting marketplace. 

Here  are  some  of  the  other  results 
of  the  survey  that  we  think  youll 
find  of  interest: 
Aee  % 


How  do  you  use  your  personal 
computer?  (Check  all  that  apply) 

You       Spouse  Children 


85.6% 

61.6% 

75.4% 

Recreation  and 
Games 

42.2 

22.7 

3.6 

Education  for 
Adults 

16.0 

8.5 

59.7 

Education  for 
Children 

60.6 

22.3 

1.5 

Personal 
Business 

60.8 

24.7 

5.4 

Other  Home 
Applications 

27.4 

7.4 

0.5 

Company 
Business 

under  28 

25.7 

29-35 

26.9 

36^3 

26.6 

over  44 

20.8 

And  finally,  97.5  percent  of  you 
own  one  or  more  personal  com- 
puters. Our  survey  showed  the 
true  depth  and  breadth  of  our 
readership.  For  example,  note  the 
variety  of  uses  in  the  chart.  It's 
obvious  that  home  computing  is 
far  more  than  simply  playing 
games. 

Random  Bits: 

Given  the  recent  acceleration  of 
rumors,  well  be  quite  surprised  if 
IBM  hasn't  announced  their  new 
home  computer  by  the  time 
you're  reading  this  ....  While 
avoiding  the  various  issues  of 
rights/wrongs,  Kathy  Yakal's  ar- 
ticle on  nonviolent  gaming  in  this 
issue  presents  a  variety  of  inter- 
esting thoughts  on  the  subject  of 
violence  and  nonviolence  in 
gaming.  It's  a  good  article  and 
shows  a  bit  of  the  depth  of 
thought  that  people  in  our  indus- 
try are  putting  into  one  aspect  of 


our  collective  future.  As  always, 
we're  interested  in  your  feedback 
on  the  topic. 

Next  month,  among  other  things, 
we'll  have  an  article  sharing  in 
more  detail  the  results  of  the  sub- 
scriber survey. 


Robert  Lock,  Editor  In  Chief 


Important  Notice 

We  anticipate  that  by  early 
spring  we  may  begin  to  make 
our  subscriber  list  available  to 
carefully  selected  marketeers.  If 
you  wish  to  have  your  name 
withheld  from  any  non- 
COMPUTE!  mailings  by  vendors, 
please  send  a  note,  with  your 
mailing  label  attached,  to: 

COMPUTE!  Customer  Service 
P.O.  Box  5406 
Greensboro,  NC  27403 
Attn:  Mailing  List 

Please  remember  to  indicate  in 
your  note  that  you  do  not  wish 
your  name  included  in  any 
non-coMPUTE!  mailings.  We  will 
be  happy  to  keep  your  name 
off  the  list,  and  will  continue  to 
respect  your  privacy. 


6    OOMPUrt!    October  1933 
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29.95 


Feel  like  a  devil  today?  Better  adjust  your  halo.  Start  the 
ignition.  It's  up  to  you  to  decide.. .  Okay,  hit  the 
accelerator.  You  can  be  the  ultimate  speed  demon  or  put 
wings  on  your  wheels!  There's  a  pedestrian  now... will 
you  go  for  speed,  no  matter  what  pedestrians  are  in  the 
way  (for  the  devilish  points)—  or  be  an  angel  in  a 
challenging  obstacle  course?  The  heavenly  points  may  get 
you  to  heaven,  but  the  devilish  points  may  get  you 
to... well,  better  make  your  decision—  the  time  clock  is 
running! 


29.95 


So  your  svyeet  tooth  has  gotten  out  of  hand  ageun?  Well, 
this  time  the  sheriff  is  after  you  and  he's  no  sweetheart. 
There  he  is  now!  Quick!  Grab  all  the  candy  in  sight  and 
dive  for  the  doorway!  Don't  look  now,  the  doors  are 
rotating... better  be  good  at  getting  out  of  sticky 
situations,  'cause  if  you  hit  the  wall  you're  stuck  with  it! 
There's  plenty  of  candy  here  and  many  more  levels  to 
cross,  so  get  on  the  move,  sugar!   „ 

Aimllahle  at  finer  Software 
Stores  everywhere. 

OR  CALL  (213)  501-5845  FOR  THE  NAME  OF  YOUR 
LOCAL  DEALER  OR  DISTRBUTOR.        


-y^Oi-'-^^l 


10902  Riverside  Drive  /  North  Hollywood,  California  91602.  (213)  501-5845 
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WordPro  3  Plus/64' 

The  Best  Word  Processor  for  your  Commodore  64™ 


When  choosing  a  Word  Processor  for  your  Commoaore  64  com- 
puter, there's  no  reason  to  settle  for  anything  but  the  best— in  a 
word. ..  .WordPro™. 

With  over  30,000  happy  WordPro  clients  churning  out  letters  and 
documents  all  over  the  world,  the  WordPro  Plus''"'^  Series  is  un- 
questionably the  #1  selling  software  package  on  Commodore 
computers!  So  when  you  choose  WordPro,  you  know  you're  in- 
vesting in  a  trial-tested  program  that's  a  real  winner.  And  Word- 
Pro 3  Plus/64  is  NOW  available  for  your  Commodore  64  com- 
puter at  prices  as  low  as  $89.95. 

Designed  for  the  novice  user  with  no  computer  or  word  process- 
ing experience  whatsoever,  WordPro  3  Plus/64  brings  a  whole 
new  dimension  to  the  term  "user-friendly."  lyiore  than  just  easy 
to  use,  WordPro  3  Plus/64  is  a  commercial  level  word  processor 
loaded  with  powerful  features  including:  Auto  Page  Numbering, 


Headers  and  Footers,  Math  Functions,  Global  Search  and 
Replace,  the  Ability  to  Create  (Multiple  Personalized  Letters  and 
Documents,  Underlining,  Boldface,  Super  and  Subscripts  and 
much,  much,  more. 

Best  of  all,  WordPro  3  Plus/64's  powerful  arsenal  of  features  can 
be  put  to  use  almost  immediately— by  even  the  novice  user.  So 
whether  you're  a  writer,  in  business,  education,  or  just  a  hob- 
byist, you'll  quickly  become  a  WordPro  Pro! 

Invest  in  the  best. .  .WordPro  Pius.  In  a  class  by  itself. 

Call  us  today  for  the  name  of  the  WordPro  3  Plus/64  dealer  naarest  you. 

Professional  Software  Inc. 


51  Fremont  Street 
Needham,  MA  02194 


(617)444-5224 
Telex:  951579 


WordPro  3  PIus/64'''m  \s  a  trademark  of  Professional  Software  Inc. 

The  WordPro  Plus  Series  was  designed  and  written  by  Steve  Punter  of  Pro-f(/1icro  Software  Ltd. 

Some  printers  may  not  support  certain  WordPro  3  Pius/64  functions  and/or  require  an  interface.  Please  check  with  your  dealer. 

Commodore  64''''^  is  a  trademark  of  Commodore  Electronics  Ltd. 

Dealer  and  Distributor  inquiries  are  invited. 


READERS'  FEEDRACK 


The  Editors  and  Readers  of  COMPUTEi 


Using  An  Electric  Typewriter  As  A 
Printer 

After  reading  an  article  in  the  June  COMPUTE!,  "How 
to  Buy  the  Right  Printer,"  several  readers  were  in- 
trigued by  the  possibility  of  using  an  electric  typewriter 
as  a  printer  for  their  computer.  Altliough  xve  cautioned 
that  mi  electric  typeivritcr  may  not  be  fast  or  durable 
enough  to  tolerate  continuous  typing,  there  are  several 
interfaces  on  the  market  which  let  you  connect  your 
computer  to  an  electric  typezoriter. 

Some  modern  daisywheel  typewriters  have  an  RS- 
232  serial  port,  so  (assuming  your  computer  can  talk  to 
RS-232  devices)  if  you  have  the  proper  cable  and  software 
you  can  attach  your  computer  directly.  Other  companies 
manufacture  overlays  that  "press"  the  keys  for  you,  or 
have  you  open  up  the  typewriter  to  install  solenoids 
which  activate  levers  inside  the  typewriter.  Still  another 
company  claims  to  have  a  device  that  converts  "computer 
language"  to  "typewriter  language,"  but  only  for  cer- 
tain models.  With  the  price  of  even  letter-quality  printers 
dropping  below  $400,  hoxveiier,  you  loill  have  to  consider 
tvhether  or  not  you  want  to  risk  modification  of  your 
typewriter  which  could  void  its  warranty  or  service 
contract. 


Storing  Scriptor  And  Video  80 
On  Ttie  Atari 

In  your  April  issue,  you  published  two  interesting 
Atari  programs,  "Scriptor"  and  "Video  80."  Here 
are  a  few  questions.  How  many  pages  can  you 
store  in  a  48K  Atari  400  when  using  Scriptor  with 
8K  BASIC?  What  is  the  memory  required  for  Video 
80?  Can  Scriptor  and  Video  80  be  merged,  and,  if 
so,  what  changes  would  have  to  be  made? 


In  our  July  1983  Issue,  we  inadvertently  used 
the  name  "Castle  Quest."  The  publication  of 
this  article  is  in  no  way  intended  to  cause 
confusion  with  the  commercially  available 
product  called  "Castle  Quest"  by  Michael  S. 
Holtzman  and  Timothy  Baldwin.  In  the 
future,  we  will  refer  to  it  as  "Castle  Search." 


On  another  subject,  how  would  I  "hook  up" 
an  Epson  MX-80  series  printer  to  my  48K  Atari 
400  with  or  without  the  Atari  850  interface? 

Ed  Hallinan 

Scriptor  adapts  itself  to  either  24K,  32K,  or48K  and 
will  display  the  number  of  lines  free  when  you  first  run 
it.  Each  line  is  38  characters.  Since  a  printed  page 
(double-spaced)  takes  about  30  75-column  lines,  just 
divide  the  "lines  free"  by  15  for  a  rough  estimate. 

Video  80  requires  about  2Kfor  the  driver  routine 
and  another  SKfor  the  high-resolution  GRAPHICS  8 
screen.  Due  to  this,  there  is  not  enough  memory  left 
over  in  a  40K  or  48K  to  let  you  store  the  programs  and 
text. 

You  can  attach  almost  any  Centronics  parallel  or 
RS-232C  serial  printer  to  the  Atari  via  the  Atari  850 
Interface  Device.  The  new  AtariW25  80-column  printer 
does  not  require  the  850,  however. 


Fine  Tuning  Ttie  VIC's  Audio  And  Video 

For  those  who  might  be  having  trouble  with 
the  picture  and  sound  on  their  VIC-20,  I  have  a 
solution. 

It  is  essential  that  the  sound  and  picture  be 
adjusted  properly  in  the  RF  modulator  so  that 
they  are  synchronized  on  either  Channel  3  or  4. 
The  computer  is  sold  with  the  audio  and  video 
signals  adjusted  for  one  particular  TV  model. 
This  may  not  work  well  on  yours. 

To  make  adjustments  for  your  TV,  carefully 
follow  these  steps: 

1.  Turn  the  computer  off  and  the  TV  on. 

2.  Turn  off  the  AFT  (Automatic  Fine  Tuning) 
switch  on  the  TV  (if  your  set  has  one). 

3.  Adjust  the  fine  tuning  knob  on  the  TV  to 
the  middle  range  of  that  channel.  Don't  worry  if 
the  picture  is  partly  fading  or  the  sound  is  distorted 
at  this  point. 

4.  Open  the  RF  modulator  very  slowly  and 
carefully.  Be  sure  your  pozoer  is  off.  Remove  the 
casing  screw  and  slowly  lift  the  cover. 

5.  Turn  on  your  power  for  the  computer. 

6.  There  are  two  holes  which  have  screws  in 
the  metal  casing.  The  one  closest  to  the  channel 
selector  switch  is  the  video  signal.  The  other  is  for 
audio  (see  figure).  Using  only  a  small  nonmetallic 
screwdriver,  adjust  the  video  signal  until  the  TV 
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The  Commodore  64"  is  one 
of  the  most  exciting  home  com- 
puters in  memory. 

But  memory  isn't  the  only 
thing  that's  exciting  about  the  64. 

Because  Tronix  is  here. 
Class  act. 
The  people  who  have  been 
bringing  out  the  best  in  the 
VIC  20™  (and  Atarif  too)  have 
graduated  to  the  Commodore  64. 

Which  means  that  now  you 
can  enjoy  fast  action,  complex 
strategies,  interesting  characters, 
superior  sound  effects  and  chal- 
lenging, play  patterns. 

Just  like  VIC  20  and  Atari 
owners.  Only  faster,  more  com- 
plex, and  more  challenging,  too. 

More  memorable,  in  other  words 
In  a  class  by  ourselves. 
Of  course,  if  you'd  rather  not 
take  our  word  for  it,  you  don't 
have  to,  The  experts  at  Electronic 
Games  have  called  K\6  Grid  for 
Atari  "one  of  the  most  compul- 
sive, utterly  addictive  contests  in 
the  world  of  computer  gaming." 

They  haven't  seen  any- 
thing yet. 


kinetic  android,  leads 
a  frustrating  life. 

All  he  wants  to  do  is  build  his 
circuit  boards  and  go  with  the 
flow.  But  things  keep  getting  in 
the  way. 

Nohms  — a  negative  influence 
—  bug  him  constantly.  Flash,  the 
lightning  dolt,  disconnects  every- 
thing in  his  path. 

And  the  cunning  Killerwatt  is 
out  to  fry  poor  Edison's  brains. 

You'll  get  a  charge  out  of  this 
one.  And  a  few  jolts,  too! 

(Suggested  retail  $34.95) 
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Connecting  the 
dots  on  our  colorful 
grid  stiould  be  easy,  right? 

Wrong,  Because  the  bullies 
are  in  hot  pursuit! 

Squashface.Thuggy,  Muggy 
and  Moose  are  their  names. 
And  you  are  their  game.  And 
what's  more,  they're  faster  than 
you  are. 

But  you're  smarter.  And  you 
control  the  stun  button. 

So  keep  your  eyes  peeled  for 
the  mysterious  question  mark 
and  don't  slow-down  at  corners! 

(Suggested  retail:  S34.95) 


risked  their  irves 
to  find  the  enemy's  secret 
headquarters. 

Now  you're  risking  yours  to 
destroy  it. 

And  they  know  you're  coming. 

As  you  fly  over  water  and 
across  hundreds  of  miles  of 
unfriendly  territory,  the  action  is 
thick,  fast  and  three-dimensional. 

Fighter  aircraft.  Surface-to-air 
missiles.  Helicopter  gunships,The 
attacks  come  from  every  direction. 

Even  from  behind. 


i 


(Suggested  retail:  $34.S5j 
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picture  is  crisp  and  sharp.  This  acts  like  another 
fine  tuning  knob.  Check  the  other  channel  and 
make  sure  it  is  in  the  middle  of  the  RF  signal  range 
by  adjusting  the  fine  tuning  knob  on  your  TV. 

7.  Adjust  your  TV  volume  to  about  one-half. 
Now  adjust  the  audio  signal  level  in  the  RF 
modulator  until  a  quiet,  clear  sound  is  heard  on 
the  TV. 

8.  Make  sure  that,  on  the  other  channel,  both 
audio  and  video  signals  are  perfectly  adjusted. 

9.  Turn  the  computer  off  and  replace  the  cover 
on  the  RF  modulator. 

RF  Modulator 


Jack  Connected  To  TV  [ 


Mark  Kormendy 

We  tried  your  suggestions  and  they  work  very  well 
indeed.  However,  we  do  not  advocate  hardumre  modifi- 
cations except  token  performed  by  qualified,  experiejiced 
technicians.  Readers  should  be  extremely  carefid  when 
making  internal  adjustments  on  any  electrical  compo- 
nent. Also,  tampering  with  the  RF  modulator  will  void 
your  warranty.  (Later  versions  of  the  VIC  RF  modulator 
may  not  have  the  adjustment  screws.) 

We  tested  this  also  on  the  internal  RF  modulator 
in  the  64  but  found  no  appreciable  difference  in  screen 
or  audio  quality.  If  we  hear  of  anything  significant  on 
this,  we'll  publish  it  in  a  future  issue. 


TRS-80  Equipment  Needed 

I  represent  a  nonprofit,  charitable  organization 
which  uses  TRS-80  Model  I  equipment  in  virtually 
every  aspect  of  its  affairs.  We  would  be  grateful  if 
your  readers  would  consider  contributing  addi- 
tional Model  1  equipment:  keyboards,  expansion 
interfaces,  drives,  and  printers  would  be  welcome. 
AH  contributions  would  be  fully  tax-deductible, 
since  we  hold  "public  charity"  status  with  the  IRS. 

If  you  are  in  a  position  to  make  such  a  con- 
tribution or  would  like  more  information,  please 
drop  me  a  note  or  call  me  (collect,  if  you  like)  at 
(617)495-9020. 

Dr.  Robert  Epstein 

Cambridge  Center  for  Beliavioral  Studies 

II  Ware  Street 
Cambridge,  MA  02138 

PET  To  VIC  Or  64  Transfers 

In  connection  with  your  article  on  merges  in  the 
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June  1982  issue  of  COMPUTE!,  I  stumbled  onto 
something  which  1  have  never  seen  reported, 
although  something  so  simple  must  have  been 
noticed  by  someone  else.  I  tried  loading  programs 
recorded  on  a  cassette  on  my  PET  (Original  ROM 
from  1977)  into  my  new  Commodore  64.  1  found 
that  the  program  appeared  to  load  and  would 
apparently  list  OK.  However,  it  would  not  RUN, 
and  one  could  not  list  individual  lines  or  groups 
of  lines.  Also,  on  closer  examination  of  the  listing, 
I  found  that  the  first  line  of  the  original  program 
was  missing,  and  in  its  place  was  a  4  or  5  digit 
number. 

I  found  by  experimenting  that  I  could  convert 
the  program  as  loaded  into  a  normal  program  by 
a  very  simple  procedure.  I  started  a  LIST,  but 
stopped  it  (with  the  STOP  key)  while  the  tirst  line 
was  still  on  the  screen.  I  then  positioned  the  cursor 
first  over  the  number  which  had  replaced  the  first 
program  line,  then  executed  a  RETURN,  and  then 
a  second  RETURN  when  the  cursor  was  over  the 
second  line  (which  now  appeared  to  be  the  first). 
After  that,  the  program  could  be  edited  and  RUN 
normally  (after  replacing  the  first  line,  if  neces- 
sary). I  have  now  used  this  procedure  to  transfer 
a  number  of  programs  from  my  1977  PET  to  the 
64,  but  put  a  line  like: 

10  REM  JUNK  LINE 

at  the  beginning  of  each  program  before  recording 
it  on  the  PET.  You  and  others  are  probably  familiar 
with  this,  but  I  have  not  seen  it  anywhere,  it  is  a 
very  simple  way  to  transfer  programs  from  one 
system  to  the  other.  I  presume  this  would  also 
work  on  the  VIC-20,  and  I  intend  to  try  this  as  1 
also  do  some  programming  on  a  VlC-20  at  a  school 
for  handicapped  children. 

Myron  T.  Kelley 
fim  Butterfield  replies: 

Your  letter  draws  attention  to  something  that  is  not 
well  known.  The  very  first  Conunodore  computers  -  the 
"Original  ROM"  PETs  -  saved  programs  in  a  slightly 
different  way  from  all  subsequent  Cotnmodore 
machines. 

It  worked  this  way:  just  before  the  beginning  of 
your  BASIC  program  there  is  always  a  value  of  zero  in 
memory.  This  is  still  true,  even  in  VlCsand  Commodore 
64s.  But  the  first  model  of  PET  saved  programs  in- 
cluding the  zero.  All  subsequent  Commodore  machines 
saved  only  the  program  -  not  the  zero. 

This  meant  that  early  PETs  saved  programs  with  a 
Load  address  of  1024;  and  that  all  subsequent  PET/ 
CBMs  saved  with  a  Load  address  of  1025.  On  the  PET/ 
CBM  computers,  this  made  little  difference:  programs 
did  not  relocate,  and  were  loaded  back  to  the  right  place. 
With  the  arrival  of  the  VIC  and  the  Commodore  64, 
however,  programs  became  relocatable;  and  these  neiv 
machines  did  not  expect  the  extra  zero.  Result:  a  con- 
fused first  line. 


THE  BEST  REASON  FOR  HAVING  A  HOME  COMPUTER. 


Your  children.  That's  why  we  created 
the  Early  Games  series  for  them.  We're 
educators  as  well  as  computer  special- 
ists. We  create  games  that  teach 
children  important  skills. 

There  are  five  programs  in  the  Early 
Games  series.  Early  Games  for  Young 
Children  is  a  set  of  nine  entertaining 
activities  for  children  2V2  to  5.  They 
can  work  with  numbers  and  letters  and 
create  colorful  pictures.  Matchmaker 
uses  shapes,  sizes,  directions  and 
colors  to  help  children  develop  reading 


readiness  skills.  Children  ages  5  to 
12  can  learn  to  play  melodies  with  Early 
Games  Music  Our  Piece  of  Cake  turns 
math  problems  into,  well,  a  piece  of 
cake.  And  Fraction  Factory  takes  the 
work  out  of  fractions. 

Early  Games  feature  multiple 
activities,  easy  to  use  picture  menus, 
and  colorful  graphics.  The  games 
are  fun,  children  love  to  play  them!  Thafs 
why  they  learn  from  them. 

And  they're  the  best  reason  for  having 
a  home  computer. 


counterpoint  software  inc. 


The  easiest  way  to  fix  up  this  problem  is  to  LOAD 
them  to  any  newer  PET/CBM  and  then  SAVE  them 
once  again.  The  zero  zvill  be  dropped  and  everything 
will  become  compatible. 


Timex/Sinclair  Compatibility  Problem 

I  own  a  Sinclair  ZX81  computer  and  a  Memopak 
32K  RAM.  I  recently  purchased  a  Timex/Sinclair 
2040  printer,  and  I  am  unable  to  get  the  com- 
puter to  work  with  the  Memopak  and  the  printer 
attached. 

The  Memopak  works  fine  with  the  computer 
alone  or  with  the  Sinclair  16K  RAM,  and  the 
printer  works  with  the  computer  and  with  the 
Sinclair  16K  RAM.  However,  the  computer  will 
not  display  its  cursor  when  the  Memopak  32K 
RAM  and  printer  are  both  attached. 

Can  you  tell  me  what's  wrong? 

Paul  R.  Harrison 

The  TimexiSinclair  2040  printer  is  not  compatible  with 
Memopak  for  some  utibwwn  reason.  Memotech,  man- 
ufacturer of  Memopak,  is  investigating.  Contact  them 
directly  for  further  information.  As  you  have  noted,  the 
Memopak  works  venj  well  with  the  ZX82  -and  with 
the  proper  interface,  works  well  with  a  wide  range  of 
printers. 


Apple  Programs  For  Commodore 

I  would  like  to  know  if  Apple  programs  can  be 
loaded  into  the  Commodore  64  from  disk  or  tape 
and  vice  versa? 

Anthony  Tutter 

We  have  published  two  articles  on  loading  Apple  pro- 
gram tapes  into  the  PET  and  vice  versa.  The  same  pro- 
cedures which  work  on  the  PET  should  also  work  on  the 
Commodore  64.  These  articles  are  "Feed  Your  PET 
Some  Applesoft"  in  COMPUTEI's  First  Book  of  PET/ 
CBM  and  "Load  Commodore  BASIC  Program  Tapes 
Into  The  Apple  IT'  in  COMPUTE!  (April  1983). 

Some  commercial  software  is  available  for  loading 
64  programs  from  disk  into  the  Apple  arid  vice  versa. 


PET  Monitor  Printout 

I  am  an  avid  user  of  the  PET  machine  language 
monitor,  but  I  have  never  found  a  way  to  direct  a 
hexadecimal  dump  to  a  printer.  Is  it  possible  to 
do  so  or  am  I  wasting  my  time?  Please  help! 

Michael  Silano 

For  4.0  BASIC  PETs,  you  can  print  the  output  by  typing 
X  to  exit  to  BASIC,  then  type: 

OPEN  4,4:  CMD  4:  SYS  54386 

then  type  the  monitor  command  M.  For  example,  if  you 
wanted  a  printout  of  the  hex  numbers  between  0400 
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and  0420,  you  ivould  type: 

.M  0400  0420 

For  Upgrade  PETs,  you  can  use  the  above,  but 
just  SYS  to  4  (the  way  you'd  ordinarily  enter  the 
monitor). 

However,  the  easiest  way  to  control  the  printer 
(and  many  other  aspects  of  machine  language  pro- 
gramming on  the  PET)  is  a  "monitor  extension"  pro- 
gram, "Micromon,"  published  in  COMPUTE!  (January 
1982).  It's  an  excellent  tool  for  machine  language  pro- 
gramming. It's  available  for  $3  from  COMPUTEl's  Back 
Issues  Department. 


Conserving  Your  Computer's  Power 

I  have  a  VlC-20,  and  1  want  to  know  which  is  better 
for  the  computer  -  to  leave  it  on  constantly  or 
shut  it  off  when  you  are  done  using  it? 

Bob  Weber 

This  is  debatable.  Some  would  say  that  the  initial  power 
surge  when  turning  on  a  computer  is  actually  more 
damaging  to  the  electronic  components  than  leaving  it 
on  continuously .  On  the  other  hand,  most  electronic 
parts  have  a  definite  life  span,  and  leaving  the  computer 
on  24  hours  a  day  could  shorten  the  overall  useful  life  of 
the  cojjtputer. 

Commodore  has  recently  changed  the  power 
supplies  of  both  the  VICIO  and  the  Commodore  64. 
Some  of  the  new  power  supplies  (especially  those  with 
the  64)  seem  to  run  someivhat  hotter  than  previous 
production  models.  This  tips  the  balance,  at  least  in  the 
case  of  these  machines,  so  we  recommend  that  you  turn 
off  a  VIC  or  64  and  even  unplug  the  power  supply  after 
each  use. 

A  New  Atari  Graphics  Mode? 

I  have  been  programming  with  my  Atari  400  for 
almost  a  year  now  and  have  had  a  lot  of  fun  with 
it.  And  recently,  1  have  noticed  advertisements  in 
magazines  about  programs  written  in  graphics 
mode  7.5.  Is  this  a  new  graphics  mode?  If  so,  what 
does  it  and  the  other  ".5"  modes  have  over  the 
others  or  GTIA? 

David  Brundage 

There  are  no  ".5"  modes.  GRAPHICS  7  is  a  4-color 
mode  with  a  horizontal  resolution  of  160  and  a  vertical 
resolution  of  96.  GRAPHICS  8  is  the  high-resolution, 
oiu'-color  (except  through  artifacting)  mode  with  a  res- 
olution of320h  X  192v. 

Built  into  the  ANTIC  chip  is  another  mode  that  is 
not  supported  by  the  400/800  operating  system.  It  is  a 
four-color  mode  with  a  resolution  ofl59h  x  192v,  the 
same  iKrtical  resolution  as  GRAPHICS  8.  Since  it  is 
"halfioay"  between  modes  7  and  8,  it  has  been  called 
GRAPHICS  IVj  or  GRAPHICS  7.5.  You  can  turn  a 
GRAPHICS  8  screen  into  this  neiv  mode  by  replacing 


Have  \bu  Read  The  Reviews 
On  Our  New  AtariWritef  ? 
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Atari's  New 
Word  Processor. 

Tr^'  it,  be  jOLir  own  critic.  Use  new 
AtariWriter  for  all  your  family 
conesponcience,  school  papers,  commit- 
tee reports,  mailings 


One  special  feature:  you  can  coirect  as  you 
wiite,  instantly,  without  s^\^tching  back  and 
fordi  between  Create  and  Edit  modes. 
You  can  move  entire  paragi^iphs. 
Search  and  replace.  Even  restore  text  you've 
just  deleted,  with  our  memoiy  buffer. 
You  can  change  format  instantly,  and 
view  on-screen  at  full  printer  widtli. 
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Our  advanced  ROM-based  cartridge    Print  extra  copies  for  your  records. 


technology  means  you  can  use  it  on  any 
ATARI  Home  Computer  (even  16 K).  It 
also  lets  you  choose  between  cassette  and 
disk  storage  systems. 

Easy  to  learn  and  to  use.  '"fet,"  sa^ 
ANALOG  Magazine, '  'as  your  uses  for 
word  processing  grow,  (you'll  employ)  its 
more  advancecffeatures.' ' 
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Menu  driven,  with  helpful  prompts 

ATARI  HOME  COMPUTERS 

%^A  Warner  Communications  Company.  ©  ma  Aian.  j 


As  ANTIC  Magazine  concluded, 
new  Atari  Writer  is  "clearly 
superior  on  price  and 
performance  to 
Text  Wizard 
and  the 
ATARI  Word 
Processor." 
At  Atari  dealers 
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Inc.  AH  rights  reserved. 


all  the  15's  and  79's  in  the  display  list  with  14'$  and 
78's.  (The  hexadeciiital  code  for  the  number  14,  which 
is  this  mode's  ANTIC  number,  is  E,  so  GRAPHICS 
JVz  is  sometimes  called  GRAPHICS  E.)  This  will  do 
the  trick: 


10 


2  0 


30 


GRAPHICS  S+16:DLIST  =  PEEK(560:'+25S 

*PEEK (561 ) +4 

FDR  I=^-lTO2-g0:  A  =  PEEK  (  DLIST+  I  )  :  IF 

fi=15  OR  A=79  THEN  POKE  DLIST+I.A- 

1 

NEXT  I: POKE  8  7,7 

If  you  want  a  text  -window,  just  remove  the  "+16" 
from  line  10.  The  POKE  on  line  30  fools  the  operating 
system  into  thinking  that  you  are  in  GRAPHICS  7. 
This  lets  you  use  only  the  top  half  of  the  screen  with 
BASIC  PLOTS  and  DRAWTOs,  since  the  OS  considers 
vertical  numbers  greater  than  95  to  he  in  error  for 
GRAPHICS  7.  The  Atari  1200XL  and  all  the  new 
600XL,  800XL,  1400XL,  and  U50XL  computers  fully 
support  this  mode  in  the  operating  system  and  BASIC. 


Sprites,  SYS,  And  Storage  On  The  64 

I  have  several  questions  about  the  Commodore  64: 

First  of  all,  I  know  you  can  check  if  a  sprite 
has  hit  a  background  character  by  PEEKing 
(V  +  31)  when  V  =  53248.  Is  there  any  way  to  find 
out  what  kind  of  character  it  hit? 

Second,  1  have  seen  many  programs  which 
read:  10  SYS(X).  How  do  they  do  this?  Using 
Commodore's  assembler  package,  you  must  load 
in  the  machine  language  program  off  the  disk. 

Last,  where  is  there  room  to  insert  machine 
language  programs  in  memory  other  than  COOO  - 
CFFF  (49152  -  53247)? 

Matthew  Price 

The  sprite-to-hackground  collision  detection  byte 
(53279)  is  set  up  to  be  a  "toggle"  switch;  in  other  words, 
it  registers  an  off/on  condition  (collision  or  no  collision). 
It  does  not  offer  the  option  of  telling  you  what  character 
the  sprite  collided  with.  Hozuever,  you  can  program 
this  option  for  yourself .  For  instance,  after  a  collision 
has  been  detected  you  could  branch  to  a  subroutine  that 
-would  convert  the  affected  sprite's  position  to  its  screen 
position,  and  then  perform  a  simple  PEEK  to  see  what 
character  it  hit. 

The  SYS  command  is  used  to  start  a  machine  lan- 
guage program  running.  When,  in  a  BASIC  program, 
you  see  a  statement  such  as  10  SYS  XXXX,  the  progran 
is  simply  branching  to  a  machine  language  routine 
much  the  same  way  that  a  pure  BASIC  program  would 
branch  to  a  BASIC  subroutine  via  the  GOTO  or  GOSUB 
command. 

Commodore's  machine  language  assembler  is  stored 
on  disk.  Like  BASIC,  machine  language  programs  may 
be  stored  on  either  tape  or  disk  and,  once  LOADed  (by 
the  LOAD  command,  or  via  a  BASIC  loader),  it  may  be 
called  or  branched  to  at  any  time  by  the  SYS  command. 
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There  are  many  places  for  you  to  safely  place  your 
machine  language  programs.  Besides  the  obvious  BASIC 
programming  area  (2048  to  40959),  there  are  other 
good  locations  available:  $02A7  to  $02FF  (decimal  679 
to  767,  89  bytes),  $033C  to  $03FB  (decimal  828  to 
1019-  the  tape  cassette  buffer  -  192  bytes),  and,  as  you 
mentioned,  $C000  to  $CFFF  (decimal  49152  to  53247, 
4096  bytes). 


Can  An  Atari  VCS  Run  400/800 
Programs? 

I  just  heard  that  a  keyboard  will  be  coming  out  for 
the  Atari  2600.  Are  programs  from  Atari  400/800 
compatible  with  this  sytem?  Do  they  have  the 
same  programming  language,  not  software? 

Frank  Martone 

Atari's  new  add-on  cotnputer  keyboard ,  previously 
called  "My  First  Computer,"  has  been  rechristened 
(with  a  few  keyboard  changes)  as  "The  Graduate. "  The 
add-on  module  comes  xvith  a  version  of  BASIC  that  is 
more  like  Microsoft  BASIC  than  Atari  BASIC.  The 
Graduate  was  designed  independently  of  the  home  com- 
puter line,  so  although  some  of  the  graphics  are  similar. 
The  Graduate  has  no  more  in  common  -with  the  400/800 
than  it  has  with  a  Commodore  VlC-20. 

Atari  (Machine  Language  Graphics 

1  own, an  Atari  400  and  would  like  to  know  how 
to  change  graphics  modes  in  machine  language. 
Also,  I'd  like  to  know  how  to  change  the  back- 
ground colors  in  the  GTIA  modes. 

Bim  Feysteryga 

All  the  graphics  routines  you  find  in  BASIC 
(GRAPHICS,  PLOT,  COLOR,  DRAWTO,  etc.)  can 
be  accessed  from  the  operating  system.  Refer  to  Bill 
Wilkinson's  "Insight:  Atari"  in  the  February  1982 
issue.  For  complete  information  on  the  GTIA,  you  will 
find  a  series  of  illuminating  articles  in  COMPUTEl's 
First  Book  of  Atari  Graphics. 

The  background  color  in  GTIA  modes  9  and  1 1  is, 
as  usual,  in  color  register  four  (SETCOLOR  4,  POKE 
712).  In  mode  9  you  can  only  control  the  color,  not  the 
luminance,  and  the  reverse  is  true  for  mode  11.  The 
background  color  in  GTIA  mode  GRAPHICS  10  is 
controlled  by  memory  location  704.  POKE  it  with  the 
color  multiplied  times  16  and  then  add  the  luminance. 
Instead  of  SETCOLOR  n,4,6  use  POKE  704,4*16  +  6. 


COMPUTE!  welcomes  questions,  comments,  or 
solutions  to  issues  raised  in  this  column.  Write  to: 
Readers'  Feedback,  COMPUTE!  Magazine,  P.O. 
Box  5406,  Greensboro,  NC  27403.  COMPUTE! 
reserves  the  right  to  edit  or  abridge  published 
letters.  © 
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If  you  own  a  VIC  20  or 
Commodore  '64  get 
ready  to  explore  the 
potential  of  these  fine 
machines  with  LUNA 
Software.  The  software 
supplier  for  the  80's. 

We  have  broken  tree  of 
the  pack  with  stunning 
games  such  as  our 
sophisticated,  three- 
screen,  FINAL  CON- 
QUEST, the  newesl  entry 
to  our  '64  line. 


LgfJAi-SOFTWARE,  P.  0.  Box  26922,  San  Jose,  CA  95159-6922   (408)  378-7793 


Experience  heart-racing 
surges  of  adrenalin  while 
trying  to  outrun  lightning- 
footed  coyotes  on  our 
HYPER-HEN  grid.  And.  il 
you're  the  PEDESTRIAN, 
keep  a  sharp  eye  on  the 
traffic  behind  you,  and 
the  muggers  ahead. 

LUNA'S  full  line  of  arcade 
style  games  and  user- 
friendly  business  software 
makes  us  the  industry's 
most  sought  after  new 
supplier. 


LUNA  Software:  Commtt- 
ted  to  providing  you  with 
Sta1e-of-the-Art  concepts 
and  programming  to 
bring  out  the  best  possi- 
ble performance  from 
your  Commodore  com- 
puters. Call  LUNA  today 
for  the  name  of  a  dealer 
in  your  area. 


Computers  And  Society 

David  D  Thornburg.  Associate  Editor 


That's  Not  A  Program,  That's  A 
Language 

In  the  wild  and  woolly  early  days  of  personal 
computing  (the  late  1970s,  to  be  exact),  one  of  my 
favorite  sayings  was  "That's  not  a  game,  that's  a 
simulation!"  Implicit  in  this  saying  was  the  idea 
that  games  were  somehow  not  worth  spending 
time  on,  but  that  the  same  piece  of  software  took 
on  extra  value  when  viewed  as  a  simulation. 

A  program  to  emulate  a  lemonade  stand  (in 
which  the  player  experimented  with  advertising, 
pricing,  inventory,  etc.)  could  be  viewed  as  a  game 
(see  how  much  money  you  can  make  in  the  short- 
est time)  as  well  as  a  simulation  (examine  the  effect 
of  advertising  on  sales).  But  as  time  passed,  the 
game/simulation  controversy  seemed  to  die  away. 

I  have  seen  some  recent  developments  that 
point  the  way  to  new  types  of  software.  I  am 
speaking  of  application  programs  that  are  actually 
computer  languages.  This  "language  aspect"  is 
sometimes  so  carefully  hidden  that  it  is  likely  the 
programmers  themselves  may  not  realize  all  the 
implications  of  their  efforts. 

This  and  next  month's  columns  are  devoted 
to  a  description  of  a  few  such  "languages."  Those 
of  you  who  think  computer  languages  are  limited 
to  BASIC,  PROLOG,  Pascal,  PILOT,  Logo,  and 
the  like  are  in  for  a  surprise.  I  am  presenting  only 
a  very  small  sampling  of  these  languages,  and  by 
the  time  we  are  done  you  will  be  able  to  identify 
many  others. 

Before  giving  examples,  it  might  be  a  good 
idea  to  list  the  essential  elements  of  a  language.  A 
computer  language  must  allow  the  user  to  create 
computer-based  activities  that  are  custom-tailored 
to  the  user's  needs.  The  language  must  have  a 
vocabulary  and  a  grammar.  The  user  should  be 
able  to  edit  his  or  her  program  and  to  "run"  it.  All 
the  languages  I  will  describe  interpret  the  user's 
programs  and  are  highly  interactive  both  in  their 
programming  style  and  in  the  types  of  programs 
that  are  created. 

VisiCalc  As  A  Language 

VisiCalc  (a  product  of  VisiCorp)  is  an  example  of 
what  is  called  an  "electronic  spread  sheet."  This 
program  allows  the  user  to  create  tables  of  data 
and  relationships  between  certain  pieces  of  data. 
As  the  data  is  entered  into  the  spread  sheet,  cal- 
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culations  are  made  automatically  to  fill  in  the  areas 
of  the  sheet  containing  the  "results."  The  ability 
to  play  "What  if?"  games  by  quickly  seeing  the 
effect  of  changes  in  the  data  has  made  VisiCalc 
and  its  kin  invaluable  tools  for  today's  computer- 
using  executive. 

Electronic  spread  sheet  programs  are  com- 
puter languages. 

If  you  tind  this  surprising,  look  at  how  they 
are  used.  The  user  creates  a  "mask"  for  the  spread 
sheet  (the  program).  This  mask  contains  the  labels 
for  the  rows  and  columns  of  the  matrix,  the  re- 
lationships between  data  in  the  various  entry 
cells,  and  any  fixed  data  that  the  program  might 
need.  This  mask  can  then  be  saved  for  later  use, 
or  for  use  by  someone  other  than  the  programmer. 
A  VisiCalc  mask  for  tax  forms,  for  example,  can 
be  used  by  millions  of  taxpayers,  each  of  whom 
would  enter  his  or  her  own  data  and  let  the  spread 
sheet  calculate  the  results. 

Interestingly,  "programming  in  VisiCalc" 
doesn't  require  a  knowledge  of  anything  like  a 
"normal"  computer  language.  It  doesn't  matter  if 
you  program  the  labels  first,  or  if  you  create  some 
of  the  row  and  column  relationships  (e.g.,  making 
the  contents  of  each  entry  in  column  C  the  product 
of  the  contents  of  each  entry  in  column  A  and 
column  B)  and  then  till  in  some  data.  The  pro- 
grammer has  access  to  the  whole  program  at  once 
and  can  try  out  bits  and  pieces  as  he  or  she  moves 
along.  If  writing  programs  in  BASIC  can  be  con- 
sidered a  "serial"  process,  programming  in  Visi- 
Calc is  a  "parallel"  process. 

It  is  this  radical  departure  from  traditional 
programming  styles  that  makes  VisiCalc  inter- 
esting to  me  as  a  language.  Philosophers  have 
long  maintained  that  what  we  think  is  influenced 
by  the  choice  of  language  in  which  we  express 
our  thoughts.  That  many  hundreds  of  thousands 
of  business  people  seem  to  be  better  "thinkers" 
with  the  aid  of  programs  like  VisiCalc  is  testimony 
to  the  power  of  this  language. 

Rooky's  Boots  As  A  Language 

The  Learning  Company  is  well  known  for  its  high- 
quality  educational  software  and  for  its  special 
emphasis  on  the  development  of  logical  thinking 
skills.  Hidden  among  its  application  software 
packages  is  a  computer  language  called  Rocky's 


WORD  PROCESSING 
THE  DECISION  IS  EASY!!! 


Datasoft  eliminates  the  frustrations  of  choosing  a  word 
processor.  When  It  comes  to  ease  of  use,  versatility,  and 
price,  Datasoft  beats  the  competition  hands  down,  and 
now  both  Text  Wizard'"  and  Spell  Wizard'"  have  been 
combined  into  a  specially  marked  package  to  save  you 
$20.00. 

* 

Text  Wizard,  one  of  few  programs  to  receive  four  (4) 

excellents  on  the  Infoworld    Report  Card   Review 

let's  you  create  letters,  documents, 

reports  and  much,  much  more.  It's  as 

simple  as  a  few  keystrokes  to  edit,  erase, 

move  lines  or  paragraphs. 

With  Spell  Wizard  and  its  33,000  +  Word 

Dictionary,  you  can 

eliminate  embarrassing 

typos  or  spelling  errors. 
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Text  Wizard 
Atari  400/800  (32K  min.) 

9421  Winnetka  Avenue,  Chatsworth,  CA 

Spell  Wiiard,  Text  Wiurd.  and  Dolasott  ore  Ufldemarki  o(  Datasoft  Inc.  ■  1983  DATASOFT" 


Spell  Wizard  automatically  indicates  errors,  and  allows 

you  to  immediately  view  your  dictionary  for  easy 

correction.  You  can  also  create  or  add  unique  words  to 

your  own  custom  dictionary. 

You  might  expect  to  pay  $79.00  to  $99.00  for  only  one 

of  these  programs,  however,  Text  Wizard  normally 

S49.95  and  Spell  Wizard  normally  $49.95  suggested 

retail,  can  both  be  purchased  for  a 

limited  time  in  specially  marked 

packages  for  only  $79.95  total  price,  a 

savings  of  $20.00. 

Check  with  your  local  dealer  or  send 

check  or  money  order  with  $3.00 

postage  and  handling  (California 

residents  add  5'/2%  sales  tax)  to: 


Spell  Wizard 

Atari  400/800/ 1 200  (32K  min.) 


DATASOFT,  INC. 
91311  (213)701-5161 
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You'll  never  see  Mocom's  graphics 
on  any  computer  screen.  Because 
there's  never  been  a  computer  built 
by  man  that  could  handle  the  iniages 
we  produce.  And,  there  never  will  be. 
We  draw  our  graphics  from  the 
limitless  imagery  of  your  imagi- 
nation—a technology  so  power- 
ful, it  makes  any  picture 
that's  ever  come  out  of  a 


screen  look  like  graffiti 
by  comparison.  And 
nobody  knows  how 
to  unleash  your 
imagination  like 
Infocom. 
Through  our 
prose,  your 
i  imagination 

%,  makes  you  part 

^  of  our  stories, 

:'  in  control  of 

what  you  do 
and  where  you 
go— yet  unable 
to  predict  or  con 
trol  the  course  of 
events.  You're 
confronted  with 
situations  and  log-         ^Sk 
ical  puzzles  the  like  of         ^JHj^ 
which  you  won't  find  elsewhere,     ^v  "^^ 
And  you're  immersed  in  rich  envi-  ^^  . 
ronments  alive  with  personalities  as 
real  as  any  you'll  meet  in  the  flesh- 
yet  all  the  more  vivid  because 
they're  perceived  directly  by  your 
mind's  eye,  not  through  your  exter- 
nal senses.  The  method  to  this 
magic?  We've  found  the  way  to  plug 
our  prose  right  into  your  psyche,  and 
catapult  you  into  a  whole  new 
dimension. 

Take  some  tough  critics'  words 
about  our  words.  SOFTALK,  for 
example,  called  ZORK®  Ill's  prose 


"far  more  graphic  than  any  depiction 
yet  achieved  by  an  adventure  with 
graphics."  And  the  NEW  YORK 
TIMES  saw  fit  to  print  that  our 
DEADLINE'""  is  "an  amazing  feat 
of  programming."  Even  a  journal  as 
video-oriented  as  ELECTRONIC 
GAMES  found  Infocom  prose  to  be 
such  an  eye-opener,  they  named  one 
of  our  games  their  Best  Adventure 
of  1983. 

Better  still,  bring  an  Infocom  game 
home  with  you.  Discover  firsthand 
why  thousands  upon  thousands  of 
discriminating  game  players  keep 
turning  everything  we  write  into 
instantaneous  bestsellers. 

Step  up  to  Infocom.  All  words.  No 
graffiti.  The  secret  reaches  of  your 
mind  are  beckoning.  A  whole  new 
dimension  is  in  there  waiting  for  you. 


inFocom 

The  next  dimension. 

Infocom.  Inc..  55  Wheeler  St.,  Cambridge,  MA  02138 

For  vour:  .Apple  1],  .Atari.  Comirwjdore  f>4,  CP/M  8*.  DEC  Rainbow. 
DEC KTII.  IBM. .VEC .APC.  N"EC PC-8000. Osbornt . Ti Professional. 
TRSWl  Mixli-l  i.  TRS-80  Modd  [[[. 


Figure  1:  or  Gate  Connected  To  Clapper         Figure  2:  Knife  Cuts  Clapper  From  OR  Gate 
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Figure  3:  Clapper  Replaced  By  OFF/ON  Box     Figure  4:  AND  Gate  Connected  To  Machine 

Stiown  In  Figure  3 
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Figure  5:  completed  Machine  In  Use 
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Figure  6: 

The  Machine  Used  To  Identify  Blue  Triangles 
(Solving  A  Problem  In  Logic) 
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"Your  Portfolio,  Sir." 


DOW  JONES  INVESTMENT  EVALUATOR™- 

the  computer  software  that  serves  your  personal 
investment  needs  at  home,  accurately  and 

efficiently. 

A  Personalized  System 

With  the  INVESTMENT  EVALUATOR,  your 
home  computer  and  a  telephone  modem,  you 
have  a  personalized  system  for  managing  your 
portfolio.  A  system  that  automatically  updates 
and  tracks  only  those  stocks  you  want  to  follow  — 
allowing  you  to  evaluate  your  position  at  a  glance. 

Easy  Access  to  News /Retrieval® 

This  software  automatically  dials  and  connects 
you  with  Dow  Jones  News/Retrieval®,  the 
world's  leading  supplier  of  computerized  infor- 
mation on  demand.  It  allows  you  and  your  family 
access  to  current  quotes,  financial  and  business 
news,  general  news,  movie  reviews,  sports, 
weather  and  even  the  Academic  American 
Encyclopedia. 


The  Right  Amount  of  Software 

for  the  Job 

The  INVESTMENT  EVALUATOR  gives  you 
the  capabilities  you  need  without  making  you 
pay  for  a  lot  of  complex  functions  you  may 
never  use.  Menu  screens  lead  you  to  what  you 
want  with  one-touch  commands.  The  program 
is  completely  reliable,  comes  with  an  easy-to- 
follow  manual  and  is  fully  supported  by  the 
Dow  Jones  Customer  Service  hotline. 

From  Dow  Jones,  Publishers  of 
The  Wall  Street  Journal 

Dow  Jones  has  been 
serving  the  business  and 
financial  communities  for 
over  100  years.  Now 
Dow  Jones  Software™ 
serves  you  at  home. 

For  a  free  brochure  call: 
1-800-343-8500  ext.  262 

call  l-ZJit'^m''itn»txt.2h.2) 


Dm  lONES  Software 


Dow  Jones  Investment  Evaluator" 

...Bank on  it. 


Available  for  IBM  PC  and 

Tl  PrafessionaL  Compatibility 
with  Apple,  AtaHf  Contmadore 
to  follow. 


Copyiighi  ©  1983  Etow  Jones  &  Co.,  Inc.  All  righo  reserved. 


Boots.  This  language  assumes  the  guise  of  a  pro- 
gram designed  to  let  the  user  solve  logic  problems 
by  building  "logic  machines."  These  logic 
machines  are,  in  fact,  schematic  diagrams  con- 
structed from  AND,  OR,  and  NOT  gates,  flip- 
flops,  wires,  input  sensors,  and  output  devices. 
Through  a  series  of  carefully  staged  exercises,  the 
user  is  taught  how  to  use  the  program  (or,  as  I 
claim,  how  to  write  programs  in  the  Rocky's  Boots 
language). 

Interestingly,  the  construction  of  logic 
machines  (this  is  the  programming  task)  can  be 
done  without  access  to  the  keyboard  by  using  a 
joystick  to  pick  up  objects  (program  subroutines) 
and  interconnect  them  into  a  complete  machine 
(program).  Incorrect  connections  can  be  "cut" 
with  a  special  knife  (the  editor).  The  only  frustra- 
tion I  have  encountered  with  this  language  is  that 
no  provision  was  made  for  the  saving  of  finished 
"machines." 

The  figures  show  how  a  program  can  be 
edited  in  Rocky's  Boots  (remember  that  a  machine 
is  in  reality  the  computer  program  you  have 
created).  Figure  1  shows  a  machine  consisting  of 
an  OR  gate  connected  to  a  clapper.  One  of  the  OR 
gate  inputs  is  a  blue  sensor,  and  the  other  is  a 
green  sensor.  The  remaining  items  in  the  picture 
are  "spare  parts"  (i.e.,  subroutines  available  for 
use).  Suppose  you  want  to  change  this  machine 
into  a  new  one  that  will  turn  the  word  OFF  to  ON 
if  the  green  sensor  is  activated  OR  if  both  the  blue 
sensor  is  activated  AND  the  cursor  is  touching  an 
input. 

To  modify  the  machine,  the  cursor  (shown  as 
the  large  solid  rectangle)  is  used  to  pick  up  the 
knife  shown  at  the  bottom-left  side  of  Figure  I .  In 
Figure  2  the  blue  sensor  has  been  cut,  and  the 
knife  is  shown  cutting  the  clapper  from  the  OR 
gate.  In  Figure  3  the  clapper  has  been  replaced  by 
the  OFF/ON  box,  and  in  Figure  4  the  AND  gate 
and  some  wires  have  been  connected  to  complete 
the  new  machine.  Figure  5  shows  what  happens 
when  the  machine  is  used  and  the  proper  condi- 
tions are  satisfied  (in  this  case,  both  the  blue  sensor 
and  the  remaining  input  of  the  AND  gate  are 
activated). 

Rocky's  Boots  is  similar  in  many  ways  to  Visi- 
Calc.  The  user  has  access  to  the  whole  program  at 
once  (it  is  a  parallel  environment),  and  the  pro- 
gram (the  machine)  can  be  tested  as  it  is  being 
built.  Of  course,  the  application  areas  for  these 
programs  are  quite  different  from  each  other. 

The  machines  created  by  Rocky's  Boots  are 
designed  to  be  used  to  solve  logic  problems.  Figure 
6  shows  one  such  problem  in  which  a  machine 
has  been  built  to  identify  blue  triangles. 

One  can  argue  that  Rocky's  Boots  is  a  game, 
a  simulation,  and  a  language. 

No  matter  what  it  is  called,  it  is  a  very  powerful 


piece  of  software. 

Next  month  we  will  conclude  this  series  with 
the  description  of  yet  another  powerful  program/ 
language,  Dancing  Bear  from  Koala  Technologies. 
We  will  also  discuss  the  potential  impact  of  these 
types  of  languages.  © 


COMPUTE! 

The  Resource, 


MEMOREX 

nXXIBLK  DISCS 

WE  WILL  NOT  BE  UNDER- 
SOLDD  Call  Free  (800)235-4137 

for  prices  and  informatiorr  Dealer 
inquiries  invited  and  COD's 
accepted 


PACIFIC 
EXCHANGES 

100  Foothill  Blvd. 
San  Luis  Obispo.  CA 
93401.  InCal.  call 
(8001  592-5935  or 
(805)  543-1037 


,  ramputei: 


Business  applications  for  ttie 
Commodore  64  and  VIC  20 

Ttie  Computer  Networtc  has  80  column  screen 
adaptors,  wordprocessing  software,  accounting 
software,  spreadsheets,  printers,  modems,  monitors, 
interfaces,  furniture,  disks,  disk  drives,  cassettes, 

Ttie  Computer  Netwoitc  carries  Commodore,  DATA 
20,  Star  Micronics,  Brother,  Epson,  IDS,  Okidata, 
Silver  Reed,  BMC,  Amdek,  Zenith.  Micro  World,  MSD. 
Kero,  HES,  ESI,  Infodesigns,  Timeworks,  J  &  G 
Software,  TOTt  Software,  Pacific  Coast  Software, 
and  Professional  Software. 

The  Computer  Networic  will  work  with  you  from 
choosing  the  proper  equipment,  installation,  repair, 
and  best  of  oil  someone  to  talk  to  when  it  doesn't 
work!  Looking  for  a  product  and  still  can't  find  what 
you  want?  If  we  don't  have  it  we  can  get  it.  The 
Computer  Network  is  not  a  discount  mailorder 
house,  The  Computer  Network  is  a  full  service  retail 
organization. 

Ttie  Computer  Nelworlc 

P.O.  Box  9840 
Fountain  Valley,  CA  92708 

Call  Toll  Free  800-221-9948 
in  California  714-855-4366 

If  you  want  your  64  to  do  more  ttian  play  games. 
The  Computer  Network  has  what  you  warit! 
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RESTON 

CLOSES 

THE  GAP 

BETWEEN 

ART 

AND 

COMPUTERS 

For  the  Atari  800  with  48k  memory. 


CONTEST! 

For  the  best  compuler 
animotion  sequence 
created  using  Movie- 
Moker'.V.SlOOOpriie. 
Entries  should  be 
submitted  on  disk  by 
December  31,  1V83. 
Winning  entry  will  be 
shown  01  1984  West 
Coast  Computer  Foire. 
For  more  defoili,  con- 
tact Reston  Publisliing 
Company. 


In  Reston's  new  book.  Genesis  II,  Creation 
and  Recreation  with  Computers,  by  Dale 
Peterson,  artists,  writers  and  musicians  use 
computers  to  create  new  visions,  new 
sounds  and  new  ways  of  expressing  them- 
selves, all  interwoven  with  stunning  illustra- 
tions. With  Movie  Maker,  an  exciting  new 
progrom  for  the  Atari  «  Home  Computer  by 
Interactive  Picture  Systems,  you'll  learn  how 
to  do  these  things  yourself.  You'll  compose 
scenery  and  shapes,  then  propel  them  into 
continuous,  flicker-free  action.  You'll  actu- 
ally make  a  short  animoted  movie,  right  at 
your  keyboard.  Let  Reston  release  the  crea- 
tive spirit  in  you, 
MovieMaker  is  a 
Creative  Pastime'"  from 

Redtoft  So^iAKui^ 

A  Prentice-Hall  Company 

11480  Sunset  Hills  Rd. 

Resfon,  VA  22090 

Available  a1  your  local  bookstore 

and  computer  retailer  or  coll  us  of 

(800)  336-0338. 

Alan  is  a  regis'tered  trademarl(  of  Afari,  Inc. 
Coming  soon:  16k  ROM  cartridge. 


THE  BEGINNER'S  PAGE 


Richard  Monsfield,  Senior  Editor 


Your  First  Useful  Program 


It  doesn't  take  long.  Soon  after  you  buy  a  com- 
puter, someone  will  ask  what  it's  doing  for  you 
that's  useful.  You've  been  learning  to  program  in 
BASIC,  but  what  practical  results  have  you  got  to 
show  for  your  efforts?  The  questioner  might  be  a 
friend  or  even  someone  in  your  immediate  family, 
someone  you  usually  love. 

Here's  a  program  which  can  be  used  in  dozens 
of  practical  ways.  It  makes  it  easy  to  store  and 
analyze  information.  We  all  keep  lists  and  records. 
If  you  have  a  collection  of  something  -  recipes, 
books,  stamps,  albums,  whatever- you  can  enter 
all  sorts  of  information  into  this  program  and  then 
look  things  up  later  in  a  variety  of  ways.  You  can 
ask  for  everything  starting  with  the  letter  A, 
everything  on  a  particular  topic,  from  a  particular 
country,  or  whatever  specifications  you  want. 
This  type  of  program  is  often  called  a  data  base 
manager.  It's  one  of  the  most  effective,  impressive 
applications  for  a  personal  computer. 

How  To  Modify  The  Program 

A  similar  program  was  published  in  this  column 
two  years  ago  and  proved  popular.  I  received  this 
letter  the  other  day: 

/  would  like  to  ask  a  favor.  I  have  been  using 
your  program  "Searching  Files"  (November 
1981)  for  some  time,  and  very  much  ap- 
preciate it.  But  I've  tried  without  success  to 
add  categories  like  3.  Publication,  4.  Date.  If 
possible,  could  i/ou  explain  how  to  expand 
the  program  to  include  additional  categories? 

Mel  Leiseroivitz 

That  a  programmer  can  make  modifications 
to  a  program  is  one  of  the  most  subtle,  but  pow- 
erful, aspects  of  computing.  Unlike  other  kinds  of 
tools,  a  given  computer  program  can  often  be 
radically  transformed  so  that  it  can  accomplish  a 
great  variety  of  tasks.  Let's  take  this  program 
apart,  looking  at  each  aspect  of  it,  and  then  explore 
how  to  modify  it  to  include  extra  categories. 

Data  base  management  is  frequently  divided 
into  two  phases:  the  manager  program  and  the 
actual  base  of  data.  A  data  base  would  be  a  list  of 
pieces  of  information,  perhaps  in  alphabetic  or 
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some  other  order,  like  the  phone  book.  The  data 
base  is  often  stored  on  a  tape  or  disk,  and  the 
manager  program  looks  up  information  by  opening 
and  closing  files  on  the  tape  or  disk.  The  second 
phase,  the  manager  program,  can  make  all  kinds 
of  lists  for  you;  it  can  analyze  the  data  base.  For 
example,  if  the  yellow  pages  were  on  a  disk,  you 
could  write  a  program  which  would  allow  you  to 
ask  highly  specific  questions.  You  might  want  to 
know  the  phone  number  of  all  pizza  shops  within 
a  five-mile  radius  of  your  house.  If  the  data  base 
included  map  information,  the  manager  program 
could  give  you  the  answer. 

A  Faster  And  Easier  Way 

This  program,  "The  Filer,"  combines  the  data 
base  into  the  manager  program  in  the  form  of 
DATA  statements,  each  holding  an  individual 
record.  The  advantage  of  this  is  that  you  can  add 
to  and  modify  the  data  easily,  on  screen.  It's  also 
faster:  the  computer  doesn't  need  to  bring  data  in 
from  tape  or  disk.  The  program  contains  the  data 
already.  The  disadvantage  is  that  your  data  base 
cannot  be  larger  than  the  amount  of  memory  in 
your  computer.  You  should  be  able  to  find  many 
uses  for  this  program,  however.  If  your  computer 
has  32K  of  RAM  memory,  you  can  store  detailed 
information  about  all  the  articles  in  COMPUTE!  for 
any  given  year.  If  you  want  to  start  a  data  base  for 
a  new  year,  you  can  simply  use  the  program  again, 
with  a  new  set  of  DATA  statements.  In  our  ex- 
ample use  of  The  Filer  we'll  start  a  cross-indexed 
reference  file  of  all  COMPUTE!  articles. 

The  program  is  designed  to  work  on  all  com- 
puters using  Microsoft  BASIC  (Commodore, 
Radio  Shack,  TI,  Apple,  etc.).  If  you  have  an  Atari, 
there's  a  version  for  your  machine  in  COMPUTE!, 
November  1981. 

Let's  go  through  the  program  to  see  how  it 
works: 

Line  Number 

1         This  lets  the  computer  know  the  total 
number  of  items  in  our  data  base.  T=  10  because 
we've  got  ten  DATA  lines  in  this  program.  The 
data  base  starts  at  line  502  and  continues  to  the 
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TDK  Floppy  Disks. 
Invaluable  security  for  irreplaceable  information. 
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Today,  more  and  more  companies  are  relying  on  convenient  lloppy  disks  to  record, 
sfore  and  safeguard  Iniormatlon.  Irreplaceable  information  whicti  is  vital  to  their  business 
interests.  It  Is  precisely  the  value  placed  on  this  information  thai  mokes  the  floppy  disk  an 
Invaluable  tool  for  storage  and  security.  And  this  is  where  TDK  tloppy  disks  become  invalu- 
able to  you.  TDK  floppy  disks  are  guaranteed  100%  error-free  at  the  time  of  manufacture 
and  certified  for  double-density  encoding.  Furthermore,  each  track  of  every  TDK  floppy 

-  ,_        disk  is  tested  to  exceed  industry  standards. . .  including 

those  of  IBM,  Shugart,  ANSI,  ECMA,  ISO  and  JiS.  Once  you 
Insert  a  quality  TDK  floppy  disk  into  your  computer  system, 
you're  guaranteed  highly  reliable,  ultra  smooth  perform- 
ance. This  is  due  to  TDK's  proprietary  disk-burnishing  tech- 
nique thot  provides  optimum  head-to-disk  contact. 

TDK  floppy  disks  are  available  in  S'Aand  S-inch  sizes  In 
the  most  popular  formats.  Each  disk  comes  in  its  own  pro- 
tective Tyvek-type  envelope.  For  a  copy  of  our  brochure, 
"Some  Straight  Talk  About  Floppy  Disks,"  write  lo:  TDK  Elec- 
tronics Corp.,  Computer  Products  Marketing  Dept.,  12  Harbor 
Park  Drive,  Port  Washington,  NY  11050,  or  call  516^525-0100. 
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The  heart  of  your  system. 
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pfe        We  just  made 
owning  an  Atari  c^inpvtter 


a  lot  more  logical. 
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Introducing  the  Rana  1000  disk  drive.  Itls  a  whole  new  game  for  Atari  computers. 


This  two  digit  LED  readout 
displays  a  code  that  tells  you 
everything  you  need  to  know. 


This  switch  tells  you  your 
write  protect  feature  is 
keeping  your  information  safe. 


When  Rana  Systems  introduced  the  Elite 
Series  of  Apple®  compatible  disk  drives,  we  didn't 
know  what  a  tremendous  impact  they  would  make. 
It  turned  out  to  be  a  line  so  outstanding  in  perfor- 
mance, styling,  capacity,  and  price,  that  it  instan- 
taneously made  us  a  major  force  in  the  market. 
Well,  needless  to  say,  the  response  was  so  great 
that  we  were  forced  to  create  the  same  highly  ad- 
vanced disk  drive  for  Atari®  A  disk  drive  that  when 
coupled  with  Atari's  computer,  could  perform 
everything  from  accounting,  financial  planning, 
and  stock  charting,  to  word  processing,  business 
management,  and  letting  you  write  your  own  pro- 
grams. Plus,  we  made  it  simple  enough  for  a  child 
to  use,  for  learning  anything  from  the  alphabet  to 
a  foreign  language. 

WDrking  with  a  diskette 
versus  playing  with  a  cassette. 

Let's  face  it.  The  only  reason  Atari  made  a 
cassette  option  to  their  computer  was  to  make  it 
affordable.  But  now  you  don't  have  to  settle  for  less. 
Because  now  you  can  get  a  diskette  for  your  Atari 
computer  which  outperforms  their  cassette.  With 
Atari's  cassette  you  only  get  half  the  functions  of  a 
computer  compared  to  what  our  floppy  disk  can 
give  you.  Their  cassette  is  not  only  limited  in  the 
software  available,  but  it  also  takes  20  times  longer 
to  get  the  information  you  need.  And  Rana's  disk 


The  remaining  switches 
provide  readouts  on  density 
storage,  error  status,  and 
drive  number. 


This  switch,  when  you  touch  it, 
tells  you  what  track  you're  on. 


drive  offers  twice  the  storage  capacity  of  either 
their  cassette  or  disk  drive. 

Why  even  stylewise  our  new  low  profile  design 
not  only  looks  100  times  more  spectacular,  but  it 
occupies  3  times  less  space.  And  our  new  Rana 
1000  also  gives  you  a  piece  of  its  mind  every  time 
you  use  it,  because  our  disk  drive  gives  you  informa- 
tion as  well  as  takes  it.  And  we  think  that  says  a  lot. 

Ihe  disk  drive 
that  has  all  the  answers. 

Rana  offers  you  a  myriad  of  features  Atari 
couldn't  even  conceive  of.  Like  five  electronic  func- 
tions on  the  front  panel  that  give  you  a  LED  read- 
out when  touched.  Our  disk  drive  tells  you  what 
track  you're  on,  and  what  density  and  how  much 
information  you're  storing.  And,  we  have  a  write 
protect  feature  which  protects  your  diskette  from 
being  erased.  In  fact,  no  other  disk  drive  can 
offer  you  that. 

As  you  can  see,  it  was  easy  to  build  a  disk 
drive  superior  to  Atari's.  Because  for  every  reason 
you  buy  a  disk  drive,  Rana  has  superior  technology. 

The  Rana  1000  disk  drive.  It  brings  your  Atari 
computer  to  a  higher  level  of  sophistication  for  a 
price  one  third  lower  than  Atari's.  So  your  choice 
shouldn't  even  be  a  matter  of  logic. 

Just  common  sense. 
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Always  a  step  ahead. 


21300Sup9rror  Sireei,  Chaiswonh,  CA9131 1  213-709-S4a4.  For  dealer  inlofmalion  call  loll 
free  1-800-421  -2207.  In  Calilornia  only  call   1  -800-262-1 221 .  Source  Number;  TCT-654 


•  Apple  is  a  registered  trademark  of  Apple  Computer.  Inc.  »  Atari  is  a  regisiBrod  trsOemark  o(  Man,  Inc..  a  Wanwr  Cofninunications  Company 


end  of  the  program.  If  you  add  400  more  DATA 
lines,  you  should  change  line  1  to  read:  T  =  410. 

2  Since  reading  a  large  data  base  might  take 
some  time,  this  statement  appears  on  screen  to  let 
the  user  know  that  the  computer  is  busy  and  will 
return  control  to  him  or  her  shortly. 

3  Here  we  DIMension  the  three  variables 
which  will  be  holding  our  data.  These  tens,  too, 
would  need  to  be  changed  to  410s  if  you  added 
400 more  DATAlines. 

10      The  computer  assigns  a  special  variable 
name  to  each  item  of  data  by  READing  through 
the  entire  list.  We've  got  three  categories  per  rec- 
ord. A$(?  -  whatever  I  =  during  the  READing) 
will  be  topic  identification  for  the  COMPUTE!  articles 
in  our  data  base.  B$(?)  will  contain  the  issue 
number  and  the  page  number.  C$(?)  holds  the 
author  name. 

15-45       Here  the  computer  gives  us  a  choice.  We 
can  look  things  up  either  by  topic  or  by  author. 

50       We  now  make  our  request.  If  X  =  1  (see  line 
35),  then  we're  after  the  author  so  we're  sent  down 
to  line  70,  which  searches  through  C$( ).  If  not, 
we  proceed  to  line  55  for  a  search  of  A$( ),  topics. 
Lines  55-65  and  70-80  are  identical  searches,  except 
one  looks  at  C$( ),  the  other  at  A$( ).  Since  they're 
the  same,  we'll  just  examine  the  interesting 
pattern-matching  technique  where  it  appears  the 
first  time,  in  line  60. 

60      This  is  the  heart  of  the  program.  It's  the 
trick  that  lets  you  look  things  up  without  knowing 
their  exact  names.  It  also  makes  possible  varying 
depths  of  specificity.  If  you  add  a  data  line:  522 
DATABASIC  MEMORY  SAVING,  you  can  then 
request  anything  from  B  to  BASIC  MEMORY  SAV- 
ING and  this  item  will  show  up  on  the  list.  If  you 
request  matches  to  BASIC,  you'll  get  this  one  and 
line  510.  If  you  request  BASIC  MEMORY,  line  510 
will  be  ignored. 

How  does  it  work?  N$  is  the  word  or  words 
you  entered  (line  50)  and  to  which  you  want  all 
matches.  A$(I)  will  scan  through  the  entire  data 
base  "topics  column."  For  a  match  to  take  place, 
only  the  leftmost  part  of  A$(I)  needs  to  match  N$. 
Z  does  this  for  us;  it's  the  length  of  N$  (see  line 
50).  That  is,  we're  looking  for  matches  from  pieces 
of  A$(I)  only  as  big  as  N$.  So,  you  type  in  your 
topic  DATA  with  this  in  mind.  Enter  each  record 
so  that  the  first  word  is  the  most  general,  the  sec- 
ond more  specific,  etc. 

85      This  subroutine  prints  out  any  matches 
which  are  found.  It  contains  descriptions  of  the 
categories.  There  are  a  number  of  ways  to  format 
such  things.  You  might  prefer,  for  example,  to  list 
the  category  titles  only  once,  at  the  top  of  the 
screen,  and  then  list  everything  in  columns  un- 
derneath them. 


Expanding  The  Categories 

As  you  can  see  by  following  the  changes  suggested 
in  Programs  2-4,  some  minor  structural  modifica- 
tions are  necessary  to  make  Program  1  handle  a 
fourth  category.  Computer  brand.  However,  it 
would  be  simple  to  add  a  fifth  or  more  categories 
to  this  new  version. 

One  thing  to  watch  out  for:  the  READ  state- 
ment doesn't  care  what  data  is  on  a  given  DATA 
line.  It  reads  things  verj'  literally  and  checks  for 
commas  (or  the  end  of  a  line)  to  tell  it  that  a  par- 
ticular item  has  ended.  So,  if  you  get  odd  re- 
sponses such  as  EDUCATION  when  you're  asking 
for  author  names  starting  with  E,  or  an  OUT  OF 
DATA  ERROR  -  you've  probably  left  out  a  comma 
somewhere  in  the  DATA  lines.  Also,  your  DATA 
lines  will  be  longer  with  this  new,  four-category, 
version  of  The  Filer.  They'll  now  look  something 
like  this: 

520  DATALANGUAGES  PILOT,1/40,THORNBURG,VIC 

If  you  have  any  questions  or  topics  you'd  tike  to 
see  covered  in  this  colunui,  write  to  "The  Beginner's 
Page,"  COMPUTE'.  Magazine,  P.O.  Box  5406, 
Greensboro,  NC  27403. 

Program  1:  The  Filer 

1  T=10:REM{8  spaces}   TOTAL  NUMBER  OF 
ITEMS  OF  DATA 

2  PRINT"{3  SPACES}READING{5  SPACESJCOMPU 
TE!{5  SPACES }DATABASE 

3  DIMA$(10) ,B${10) ,C$(10) 

10  F0RI=1T0T:READA$  (I)  ,B$ (I ) ,C$ (I ) :NEXT 
15  PRINT:PRINT"SELECT  A  CATEGORY" : T$="TO 

PIC" 
20  PRINT"{4  SPACES}!.  AUTHOR 
25  PRINT"{4  SPACES}2.  SUBJECT 
30  K$="":GETK$:IFK$=""THEN30 
35  X=VAL.(K$)  :IFX>2THEN30 
40  IFX=1THENT$="AUTH0R'S  NAME" 
45  PRINT"{3  SPACES}PLEASE  ENTER  "T$ 
50  INPUTN$:Z=LEN(N$) :IFX=1THEN70 
55  FORI=lTOT 

60  IFN$=LEFT$ (A$ (I) ,Z ) THENG0SUB8 5 
65  NEXTI:G0T015 
70  F0RI=1T0T 

75  IFN$=LEFT$ {C$ (I) ,Z ) THENGOSUB85 
80  NEXTI:G0T015 
85  PRINTA$(I) ;"...IN  ";B$(I);"  (ISSUE#/P 

AGE),  WRITTEN  BY  "; C$ (I ): RETURN 

498  REM 

499  REM 

500  REM  ***  TOPIC  OF  ARTICLE  —  ISSUE/PG 

—  AUTHOR  *** 
502  DATABUSINESS, 1/4, SAWYER 
504  DATAS0RTING,1/7,HUL0N 
506  DATAWORDPROCESSORS , 1/13 , LINDSAY 
508  DATASCIENTIFIC  INSTRUMEHTATION , 1/24 , 

BYRD 
510  DATABASIC  TOKENS , 1/29 , HERMAN 
512  DATAMODEM,1/30,TULLOCH 
514  DATAA-D  CONVERTER , 1/31 , HERMAN 
516  DATAML  MEMORY  TEST , 1/32 , MOSER 
518  DATAEDUCATION,l/34,BARRETTE 
520  DATALANGUAGES  PILOT , 1/40 ,THORNBURG 
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HERE'S  S.A.MJ 

PUT  HIM  IH  YOUR 

DISK  DRIVE  AHD  YOUR 

COMPUTER  TALKS. 

S.A.M.  is  the  Software  Automalic  Mouth"*, 

by  Don't  Ask  Software — a  complete  speech 

synthesizer  on  a  disk.  S.A.M  does  what 

hardware  speech  devices  do.  and  more — 

without  the  high  price. 

•  Natural-sounding  speech 
~  Variable  pilch,  speed,  inflection 

English  text-lo-speech  conversion 

•  Easy  to  use  in  your  programs 

FOR  COMMODORE  64,  ATARI, 
APP1EII+,  He  COMPUTERS 

From  your  software  dealer. 

Bug.  retail  prices:  C64,  Atari  versions  $59.95. 

Apple  version  includes  d/a  card:  $124.95. 


D®nT  ASKI 

COMPUTER  SOFTWARE 


2265  WestwcxxJ  Bl..  Ste.  B-150.  Dept.  C 
Los  Angeles,  CA  90064.  (213)  477-4514. 


ProgianKTed  Dy  Marti  Oanon.  essBS  Doni  A*  flia'i  C64 

conveiaons  by  Hodeit  Freedman.  Mac  Lindsay  respectiuely.  c  I9K. 

1963  Daii  Ask  Commodoie  54.  Alan.  Apple  II  +  and  lie  are  irade- 

niarks oi Caivnodore Bisness Madwtes  Inc .  Alan inc.^ni 

Apple  Compijiei  Inc .  reapeclively. 


(C»C), 
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Program  2:  Change  These  Lines 

3  DIMA$(10),B$(10) ,C$(10) ,D$ (10) 

10  F0RI=1T0T:READA$(I)  ,B$  ( I)  ,C$ (I )  ,D$ (I ) 

:NEXT 
35  X=VAL(K$) :IFX>3THEN30 

50  INPUTN$:Z=LEN (N$) 

55  FORI=lTOT:ONXGOStJB60,65,70:NEXTI:GOTO 
15 

60  IFN$=LEFT$ (C$(I) , Z ) THENG0SUB8 5 

65  IFN$=LEFT$ {A$ (I) , Z ) THENG0SUB8 5 

70  IFN$=LEFT$ (D$ (I) , Z ) THENGOSUB85 

Program  3:  Add  These  Lines 

26  PRINT"{4  SPACES}3,  COMPUTER 
42  IFX=3THENT$="C0MPUTER" 

61  RETURN 

66  RETURN 

71  RETURN 

Program  4:  Drop  These  Lines 

75  IFNS=LEFT$ (C$ (I) , Z ) THENGOSOB85 

80  NEXTI:G0T015  Q 


COMPUTEI 

The  Resource. 


COMMODORE 

64 

by  Tim  Onosko 

A  concise,  handy  guide  ttiat  offers  a  complete  sUrt-to-finish 
approach  to  the  Commodore  64  and  the  new  portable 
version!  Designed  for  users  with  little  or  no  computer 
experience,  this  easy-to-read  text  explains  what  the 
Commodore  54  is  all  about  and  how  to  use  it— complete  with 
step-by-step  instructions  for  BASIC  programming  as  well  as 
important  information  on  a  wide  variety  of  applications, 
including  word  processing  .  .  .  color .  . .  graphics  .  .  . 
sound  .  .  .  music  .  .  .  games  .  .  .  and  much  more ! 

1 983/384pp/paper/D3804-4/S  14.95 

Contact  your  local  bookstore  or  computer 
store  today  or  write 
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Robert  J.  Brady  Co. 
,       Bowie,  MD  20715  •  30I-262-630O 

**      A  Prentice-HiU  Publishing  &  Communicilions  Compuir 


TELEGAMES 

Computer  Games  By  Phone 


John  Blackford 


A  new  species  of  game  is  snddenhf  gaining  in  popularity. 
It's  the  tckgamc  -  played  over  the  phone  lines.  In  some 
versions,  you  play  against  the  computer;  in  others, 
many  players  can  join  in  a  single  game.  When  one  player 
makes  a  move,  the  others  see  it  almost  instantly.  Such 
games  allow  team  efforts  and  that  opois  up  an  intriguing 
new  set  of  possibilities. 


In  the  movie  WarGames,  a  high  school  student 
accidentally  taps  into  NORAD's  war-game  com- 
puter. The  computer,  which  is  equipped  with 
artificial  intelligence  programs,  is  prepared  to 
play  such  favorites  as  chess,  tick-tack-toe,  and 
global  thermonuclear  war.  After  the  student 
chooses  the  latter,  the  computer  won't  quit, 
seizing  control  of  launch  codes  and  missile  silos 
in  preparation  for  a  real  nuclear  strike. 

How  did  the  student  bring  about  this  near 
disaster?  Practically  the  same  way  that  people 
around  the  country  now  call  up  computerized 
information  services  and  use  them  to  play  games: 
he  put  his  telephone  receiver  in  a  modem  -  a  de- 
vice connecting  the  computer  to  the  phone  lines  - 
readying  his  computer  to  call  another  computer. 

Many  information  serv'ices  contain  -among 
other  things  -  a  library  of  games,  which  people 
can  call  up  and  play.  In  some,  users  play  against 
the  computer,  as  in  WarGaities.  In  others  -  the 
multiplayer,  interactive  games  -  the  computer 
acts  as  a  referee,  doing  the  housekeeping  chores, 
accounting  for  players'  moves,  and  generally 
running  the  game.  At  present,  interactive  gaming 
is  available  only  from  CompuServe  Information 
Service,  though  The  Source  and  Delphi  are  working 
to  catch  up. 

Only  At  Lunch  Hour 

CompuServe  got  a  head  start  in  interactive  games 
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by  chance.  The  company  began  as  a  data  base  for 
business  users,  offering  stock  market  quotes, 
sugar  futures  quotes,  and  the  like  during  the  day. 
After  a  few  years  of  setting  up  such  services,  Russ 
Ranshaw,  one  of  the  company's  programmers, 
decided  to  create  a  simple  space-war  game  called 
Space  Wars  (SPCWARS)  for  the  recreational  use 
of  other  employees. 

"It  seemed  like  a  logical  thing  to  do,"  he  says. 
"But  it  got  so  darned  popular  that  people  were 
playing  all  the  time."  After  looking  the  other  way 
for  some  time,  company  officials  eventually  lim- 
ited game  access  to  luncli  hour.  Even  that  didn't 
do  the  trick,  so  finally,  in  1976,  the  game  was  com- 
pletely banned  from  CompuServe  -  and  it  wasn't 
to  be  found  in  the  memory  banks  for  several  years 
after  that. 

As  personal  computers  began  reaching  homes 
in  increasing  numbers,  planners  at  CompuServe 
(and  other  information  utilities)  decided  to  make 
their  services  available  to  home  users  at  reduced 
rates  during  off-hours.  To  make  the  service  at- 
tractive to  non-business  users,  some  new  features 
were  added.  One  of  the  first  was  SPCWARS,  and 
it  proved  just  as  popular  as  it  had  been  during 
lunch  at  CompuServe.  In  fact,  it  and  two  other 
interactive  space  games  added  later  are  now 
among  the  most  widely  used  parts  of  the  system. 

SPCWARS  is  fairly  simple  to  play.  The  com- 
mands aren't  hard  to  follow,  and  a  help  function 
permits  you  to  learn  the  rules  as  you  play.  It's  an 
interactive  game  in  which  everyone  is  gunning 
for  any  player  who  signs  onto  the  system.  You 
can  hide  in  clouds,  duck  around  stars,  and  even 
display  the  section  of  the  galaxy  your  ship  is 
probing.  Since  true  graphics  aren't  possible,  the 
display  consists  of  various  symbols  and  letters  to 
designate  the  location  and  direction  of  your  ship 
and  the  other  objects  in  the  game.  As  more  people 


Last  night,  39  musicians  Had  a 
CompuServe  conference,  So  did  31  M.D.S, 
49  Sports  Fans  And  640  Apple  Polishers, 

And  No  One  had  To  leave  home. 


The  Electronic  Forum, 
Cheaper  than  Long  Distance 
and  Much  More  Rewarding. 

Every  night  on  the  CompuServe 
Information  Service,  professional 
and  social  groups  discuss  a  wide 
range  of  subjects.  From  what's  new 
in  medical  technology  to  what's 
nouvelle  in  continental  cuisine. 

And  every  day  more  computer 
owners  who  share  a  common 
interest  are  discovering  this  exciting 
new  way  to  exchange  ideas  and 
even  transfer  hard  copy  data. 


And  besides  electronic  forums, 
they  leave  messages  for  each  other 
on  our  national  bulletin  board, 
"talk"  informally  on  our  CB  simulator, 
and  communicate  via  CompuServe's 
electronic  mail. 

But  best  of  all,  in  most  cases, 
CompuServe  subscribers  get  all  of 
these  state  of  the  art  communications 
options,  plus  a  world  of  on-line 
information  and  entertainment  for 
the  cost  of  a  local  phone  call  plus 
connect  time. 

To  become  part  of  this  flexible 
communications  network,  all  you 


need  is  a  computer,  a  modem  and 
CompuServe.  CompuServe  connects 
uitli  almost  any  personal  computer; 
terminal,  or  communicating  word 
processor. 

To  receive  an  illustrated 
guide  to  CompuServe  and  learn  how 
you  can  subscribe,  contact  or  call: 


CompuServe 

Consumer  Inlormaiion  Se™co  PO  Sox  20212 
5000  Arlinglon  Centre  Blvd   Columbus.  OH  43220 

800-848-8199 
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sign  onto  the  game,  the  size  of  the  playfield  ex- 
pands, and  if  the  number  of  players  gets  unwieldy, 
the  host  computer  starts  a  new  game  for  the 
newcomers. 

No  Help  In  Sight 

Two  other  currently  available  interactive  games 
are  exceedingly  complex.  Forget  trying  to  learn 
them  as  you  go.  Before  you  even  iigure  out  how 
to  move  your  ship,  you'll  see  a  long  string  of  mes- 
sages race  across  your  screen.  You  are  under  at- 
tack. The  help  command  no  longer  works.  You 
may  notice  the  coordinates  of  the  attacking  ship 
and  attempt  to  direct  some  phaser  fire  his  way. 
But  suddenly  it's  over.  As  you  try  to  figure  out 
what  happened,  you'll  get  a  message  like,  "Sorry, 
Cadet,  you're  dead.  You  didn't  cut  it  in  Mega  Wars." 

Save  yourself  some  embarrassment  -  and 
wasted  time  -  and  order  the  instruction  book  before 
trying  to  play  this  one.  You  can  order  on-line 
(through  your  computer)  or  by  writing  CompuServe 
direct  (5000  Arlington  Centre  Boulevard,  P.O.  Box 
20212,  Columbus,  OH  43220). 

DECWARS  was  the  first  really  complex  inter- 
active game.  It's  actually  a  revision  of  a  space  game 
that  had  been  residing  for  some  years  on  a  main- 
frame at  the  University  of  Texas.  Ranshaw  got  it 
and  worked  obsessively  to  get  rid  of  all  the  bugs. 
The  task  proved  more  than  he  had  bargained  for, 
and  he  now  thinks  he  could  have  done  the  whole 
thing  from  scratch  in  less  time.  Still,  reaction  was 
favorable,  right  from  the  start.  Players  signed  on 
again  and  again  to  play.  A  special  interest  group 
(SIG)  was  even  formed  for  DECWARS  fans.  Users 
would  use  a  special  area  of  CompuServe  to  exchange 
comments  and  ideas  about  the  game. 

Some  of  these  players  began  suggesting  im- 
provements, and  Ranshaw  got  in  touch  with  them 
to  refine  the  concept  for  an  improved  game.  In  both 
games,  players  can  form  teams,  but  the  regulars 
thought  Mega  Wars  -  the  upgraded  version  -  should 
also  assign  ranks  based  on  past  performance.  This 
would  reward  ability,  yet  allow  beginners  to  fly 
more  durable  ships,  increasing  their  survival  time 
immensely. 

After  a  long  development  -  marked  by  en- 
thusiastic suggestions  from  nearly  everyone  -  the 
game  went  on-line.  Immediately,  CompuServe  was 
flooded  with  suggestions  for  improvement.  People 
would  sign  on  the  DECWARS  SIG  and  fill  the  screen 
with  criticisms.  It  became  a  significant  problem. 

After  that  experience,  Ranshaw  says  they  all 
realized  that  while  suggestions  are  great,  there 
comes  a  time  when  the  programmer  simply  must 
do  what  seems  best,  letting  others  dedde  whether 
the  game's  fun  to  play.  In  spite  of  criticism  by 
DECWARS  fans.  Mega  Wars  went  on  to  become 
highly  successful.  At  present,  it  is  CompuServe's 
second  most  profitable  offering  -  behind  a  Simula- 
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tion  of  CB  radio  that  permits  people  around  the 
nation  to  sign  on  and  chat. 

Old  Favorites 

Although  CompuServe  has  the  only  interactive 
games  right  now,  traditional  favorites  played  against 
the  computer  are  popular  on  all  systems.  Other 
information  utilities,  such  as  The  Source,  Dialog, 
and  Delphi,  also  offer  single-player  games  on-line. 
There  are  adventure-type  classics  such  as  Wiimpus, 
Star  Trek,  and  Zork  as  well  as  computer  versions  of 
such  popular  games  as  Othello,  backgammon,  and 
even  chess.  Most  of  the  companies  also  offer  card 
games,  roulette,  and  dozens  of  other  brain  teasers. 

To  supplement  such  traditional  games,  The 
Source  and  Delphi  have  their  programmers  working 
hard  to  complete  several  multiplayer  games.  The 
Source  isn't  saying  what  titles  it's  creating,  but 
Delphi  is  finishing  up  two  space  games,  Conquest 
and  Parsec,  and  will  introduce  more  fantasy-oriented 
fare,  too:  Scales  of  the  Cods,  a  medieval  adventure, 
and  Tiiiielords,  a  game  which  involves  exploration 
of  "the  fourth  dimension." 

As  Delphi  tried  to  hammer  these  into  shape, 
its  own  users  beat  it  to  the  punch,  creating  several 
multiplayer  games  right  on  the  system.  One  player, 
known  as  the  "Dragon,"  served  as  dungeon  master 
for  a  couple  of  adventure  games.  The  players  took 
advantage  of  the  bulletin  board  and  electronic  mail 
ser\aces  to  create  the  games.  Now  Delphi  has  made 
special  space  available  for  the  game  devotees. 
though  these  adventures  have  generated  excite- 
ment, they  aren't  pro^rrtmmfrf  games.  Instead,  it's 
the  players  themselves  who  make  things  happen. 
Users  create  their  own  story,  using  the  dungeon 
master  to  communicate  with  others.  That's  actually 
part  of  the  idea  at  Delphi:  the  service  should  change 
to  reflect  the  needs  of  users.  Says  president  Wes 
Kussmaul,  "Delphi  is  almost  a  creation  of  the  users 
-  they  are  the  ones  who  bring  it  to  life." 

Interactive  Games 

What  is  it  that  makes  interactive  games  hard  to 
create?  According  to  Ranshaw  -  and  he's  built  every 
one  that's  commercially  available  -  they  require 
tricky  programming  with  built-in  safeguards  to 
protect  the  game  when  someone  drops  out.  Says 
Ranshaw,  "What  if  you  are  playing  a  four-card 
game,  and  one  player's  cat  knocks  his  modem  off 
the  table,  disconnecting  the  phone?  Suddenly  the 
player  is  gone.  Do  you  step  in  with  the  computer 
and  have  it  play  for  the  missing  person,  or  bomb 
the  whole  game?" 

The  ideal,  according  to  Ranshaw,  is  to 
minimize  computer  involvement.  But  in  a  case 
like  the  example  above,  the  program  would  have 
to  take  the  missing  hand.  Delphi's  Kussmaul  has 
a  different  philosophy,  noting  that  if  you  are 
playing  a  real  game  of  bridge,  and  someone  walks 
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off,  the  game  is  over.  The  same  should  be  true  of 
interactive  computer  games,  he  thinks. 

A  tougher  problem  arises  with  muitiplayer 
games  such  as  Mega  Wars.  If  the  program  isn't 
properly  done,  the  game  can  crash  when  one 
player  pulls  out,  destroying  what  may  be  hours 
of  effort  for  some  of  the  players.  To  prevent  this, 
each  player  is  considered  to  be  a  separate  "case" 
by  the  host  computer.  The  game  program  controls 
each  player's  input  individually.  Thus,  if  someone 
drops  out,  his  or  her  specific  case  is  closed,  but 
the  game  data  remains  intact. 

Graphics  To  Come 

All  the  games  currently  available  through  infor- 
mation utilities  are  done  in  alphanumeric  charac- 
ters. Whatever  you  see  on  the  screen  could  be 
typed  on  paper  with  a  standard  computer  printer. 
In  the  early  days  of  telecommunications,  a  set  of 
standard  characters,  called  the  ASCII  code,  was 
developed  to  improve  the  service  beyond  that 
available  on  teletype  machines.  ASCII  permits 
upper-  and  lowercase  letters  plus  punctuation 
marks  and  a  few  control  codes.  The  graphics 
characters  on  home  computers  aren't  standard 
ASCII.  Since  information  services  must  be  able 
to  communicate  with  niany  different  computer 
brands,  they  are  limited  to  the  ASCII  character  set. 

That  could  change,  however.  Developers  at 
CompuServe  are  trying  to  create  telegames  with 
movable  graphics.  Besides  the  differences  be- 
tween computers,  the  limitations  of  the  phone 
lines  themselves  hinder  graphics  transmission. 
Although  baud  (bits  per  second)  rates  of  1200  or 
higher  are  possible,  modems  capable  of  such 
speeds  are  still  fairly  expensive.  Most  home  users 
communicate  with  information  utilities  at  a  lei- 
surely 300  baud,  far  too  slow  to  permit  movement 
of  graphics  on  your  screen.  But  the  people  at  Com- 
puServe are  working  on  a  way  to  get  around  this 
bottleneck. 

They  are  attacking  the  problem  in  two  ways; 
first,  by  creating  software  for  each  computer  type, 
and  second,  by  devising  wavs  to  transmit  graphics 
information  without  actuallv  having  to  transmit 
the  entire  picture.  Most  videogames  consist  of  a 
background  design  (the  playfield)  and  objects 
that  move  within  it.  CompuServe's  game  de- 
signers hope  to  define  the  playfields  and  graphics 
shapes  and  download  the  definitions  to  the  user. 
Then,  the  host  computer  only  needs  to  transmit 
enough  information  to  move  the  predefined 
shape.  Software  purchased  by  each  user  will  make 
the  graphics  information  compatible  with  his  or 
her  particular  computer. 

New  Directions 

Such  efforts  may  be  only  the  beginning.  With 
inexpensive  modems  and  software  now  available, 
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more  and  more  home  computerists  are  reaching 
information  sources.  And  such  organizations 
have  found  to  their  surprise  that  there's  a  healthy 
profit  in  home-oriented  services.  A  company  by 
the  name  of  Gameline  even  has  a  plan  to  sell  plug- 
in  cartridges  to  allow  Atari  VCS  game  machines 
(11  million  are  presently  in  use)  to  download  game 
software.  And  parents  will  have  a  special  code 
enabling  them  to  limit  their  children's  use  of  the 
device. 

In  fact,  activity  could  become  so  widespread 
that  phone  lines  might  be  filled  up  with  people 
using  personal  computers  plugged  into  various 
data  bases,  including  teletex,  on-line  bulletin 
boards,  and  even  users  chatting  directly  to  one 
another.  Bell  telephone  researchers  are  reportedly 
concerned  that  the  entire  phone  network  could 
become  overloaded  if  market  penetration  of  tele- 
computing services  reaches  as  little  as  3'/2 
percent. 

To  avoid  these  problems,  alternatives  such  as 
cable  TV  and  local  communications  networks 
may  be  used.  The  Games  Network  is  planning  to 
offer  a  cable  channel  dedicated  to  videogames. 
Sytek,  in  cooperation  with  General  Instruments 
Corporation,  plans  to  introduce  a  series  of  local, 
high-speed  communicatitins  networks  using  cable 
TV  lines.  These  would  be  cheaper  than  comparable 
ones  offered  by  American  Bell,  and  would  be 
compatible  with  personal  computers.  Such  a  sys- 
tem could  support  extensive  graphics,  because  of 
the  large  transmission  capacity  of  cable  lines. 

Whichever  specific  projects  eventually  suc- 
ceed, the  prospect  is  for  more  and  better  computer 
games  played  over  the  communication  lines.  Just 
as  home  computers  changed  in  only  a  few  years 
from  hobbies  to  mass-market  items,  telegaming  is 
now  poised  to  be  the  vanguard  of  a  massive  up- 
surge in  computing  by  phone.  © 
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NONVIOLENT 
GAMES 


Kathy  Yakal,  Editorial  Assistant 


The  violence  that  is  inherent  in  many  of  today's  video 
games  is  disturbing  to  some  people.  Others  don't  see  it  as 
a  negative  influence;  they  stress  the  positive  aspects  of 
playing  and  programming  videogames.  In  this  article, 
loe  explore  both  sides  of  this  controversial  issue,  and  look 
at  some  software  designers  who  are  providing  alternatives 
to  typical  arcade  games. 


VIDEO  GAMES  (see  Mureler) 

This  entry  can  be  found  in  The  New  York  Times  Index 
for  January  146, 1983.  The  article  alluded  to  is  a 
small  item  in  the  January  9  Times  about  a  high 
school  senior  in  Dallas  who  was  "shot  to  death  in 
the  parking  lot  of  an  arcade  after  a  quarrel  over  75 
cents  worth  of  video  display  games." 

It's  not  so  unusual  anymore  to  hear  about 
someone  being  killed  over  something  rather  trivial. 
But  what  might  make  this  act  of  violence  significant 
to  some  people  is  its  relationship  to  video  games. 

Video  games  embody  competition.  In  order  to 
win  (and  it's  a  temporary  victory),  you  have  to 
shoot  down  spaceships  or  gobble  up  something  or 
rescue  creatures  in  perU.  Meanwhile,  someone  or 
something  is  always  after  you,  trying  to  destroy  you. 

Does  this  mean  that  a  long  afternoon  at  the 
Asteroids  machine  wUl  make  you  want  to  inflict 
bodily  harm  on  the  first  person  who  gives  you  a 
funny  look?  Some  studies  have  shown  that  a  per- 
son's blood  pressure  will  rise  and  pulse  quicken 
after  playing  video  games.  But  can't  the  same  thing 
happen  when  you're  up  to  bat  in  the  big  softbaU 
game  or  trying  to  meet  an  impossible  deadline  at 
work  or  even  watching  a  frightening  movie? 

Game  As  Villain 

The  1969  rock  opera  Tommy,  by  The  Who,  is  the 
story  of  a  young  deaf,  dumb,  and  blind  boy  who  is  a 
champion  at  the  pinball  machines.  He  becomes  a 
cult  hero  as  a  result  of  that  and,  after  he  regains  his 
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senses  later  in  the  story,  is  worshipped  by  devoted 
followers  who  try  to  emulate  his  pinball  wizardry. 

If  Tommy  were  written  today,  we  might  be  hum- 
ming along  to  "Pac-Man  VN'izard,"  instead  of  "Pin- 
ball Wizard."  Ever  since  the  introduction  of  Atari's 
Pong  game  in  1972  and  the  ensuing  evolution  of  the 
video  arcade  game,  these  high-tech  pinball 
machines  have  been  showing  up  in  cameo  roles  in 
movies  and  television.  And  they're  usuaUy  the  bad 
guys. 

In  this  year's  The  Star  Chamber,  lawyer  Michael 
Douglas  can't  even  get  a  "Hi,  Dad  "  from  the  kids 
because  they  won't  turn  away  from  their  home 
video  game.  A  fight  over  an  arcade  game  that 
causes  television  interference  in  a  restaurant  gets  a 
young  woman  involved  with  a  young  boy  who  does 
nasty  things  to  people  he  doesn't  like  in  Twilight 
Zone:  The  Movie.  And  IVflrGames  follows  the  activ- 
ities of  a  teenager  who  almost  instigates  World  War 
III  by  tapping  into  the  national  defense  system  with 
a  home  computer,  a  modem,  and  some  big  floppy 
disks.  Worse  than  that,  he's  flunking  biology. 

It's  not  just  the  computers  themselves  that  are 
shown  in  a  less-than-positive  light.  The  player's  in- 
volvement with  the  computer  or  arcade  game,  as 
portrayed  by  movie  makers,  usually  points  out 
some  kind  of  character  flaw  that  is  intensified  by  his 
obsession  with  these  high-tech  villains. 

Movies  may  not  be  the  best  way  to  gauge  a 
society's  attitudes,  but  the}'  often  reflect  sources  of 
conflict  which  are  easily  identifiable.  And  video 
games  certainly  seem  to  be  that  right  now.  You 
might  be  hard  pressed  to  find  a  young  person  who 
doesn't  have  an  opinion  about  Donkey  Kong,  or  who 
couldn't  at  least  hum  the  theme  song. 

Teaching  Disassociotion 

There  does  seem  to  be  a  degree  of  backlash  against 
video  games.  Joseph  Weizenbaum,  author  of  Com- 
puter Power  and  Human  Reason  and  Professor  of 
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ili"  1 1 1  IT  iVl  1 1 1  IUHMlid  is  the  ultimate  weapon  in  this  unique  war  game. 
Strategy,  not  force,  is  the  key  to  victory  as  you  move  your  battalion  through  a 
series  of  testing  skirmishes  and  battle  actions.  Your  ability  to  command,  to  give 
orders,  to  move  your  troops  skillfully  determines  the  success  of  your  assault 
and  combat  operations.  Operation  Whirlwind  requires  the  concentration  of 
chess— a  typical  game  may  take  between  one  and  three  hours— and  the 

ability  to  master  the 
many  tactics  of  wag- 
ing a  full  scale  war. 
How  well  you  can 
focus  your  strategic 
energies  will  decide 
whether  your  vic- 
tory is  Question- 
able, Marginal, 
Tactical,  Strategic  or 
a  Breakthrough.  A 
great  game  for  the 
thinking  game  player. 
Available  on  disk. 


■  ii  fjii it!  1 1  •I'iJ  R        Pit  your  concentration  against 
another  player  or  the  computer.  Here's  a  puzzle  game  that 
will  keep  the  whole  family  bemused,  befuddled  and  play- 
ing happily  for  hours.  A  grid  of  36  numbered  boxes  con- 
ceals an  animated  menagerie  of  colorful  characters, 
creatures  and  objects.  The  object  of  the  game  is  to  match 
identical  squares  and  then  solve  a  hidden  word  puzzle. 
There  are  many  game  variations  with  puzzles  that  are 
frontward,  backward,  or  scrambled.  Matchboxes.  It's  the 
most  memorable  memory  game  you've  ever  played! 
Available  on  disk  and  cassette. 

OPERATION  WHIRLWIND  AND  MATCHBOXES 

FOR  THE  ATARI®  HOME  COMPUTERS.  ATARI«isa.rademarkorA.=ri.tac. 

Make  sure  to  look  for  The  Arcade  Machine™and  8r0derbund's 
new  game  phenomenon,  Lode  Runner™— also  for  Atari. 


^Broderbund  SoftujarB 

Discover  the  Diffeience 

17  Paul  Drive    San  Rafael,  CA  94903 
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finsitfy,  aliens  jour  kids  can  reason  with 

instead  of  destroy 


Spinnaker  computer  gannes  are  lots  of  fun.  They're  also 
instructive.  Mot  destructive.  TInat's  why  IM  5EAF^CM  OF  THE 
M05T  AMAZiriQ  THIMQ'"lets  your  hids  negotiate  w\Vn  aliens. 
Not  destroy  them. 

IT'S  AMAZinQLY  FUJI! 

The  Most  Amazing  Thing  is  out  there  somewhere.  Find- 
ing it  won't  be  ea^y  Luckily,  your  kids  will  have  the  help 
of  old  Uncle  5moke  Bailey.  Because  they'll  have  to  fiy  the 
B-liner,  avoid  dangerous  Mire  Crabs,  and  trade  with  aliens. 

It  takes  skill,  persistence  and  imagination  to  find  The  Most 
Amazing  Thing.  Because  it's  the  most  elusive  thing  in  the 
whole  wide  galaxy  But  that's  what  makes  it  so  exciting. 

IT'5  AMAZIMQLY  EDUCATIOMAL! 

Like  all  Spinnaker  games,  in  5EARCh  OF  TME  M05T 


AMAZIMQ  TliiriQ  has  real  educational  value. 

Your  kids  will  sharpen  their  ability  to  estimate  distances 
and  quantities,  and  will  become  more  aware  of  direction 
and  time.  They'll  develop  a  knack  for  economic  principles, 
and  learn  to  solve  problems  through  thai  and  error, 

5o  if  you're  looking  for  exciting  computer  games  that 
give  your  kids  something  to  think  aboutjust  go 
in  5EARCN  OF  THE  M05T  AMAZIMQ  ThihCi 
at  your  local  retailer'  It's  so         ^^^^fijSSivi^- 
much  fun  you'll  probably  be        ^SS^^Sm"^ 
tempted  to  play  it  yourself.  wQlSt  >^ 


■n  *jt:AHCrl  or  TdC  MO'jI  /.MAZIMG  T-1  hC  ,'.,co^ipJ( 
bie  UJitli  Apple*  l&n,'  Atari*  ar.r}  Cammodorp  64  * 
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We  make  learning  fun. 

Apple,  lan  and  Msr,  are  fegiste^ea  iraaemai  ks  ot  Aooie  ComDuter,  inc .  internatioral  B  jrnness  Machines  Cnrp  aid  Atari.  lf«: .  lespectivelv  Cammodof  e  64  li  d  tracemaih  ol  Cnmmodofe  Ciecitonica  Umited 
in  5EftRCn  OF  Tnf  most  AMAZIflO  TmflQ  fomputei  program  15  a  ttaOcmark  of  ^plnriahcr  Software  Corp 
C  1 965,  Spinndher  bo'lw^f  e  Co^p  All  rigmi  reserved 
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Introdiicing  Snooper  Troops  detectiye  series. 

Educational  games  ftiat  turn 

ordinary  homes  into  Sherlock  homes. 


Where  can  you  find  educational  computer  gannes  that 
your  hids  will  really  enjoy  playing? 

Elementary  my  dear  Watson,  Prom  SpinnaKer 

Our  ShOOPER  TROOPSdetectiue  games  are  fun,  exciting 
and  challenging.  And  best  of  all,  they  have  real  educationa! 
value,  5o  while  your  kids  are  having  fun,  they're  learning. 

As  a  Snooper  Trooper  your  child  will  have  a  great  time  solv- 
ing the  mysteries.  But  it  will  take  some  daring  detective 
work.  They'll  have  to  question  suspects,  talk  to  mysterious 
agents,  and  even  search  dark  houses  to  uncover  clues. 

Luckily  the  program  provides  your  kids  with  everything 
they  need:  aSnoopMoblie,  a  wrist  radio,  a  5noopNet  com- 
puter, a  camera  for  taking  5noopshots  and  even  a  notebook 


for  keeping  track  of  Information. 

5N00PEf^  Tf^0OP5  detective  games  help  your  children 
learn  to  take  notes,  draw  maps,  organize  and  classify 
information  and  they  help  develop  vocabulary  and 
reasoning  5kill5..AII  while  your  kids  are  having  a  good 
time. 

5o  if  you  want  to  find  educational 
games  that  are  really  fun,  here's 
a  clue:  Ask  your  local  retailer  for 
5nOOPERTf^OOP5  computer 
games," 

'Available  in  disks  for  IBM," 
Atari,"  Apple,'  Commodore  64." 
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\Afe  mate  learning  fun. 


%■  1963.  SDirindh.er  ^oftiwdreCutp  Allnghlbreit^ved  ftpplt.  iBHond  Awnareregis'eied  trademarHs  of  Apple  Ca-npuler,  Int.  IntcndlKJtylBuSjneisMJCtunei.CofD  d'ldAidd  Inc.  re^ectiuelv  Conwriodnrc  b4  i^ii  traderrhjth 
of  Commodore  Eiec'ronicaLimiied  brtQOPtH  IftOOF5ci)fnoutei  pfotirdm  i*d  irademjrKol5pinnaher5o(twaie  Corp 


Computer  Science  at  the  Massachusetts  Institute  of 
Technology,  has  an  explanation  for  why  the  back- 
lash exists.  "The  video  arcade  is  the  modern  version 
of  the  pool  hall.  Some  people  are  opposed  to  them 
for  the  same  reasons  they  opposed  pool  halls.  This 
reasoning  is  not  relevant,  and  it  masks  other  things 
that  are  much  more  important. 

"It's  just  as  Marshall  McLuhan  predicted:  the 
next  medium  takes  aspects  of  the  previous  medi- 
um. In  this  case,  video  games  have  taken  the  worst 
of  television:  its  mindless  violence,  which  is  ex- 
pressed in  all  the  shoot-em-ups."  Weizenbaum  cites 
the  television  show  "Knight  Rider"  as  an  example. 
"It's  not  that  that  one  is  exceptionally  violent.  It  just 
exaggerates  the  cartoon-type  violence." 

Then  why  don't  parents  get  as  upset  over  car- 
toons as  they  do  video  games?  Weizenbaum  doesn't 
know.  'It's  the  same  thing  you  see  during  the  week 
on  regular  TV  shows.  Only  the  television  acts  as 
babysitter  on  Saturday  mornings/'  he  says. 

Some  people  claim  that,  even  though  video 
games  may  be  as  violent  as  television,  they  are 
more  interactive.  "The  advertising  claim  for  video 
games  is  that  you  can  actually  participate.  But  what 
is  it  that  you're  actually  participating  in?  Killing.  You 
can't  win  —  all  you  can  do  is  survive  longer  than 
anyone  else." 

Weizenbaum's  chief  criticism  is  that  what's  be- 
ing practiced  in  video  games  is  disassociation. 
"Video  games  encourage  you  to  believe  that  there  is 
no  relationship  between  what  you  are  doing  and 
the  ultimate  victim  of  that  action.  The  crucial  thing 
is  that  these  are  lessons  in  what  it  is  necessary  to  do 
in  order  to  survive  in  this  society.  In  some  sense, 
that's  really  the  social  purpose. 

"It's  like  women  working  in  a  bomb  factory.  If 
they  couldn't  disassociate  themselves  from  what 
they  were  doing,  if  they  were  really  aware  of  what 
they  were  actually  doing,  they  couldn't  do  it,"  says 
Weizenbaum.  "The  same  thing  applies  to  students 
and  teachers  who  believe  that  artificial  intelligence 
is  possible.  It's  very  necessary  in  this  society  to 
render  a  great  many  things  abstract,  to  take  them 
out  of  context" 

Because  of  this,  he  believes,  the  video  arcade  is 
a  "necessary  and  useful  training  ground.  The  video 
game  is  not  the  cause  of  this  societal  trait;  it  is  a 
reflection  of  what  our  society  is.  It  would  be  a 
mistake  to  yell  and  storm  at  the  reflection." 

Lack  Of  Creativity 

Christopher  Cerf  has  been  entertaining  children  for 
a  long  time.  He  founded  the  nonbroadcast  division 
of  Sesame  Street  in  1970,  and  has  written  music  and 
lyrics  for  the  television  show.  Since  the  introduction 
of  microcomputers,  he  has  been  developing  ways  of 
educating  and  entertaining  kids  with  them;  Cerf 
and  Jim  Henson  of  Muppet  fame  created  the  video 
game  version  of  The  Dark  Crystalior  Sierra  On-Line. 
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Joseph  Weizenbaum,  author  of  Computei  Power  and 
Human  Reason. 

Cerf  also  developed  the  original  concept  of  Sesame 
Place,  parks  near  Dallas  and  Philadelphia  which 
house  computer  centers  where  children  can  learn 
to  use  micros. 

And  he  doesn't  believe  that  kids  are  being 
deeply  affected  by  the  violence  in  video  games. 
"I'm  certainly  not  pro-violence,"  Cerf  says.  "I  don't 
want  to  put  it  in  games  that  I  work  on.  But  I  think 
people  greatly  overestimate  the  horrible  dangers  of 
video  games.  Unless  a  chOd  is  greatly  disturbed  in 
some  other  way,  I  don't  think  he's  going  to  go  out 
and  kill  someone  after  playing  a  game  of  Space 
Invaders. 

"I'm  not  den3dng  that  we  don't  aU  have  some 
sort  of  aggressive  instinct.  Look  at  the  way  dogs  will 
have  mock  fights  —  not  really  hurt  each  other,  but 
just  play.  If  the  violence  in  a  game  is  sUIy,  it's  just  as 
good  to  play. 

"Any  medium  that  comes  along  has  a  reaction 
Hke  this.  Look  at  how  horrified  parents  used  to  be 
that  their  children  were  wasting  their  quarters  in 
movie  theaters.  And  in  the  fifties,  it  was  comic 
books.  Doing  anything  in  excess  is  a  problem.  You 
need  to  try  to  see  it  in  perspective." 

Cerf  believes  that  resorting  to  extreme  violence 
in  a  video  game  indicates  a  lack  of  creativity  on  the 
programmer's  part.  "I  was  appalled  by  the  violence 
in  Death  Race  2000.  In  the  last  year  or  two,  program- 


Iiilo  the  violent  world  of  video  gcmies, 

-  — ^^^tomot"  introduces 

WO  of  theFrfendUestr 
#  Fostest^Fun-podwd 

Family  GcHiiesEver! 


ANTeATER.^'^  Ant  or  Anteater— who  will  be  . 
king  of  the  hill?  Somewhere  along  the  twisting, 
turning  tunnels  of  this  marvelous  maze  game  the 
answer  will  be  found.  Until  then,  gamesters  of 
every  age  will  be  caught  up  in  the  non-stop  action 
and  strategy  of  Anteater,  the  game  that's  crawling 
with  arcade  excitement.  Cartridges  for  the 
Atari®  400/800/1 200XL,  Commodore  Vic  20^", 
Commodore  64™,  Texas  instruments  99/4A.™ 


.  TYRO.™  Chased 
k,  by  an  evil  space- 
ship, your  only 
chance  of  es- 
cape is  through 
"knowledge."  Know- 
ledge of  typing  and  spelling. 
The  faster  you  type,  the  better  your 
chance  of  eluding  the  enemy.  Spelling  home- 
work can  be  fun  with  this  fast-paced  game  that  1 
not  only  develops  word  power— but  increases 
your  typing  speed  with  every  fun-filled  hour  as 
you  master  the  typewriter-style  keyboard  of 
personal  computers.  Cartridges  for  the 
Atari*  400/800/1 200XL,  Commodore  Vic  20™, 
Commodore  64™,  Texas  Instruments  99/4A.™ 


ANTEATER  and  TYPO  are  only  two  of  the  exciting 
recreational  and  educational  games  from  Romox'^'' 
See  our  complete  selection  at  your  Romox  dealer. 


Romox  Inc.,  476  Vandell  Way,  Campbell,  CA  95008. 

Homox  is  a  trademark  of  Romox  Inc.  Atari  is  a  trademark  of  Atari.  Inc.  VIC  20  and  Commodore  64  are 
trademarks  of  Commodore  Business  Machines,  Inc.  TI 99/4A  is  a  trademark  of  Texas  Instruments. 


mers  have  been  designing  games  that  are  less 
violent  and  more  creative.  Pac-Man  and  Frogger  are 
good  examples.  So  are  the  new  interactive  fiction 
games." 


''Software  companies  need 

to  be  innovative  about  the 

uses  of  computers  for 

women.  And  that  means 
producing  something  that 

appeals  to  what  women 

traditionaliy  have  valued 

and  needed.  Not  violence." 

Mary  Row^  assistant  to  the 
president,  M.I.T. 


A  Generation  Of  Loners? 

Violence  aside,  some  people  argue  that  video 
games  promote  antisocial  behavior.  Maybe  Galaxia 
won't  make  you  want  to  shoot  everything  in  sight, 
but  how  is  a  child  or  young  adult  going  to  learn 
how  to  interact  with  other  people  if  he  or  she 
spends  a  great  deal  of  time  in  an  arcade  or  the 
house  playing  games  on  the  home  computer? 

Christopher  Cerf  believes  that  computers 
foster,  rather  than  hinder,  communication.  "Com- 
puters as  a  medium  are  one  of  the  most  exciting,"  he 
says.  "They  use  elements  of  many  other  media. 

"In  schools,  kids  get  excited  about  computing. 
They  stay  after  school  and  compare  notes  and  try  to 
work  out  programming  problems.  And  services  like 
CompuServe  and  The  Source  also  tend  to  bring 
people  together.  Kids  who  spend  a  lot  of  time  alone 
with  their  computers  or  in  arcades  would  probably 
be  doing  something  else  alone  anyway. 

"What's  really  interesting  about  this  whole 
computer  business  is  that,  for  the  first  time,  the 
kids  generally  know  more  than  the  adults.  My 
father  was  in  publishing  and  he  read  everything  — 
except  science  fiction.  I  loved  science  fiction  and 
could  recommend  books  to  him.  In  that  way,  I  think 
computers  tend  to  bring  families  together." 

Nothing  For  Women 

There  is  little  question  that  men  are  generally  more 
interested  in  video  games  than  women  are  at  this 
point.  Pac-Man  was  a  breakthrough  game  in  that 
sense;  lots  of  women  liked  it,  perhaps  because  of  its 
apparent  lack  of  violence. 

StiU,  women  are  not  leaping  into  the  computer 
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age  with  the  same  fervor  as  men  seem  to  be.  Mary 
Rowe,  Assistant  to  the  President  at  M.I.T,  thinks 
that  this  is  due  to  a  lack  of  sensitivity  on  the  part  of 
many  software  producers.  And  to  the  fact  that  there 
is  a  lot  of  violence  and  sexism  in  video  games. 

'As  a  feminist,  I'm  concerned  about  the  male 
slant  of  these  things,"  Rowe  says.  "Why  have  com- 
puter companies  made  so  few  attempts  to  produce 
games  that  are  not  violent  and  sexist? 

"Software  companies  need  to  be  innovative 
about  the  uses  of  computers  for  women.  And  that 
means  producing  something  that  appeals  to  what 
women  traditionally  ha\'e  valued  and  needed.  Not 
violence." 

Rowe  does  believe  that  some  software  com- 
panies are  taking  risks  and  developing  programs 
that  meet  these  needs.  "1  became  computer-literate 
on  Infocom's  games.  We  need  more  games  like  that 
that  require  the  player  to  actually  think,  not  just  hit 
the  fire  button  at  the  right  time." 

Subtle  Software 

Nonviolent  games  fare  very  well  on  lists  of  best- 
selling  software  these  days.  Br0derbund's  success- 
ful Choplifter  is  a  good  example.  It's  not  an  abso- 
lutely nonviolent  game  —  there  are  terrorists  and 
enemy  tanks  and  guns  going  off.  But  the  player 
does  not  get  points  for  destroying  things,  only  for 
rescuing  people  from  the  terrorists. 

However,  software  companies  which  are  pro- 
ducing nonviolent  games  are  not  necessarily  trying 
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Christopher  Cerf  is  currently  zuorking  on  a  nonviolent  video 
game,  Pigs  In  Space. 
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YOU'LL  LIKE  IT! 

ACTUALLY,  YOU'LL  LOVE  IT! 
Here's  why!  TRIAD  is  nine  separate  pulse-pounding  games  in  one  package. 
Select  one  of  nine  weird  alien  menaces  to  battle  from  Itie  Master  Board.  But 
careful  —  ttiese  guys  can  be  tricky!  Defeat  thiree  aliens  in  a  row  tic-tac-toe 
style  and  you  earn  a  crack  at  the  next  skill  level. 

The  whole  neighborhood'll  thrill  to  TRIAD'S  crisp  colors,  super  sounds  and 
the  oddest  assortment  of  alien  "baddies"  ever  assembled  on  one  screen. 
Snappy  arcade  excitement  for  all  ages! 

TRIAD  —  from  Adventure  International.  Why  get  one  game  when  you  can 
have  nine? 


TRIAD 


—  YOU'LL  LJKt  IT! 


APPLE  (DOS  3.3  REQUIRED)  48K  DISK  S34.95 

ATARI  48K  DISK  S34.95 

COMMODORE  64  TAPE  &  DISK  S34.95 

TRS-80  CoCo  32K  TAPE  S34.95 

ANOTHER  WINNER  FROM 


dventut€. 

INTERNATIONAL 

A  DiVi^iQN  Of  scot'  4DfiU5  rhC 
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to  counteract  any  backlash  against  video  games.  Pat 
Marriot,  of  Electronic  Arts,  believes  that  people's 
opposition  to  video  games  is  "an  emotional  thing. 
Parents  wondering  if  their  kids  should  be  hanging 
out  in  arcades.  Donkey  Kong  and  Pac-Man  are  not 
really  violent.  It's  just  the  environment  of  a  video 
arcade  that  is  disturbing. 

"We  look  for  quality  and  uniqueness  in  our  pro- 
grams/' says  Marriot.  "We're  not  reacting  against 
anything,  we're  going  for  quality.  We  look  for 
authors  whose  values  r.re  consistent  with  those  of 
the  company.  Each  of  our  designers  has  a  story  to 
tell,  and  that  story  becomes  the  product. 

"We  don't  really  consciously  try  to  make  our 
games  nonviolent,  but  because  of  our  authors'  basic 
philosophies,  they  usually  do  not  involve  violence" 
says  Marriot.  She  points  to  Hardhat  Mack  as  an  ex- 
ample: "The  character  is  very  appealing.  There's 
lots  of  humor  in  it.  It  seems  to  appeal  to  younger 
girls  and  to  people  who  don't  necessarily  like  games.' 

The  Adventure  AHemaiive 

A  video  game  doesn't  have  to  have  blasting  guns 
and  anguished  screams  to  be  violent.  Even  the 
pacifist  Pac-Man  has  his  own  sublimated  violence. 
He's  a  cute,  nonthreatening  little  guy,  but  there  are 
four  potential  killers  on  his  trail.  To  avoid  being  de- 
stroyed, he  must  turn  around  and  try  to  destroy 
them  first. 

It  may  be  impossible  to  create  a  video  game  that 
does  not  incorporate  some  amount  of  violence, 
however  unobtrusive  it  may  be.  Games  involve 
competition.  Even  if  you're  just  playing  against 
yourself,  you're  always  trying  to  overcome  some- 
one or  something. 

But  in  some  games,  you  can  actually  benefit  by 
resisting  the  urge  to  commit  a  violent  act.  In  the  text 
adventure  Witness,  by  Infocom,  you  play  a  detective 
trying  to  solve  a  murder  case.  While  you're  trying  to 
find  the  murderer,  you  have  ample  opportunity  to 
rough  up  some  of  the  suspects  if  you  like.  The  game 
was  designed  to  anticipate  a  variety  of  responses, 
even  violent  ones. 

A  violent  response,  though,  is  counter- 
productive, says  Marc  Blank,  Vice-President  of  Prod- 
uct Development  at  Infocom.  If  a  player  reacts  that 
way,  the  result  is  not  good,  and  may  lead  to  some- 
one else  getting  killed. 

Yet  the  designers  at  Infocom  did  not  set  out  to 
produce  games  with  pacifistic  messages.  "I  don't 
think  violence  plays  any  part  in  our  choices,"  says 
Blank.  "We're  not  making  a  conscious  effort  to  be 
nonviolent.  We're  just  trying  to  produce  programs 
of  more  literary  quality." 

This  may  be  a  contributing  factor  to  Infocom's 
popularity  with  women,  a  market  that  software 
producers  are  sometimes  finding  difficult  to  please. 
'There  is  very  little  software  for  young  women," 
says  Blank.  "Women  generally  read  more  than 
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men,  so  our  adventures  cire  more  appealing  to  them  " 

Better  Technology? 

Maybe  the  arcade  is  the  monster,  not  the  video 
game.  According  to  an  article  in  Neiosioeek  (August 
8, 1983),  video  games  peaked  with  an  average 
weekly  earning  of  $140  per  machine  in  1981,  but  last 
year  it  was  down  to  $109.  Is  this  because  people  are 
playing  games  at  home  on  their  personal  com- 
puters and  don't  need  arcades  anymore?  Or  is  it  a 
result  of  the  backlash  against  video  games? 

It  may  be  neither.  Dragon's  Lair,  an  arcade  game 
recently  released  by  Bluth  Animation,  has  people 
lined  up  around  the  block  in  some  cities,  waiting 
for  their  turn  to  play.  Neivsweek  says  single 
machines  featuring  this  game  are  taking  in  up  to 
$1400  per  week.  Even  at  50  cents  a  crack,  that's 
about  a  500%  increase  over  the  current  average 
earnings  of  arcade  games. 

Dragon's  Lair  is  anything  but  nonviolent.  Its 
hero.  Dirk  the  Daring,  must  battle  countless  foes  in 
38  different  scenes  in  order  to  rescue  the  game's 
heroine,  Daphne. 

But  what's  attracting  people  to  it  is  a  new  tech- 
nology that  combines  the  use  of  laser  disks  and 
computers.  Unlike  other  arcade  games,  this  one 
projects  a  movie-quality  image.  It's  like  stepping  in- 
to a  cartoon  and  controlling  the  characters  yourself. 


Dragon's  Lair,  a  popularnew  arcade  game,  combines  laser 
disk  technology  and  computers  to  create  a  movie-like  image.  © 


dilithium  Press  is  cooking  again.  With 
more  than  32  practical,  educational, 
and  fun  programs  specifically  for  your 
microcomputer. 

Here's  what's  on  the  menu : 


Annual 

Hamcode 

Roadrace 

Argo 

Integrate 

Simeqn 

Arithmetic 

Jot 

Sortlist 

Biorhythm 

Kaleido 

Sparkle 

Birthday 

Loan 

Squares 

Checlcbook 

Metric 

Stats 

Cun/e 

Mileage 

Stopwatch 

Decide 

Numbers 

Tachist 

Decode 

Obstacle 

Tune 

Diffeqn 

Pi 

Vocab 

Flasticard 

Powens 

Walloons 

Graph 

Pythag 

Wari 

Groan 

Quest/Exarr} 

Written 

in  easy-to-understand  lan- 

guage,  each  book  contains 

complete 

program  listings  plus  suggested  proj- 
ects. For  only  $19.95,  we  serve  up 
everything  from  math,  to  business,  to 
games  with  color  graphics.  Plus,  you'll 
receive  generous  portions  of  screen 
display  examples  to  help  guide  you 
through  each  program. 

And  we  have  a  b!ue  plate  special! 
Save  your  fingers  from  typing  in  the 
program  by  buying  the  diskette  or 
cassette  for  only  $15  more  ($34.95 
for  the  book/software  package.) 
Fully-tested  and  machine-specific,  our 
sofhware  is  backed  with  a  forever 
replacement  guarantee.  For  questions 
or  problems,  call  our  toll-free  cus- 
tomer service  number. 


You'll  find  dilithium  Software  at 
your  nearest  bookstore  or  computer 
store.  Use  our  toll-free  number  for 
their  locations  or  ask  for  the  latest 
copy  of  our  catalog,  "Brainfood", 
absolutely  free. 

If  your  microcomputer  is  starving 
for  new  projects,  call  today  for 
the  smorgasbord  from  dilithium 
Software. 


I  i 


\ 


dilithium  Software 

PO.  Box  E 

Beaverton,  Oregon  97075 
800-547-1842  or 
646-2713  inside  Oregon 


fl«»t*TliannB«*« 


'^ilTilliliDIii 


dIMEC. 
ismorgasbord 


■!bm  Rugg.  Ptu  FetamaJi 


The 


Btsic 


Clarence  S.  Wtsoo 


Horn 


r/'"=-^2  5.su 


How  To  Type  COMPUTEi's  Programs 


Many  of  the  programs  which  are  listed  in  COMPUTE!  contain 

special  control  characters  (cursor  control,  color  keys,  inverse 
video,  etc.).  To  make  it  easy  tu  tell  exactly  what  to' type  when 
entering  one  at'  these  programs  into  your  computer,  we  have 
established  the  following  listing  conventions.  There  is  a 
separate  key  for  each  computer.  Refer  to  the  appropriate 
tables  when  you  come  across  an  unusual  symbol  in  a  program 
listing.  If  you  are  unsure  how  to  actually  enter  a  control 
character,  consult  your  computer's  manuals. 

Atari  400/800 

Characters  in  inverse  video  will  appear  like:  rrrrrmmT-imr 
Enter  these  characters  with  the  Atari  logo  key.  [A.] . 

Hhm   you   sbb  Typo  Sbb 


tCLE«Wt> 

ESC 
ESC 
ESC 

SHIFT  < 

n 

CI mmr    Scr»en 

tUPJ 

CTRL  - 

t 

Curmor  Up 

{DOMNJ 

CTRL  » 

* 

Cursor-  DoMn 

tLEFT> 

ESC 

CTRL  + 
CTRL  » 

*- 
•* 

Cursor  L*ft 

tRIQHT> 

ESC 

Cursor  Right 

tBACK  3> 

ESC 

DELETE 

4 

Backspaca 

CDELETE> 

ESC 

CTRL  DELETE 

a 

DtflatB  charactvr 

CINSERTJ 

ESC 

CTRL  INSERT 

u 

Insert  character 

CDEL  LINEJ 

ESC 

SHIFT  DELETE 

□ 

Delete  line 

CINS  LIME} 

ESC 
ESC 

SHIFT  INSERT 
TAB 

□ 

Insert  line 

CTABJ 

» 

TAB  key 

tCLR  TAB} 

ESC 

CTRL  TAB 

a 

Clear  tab 

CBET  TflB> 

ESC 

SHIFT  TAB 

a 

Set  tab  stop 

C^LLJ 

ESC 

CTRL  2 

Q 

Ring  buiier 

CESO 

ESC 

ESC 

«. 

Escape  key 

Graphics  characters,  such  as  CTRL-T,  the  ball  chaiacter  •  will 
appear  as  the  "normal"  letter  enclosed  in  braces,  e.g.  (T). 

A  series  of  identical  control  characters,  such  as  10  spaces, 
three  cursor-lefts,  or  20  CTRL-R's,  will  appear  as  CIO 
SPACES!,  1 3  LEFT),  (20  R  I,  etc.  If  the  character  in  braces  is 
in  inverse  video,  that  character  or  characters  should  be  en- 
tered with  the  Atari  logo  key.  For  example,  t  tij  means  to 
enter  a  reverse-field  heart  with  CTRL-comma,  <  5ai )  means  to 
enter  five  inverse-video  CTRL-U's. 

Commodore  PET/CBM/VIC/64 

Generally,  any  FET/CBMA'IC/64  program  listings  will  contain 
words  within  braces  which  spell  out  any  special  characters: 
I  DOWN )  would  mean  to  press  the  cursor  down  key.  ( 5 
SPACES  )  would  mean  to  press  the  space  bar  five  times. 

To  indicate  that  a  key  should  be  shifted  {hold  down  the 
SHIFT  key  while  pressing  the  other  key),  the  key  would  be 
underlined  in  our  listings.  For  example,  S  would  mean  to 
type  the  S  key  while  holding  the  shift  key.  If  you  find  an 
underlined  key  enclosed  in  braces  (e.g.,  {10  N}),  you  should 
type  the  key  as  many  times  as  indicated  (in  our  example, 
you  would  enter  ten  shifted  N's).  Some  graphics  characters 
are  inaccessible  from  the  keyboard  on  CBM  Business  models 
(32N,  8032). 

For  the  VIC  and  64,  if  a  key  is  enclosed  in  special  brackets, 
f;  ■>],  you  should  hold  down  the  Commodon'  kty  while  pressing 
the  key  inside  the  special  brackets.  (The  Commodore  key  is 
the  key  in  the  lower  left  corner  of  the  keyboard.)  Again,  if 
the  key  is  preceded  by  a  number,  you  should  press  the  key 
as  many  times  as  indicated. 

Rarely,  you'll  see  in  a  Commodore  64  program  a  solitary 
letter  of  the  alphabet  enclosed  in  braces.  These  characters 
can  be  entered  by  holding  down  the  CTRL  key  while  typing 
the  letter  in  the  braces.  For  example,  {A  1  would  indicate  that 
you  should  press  CTRL-A. 

About  the  quote  mode:  you  know  that  you  can  move  the 
cursor  around  the  screen  with  the  CRSR  keys.  Sometimes  a 
programmer  will  want  to  move  the  cursor  under  program 
control.  That's  why  you  see  all  the  I  LEFT) 's,  tHOM!E)'s, 
and  IBLUl's  in  our  programs.  The  only  way  the  computer 
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can  telJ  the  difference  between  direct  and  programmed  cursor 

control  is  the  quote  mode. 

Once  you  press  the  quote  (the  double  quote,  SHIFT-2), 
you  are  in  the  quote  mode.  If  you  type  something  and  then 
try  to  change  it  by  moving  the  cursor  left,  you'll  only  get  a 
bunch  of  reverse-video  lines.  These  are  the  symbols  for 
cursor  left.  The  only  editing  key  that  isn't  programmable  is 
the  DEL  key;  you  can  still  use  DEL  to  back  up  and  edit  the 
line.  Once  you  type  another  quote,  you  are  out  of  quote  mode. 

You  also  go  into  quote  mode  when  you  INSerT  spaces 
into  a  line.  In  any  case,  the  easiest  way  to  get  out  of  quote 
mode  is  to  just  press  RETURN.  You'll'then  be  out  of  quote 
mode  and  you  can  cursor  up  to  the  mistyped  line  and  fix  it. 

Use  the  following  tables  v/hen  entering  special  characters: 


When  You 
Read;       Press: 


See- 


[BLK] 
{WHT} 

{red} 

{cyn} 

tPUR} 

[grn] 

iBLU} 

{yel}   EniQ 

i3i         Q  B 
E4i  QQ 


Q   k. 


E3 


S 


When  You 
Read: 

E8i 

[Fl] 

{F2} 

[F3] 

{F4] 

Ef5} 

{F6] 

lF7} 

{P8} 


Press:     See: 

HD    □ 


All  Commodore  Machines 

ClearScreen    {CLR) 
Home  Cursor  {  HOHEl 
CursorUp        { UP) 
Cursor  Down  {DOWN) 
Cursor  Right  {RIGHT) 


Cursor  Left  {LEFT) 

Insert Characrer    {  INST} 
Delete  Character  {DEL) 
Reverse  Field  On  {  RVS ! 
Reverse  Field  Off  {oFF) 


Apple  II  /Apple  II  Plus 

All  programs  are  in  Applesoft  BASIC,  unless  otherwise 
stated.  Control  characters  are  printed  as  the  "normal"  char- 
acter enclosed  in  brackets,  such  as  1  D )  for  CTRL-D.  Hold 
down  CTRL  while  pressing  the  control  key.  You  will  not  see 
the  special  character  on  the  screen. 

Texas  Instruments  99/4 

The  only  special  characters  used  are  in  PRINT  statements  to 
indicate  where  two  or  more  spaces  should  be  left  between 
words.  For  example,  ENERGY  {10  SPACES)  MANAGE- 
MENT means  that  ten  spaces  should  be  left  between  the 
words  ENERGY  and  MANAGEMENT.  Do  not  type  in  the 
braces  or  the  words  10  SPACES.  Enter  all  programs  with  the 
ALPHA  LOCK  on  (in  the  down  position).  Release  the  ALPHA 
LOCK  to  enter  lowercase  text. 


Newest  VIC  20  and 
Commodore  64  Arcade  Games 


Will  definitely  be  on  top  10  chart! 

Luna  Software  presents  three  new  gannes  for  the  Commodore  '64  and  VIC  20  computers: 
CARGO  RUN,  PEDESTRIAN,  and  HYPER-HEN.  High  resolution,  full  color  graphics  combined  with 
state-of-the-art  concepts  and  programming  make  Luna's  complete  library  of  arcade-style  software 

the  games  of  choice  for  the  '80s. 


HYPER-HEN 


PEDESTRIAN 


An  arcade-style,  maze  configured 
game,  HYPER-HEN  challenges 
even  the  most  proficient  joystick 
jockeys.  Five  levels  of  fast-paced 
play  assure  that  your  adrenalin 
level  stays  at  its  peak  while  starving 
coyotes,  dive-bombing  chicken- 
hawks.  and  deadly  ZOMPIES  attack 
from  every  side. 


Cassette  VIC  20. 
Cassette  CM64 
Diskette  CM64 


LUNA 
$19.95 
$21.95 
$24.95 


PROTECTO 
$14.95 
$16.95 
SI  9.95 


With  your  Commodore  '64  com- 
puter plotting  the  precise  coor- 
dinates for  this  dangerous  mission, 
prepare  for  the  most  engaging 
video  battle  of  your  life.  Three 
separate  and  highly  detailed 
scenarios  mean  48K  of  memory  is 
required  to  present  CARGO  RUN, 
the  most  sophisticated  game  now 
available  for  the  Commodore  "64. 


Diskette  CM64 


LUNA     PROTECTO 
$31 .95        $26.95 


Keep  your  eyes  wide  open  and 
your  wits  about  you.  As  the 
PEDESTRIAN  you'll  have  lo  cross 
the  rush-hour  freeway  and  race 
through  the  park  full  of  muggers 
and  monsters.  If  you're  lucky  you'll 
be  able  to  keep  your  balance  white 
jumping  from  log  lo  log  across  the 
river  to  your  home. 

LUNA    PROTECTO 

Cassette  VIC  20  $19.95  $14.95 
Cassette  CM  64  $21 .95  $1 6.95 
■Diskette  CM  64  $24.95      $19.95 


Other  LUNA  products 


LUNA 

Suggested  PROTECTO's 


Galactic  Crossfire 
Alien  Soccer 
Warp  Runner 
Cosmic  Snake 
Starduster 


Vic  20  Cassette 
Vic  20  Cassette 
Vic  20  Cassette 
Vic  20  Cassette 
Vic  20  Cassette 


Price 
$19.95 
$19.95 
$19.95 
$19.95 
$19.95 


Price 
$16.95 
$16.95 
$16.95 
$16,95 
$16.95 


^(^^ERPRIZES    f^E'-O^EO"" CUSTOMERS} 

BOX  550,  BARRINGTON,  ILLINOIS  60010 
Phone  312/302-5244  to  order 


COUPON  FILE 


Ken  D.  McCann  and  Dale  McBane, 
Technical  Assistant 

Not  only  will  this  program  create  easily  accessible  files 
for  disk  or  tape  storage,  but  also  it  will  run  on  any 
Commodore  machine.  Atari,  TI,  Apple,  and  Color  Com- 
puter. And  with  minor  adjustments,  you  can  file  nearly 
anything. 


This  program  allows  you  to  file  and  search  for 
coupons.  Coupons  may  be  located  by  brand  name, 
product,  or  expiration  date,  and  you  may  scan 
the  contents  of  all  the  files.  "Coupon  File"  could 
also  help  you  file  a  great  variety  of  things. 

The  use  of  DATA  statements  as  file  structures 
is  one  of  the  things  that  makes  this  program  so 
versatile.  Because  the  DATA  statements  are  saved 
with  the  program,  file  retrieval  is  not  a  problem, 
even  if  you  don't  have  disk  capability. 

The  DATA  statements  were  placed  before 
the  main  program  loop  to  simplify  file  insertions 
and  deletions.  Because  the  file  number  and  line 
number  for  the  DATA  statements  are  the  same, 
those  of  you  unfamiliar  with  programming  will 
find  it  easy  to  create  files. 

Using  The  Program  On  Your  Computer 

There  is  room  for  499  files,  assuming  you  have 
enough  memory  to  store  499  files.  Because  of  the 
search  routine,  each  file  must  have  the  same  for- 
mat. This  is  especially  true  with  the  date  search. 
6/30/83,  6-30-83,  and  30JUN83  are  all  different 
representations  of  the  same  date,  but  for  the  com- 
puter to  locate  that  date,  you  must  choose  one 
format  and  be  consistent. 

Coupon  File  was  written  to  run  on  any 
machine  which  supports  BASIC,  with  one  excep- 
tion. Lines  501,  1000,  1550,  2000,  4000,  6000,  and 
7100  consist  of  the  statement  PRINT  "(CLRl". 
This  is  COMPUTEl's  listing  convention  for  clear 
screen  on  the  Commodore  64  and  VlC-20.  You 
should  substitute  the  statement  to  clear  the  screen 
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on  your  particular  machine  (ESC  SHIFT  <  for  Atari, 
CALL  CLEAR  for  TI,  etc.). 

To  make  more  room  for  files,  you  can  leave 
out  the  instructions.  To  do  this,  delete  lines  550- 
555,  630,  and  6000-7000,  and  change  line  590  to: 


590  IF  (K$<>"L"r(K$<> "B")*(KS<>"P")*(K$< > ' 
(K$<>"C")  THEN  GOTO  570 


D")* 


This  versatile  program  is  very  easy  to  use, 
and  it's  easy  to  adapt  for  other  purposes.  With  a 
few  changes,  you  can  create  a  program  to  file 
nearly  anything. 

Special  Note  To  Timex/Sinclair  Users: 

Because  your  machine's  version  of  BASIC  does 
not  contain  READ  or  DATA  statements,  this  pro- 
gram will  not  run  on  your  machine.  You  may  be 
able  to  adapt  it  to  your  machine  using  strings  for 
file  storage. 
Program  Explanation 
Lines 


1-499 

500-650 

1000-1700 

2000-3600 

4000-5700 

6000-7000 

7100-8610 

9000-9600 

10000-10300 


DATA 
main  menu 
list  all  routine 
brand  search  routine 
date  search  routine 
instructions 
product  search  routine 
display  routine 
file  input  routine 


Coupon  File 


DATA  1 
DATA  2 
DATA  3 
1JAN84 
DATA  4 
DATA  5 
DATA  6 
DATA  7 

8  DATA  8 

9  DATA  9 
84 

10  DATA 

11  DATA 
84 

12  DATA 


, OXYDOL , DETE  RGENT , FREE , NONE 

, PLANTERS, MIXED  NUTS, 25C, 31MAR84 

,FREE  N'  SOFT, FABRIC  SOFTNER, 20C, 

,JELL0, PUDDING, 15C,15MAY84 

, JENOS, PIZZA, 1?  R,4JULB4 

, CHINET, PLATES, 20C, 21DEC83 

,  PEPPIS  ,  PIZZ.A,  60C,  15MAY84 

, CHINET , CUPS , 20C , 20 JUL8  3 

, NABI SCO , SHREDDED  WHEAT , 20C , 30JUN 

10, HEFTY, TRASH  BAGS, 25C, 310CT83 
1 1 , WHEATSWORTH , CRACKERS , 1 2C , 30 JUN 

1 2 , KRAFT , JELLY , 10C , NONE 


THIS  PRINTER 
COST  JUST 

$119.95* 


fllphacom" 


13  DATA  13, PHILADELPHIA, CREAM  CHEESE, 10C, 
NONE 

14  DATA  14,PREG0,SPAGETTI  SAUCE, 20C, 30JUN 
84 

500  DATA  END 

501  PRINT  "{CLR]":REM  CLEAR  SCREEN 

502  PRINT  "COUPON  FILE" 

503  PRINT 

504  LET  T=0 

520  PRINT  "<L>[2  SPACES}lIST  ALL  ENTRIES" 

525  PRINT 

530  PRINT  "<B>(2  SPACES]bRAND  NAME  " 

533  PRINT 

535  PRINT  "<P>l2  SPACES} PRODUCT" 

537  PRINT 

540  PRINT  "<D>[2  SPACES} EXPIRATION  DATE" 

545  PRINT 

550  PRINT  "<H>[2  SPACES} INSTRUCTIONS" 

555  PRINT 

560  PRINT  "<C>{2  SPACES} COMMAND  MODE" 

565  PRINT 

570  PRINT  "CHOICE  "r 

580  INPUT  K$ 

590  IF  {K5<>"L")*(K$<>"B")*(K$<>"P")*Ck$< 

>"D")*{K$<>"H")*(K$<>"C")THEN  GOTO  57 

0 
600  IF  K$="L"  THEN  GOSUB  1000 
610  IF  K$="B"  THEN  GOSUB  2000 
615  IF  K5="P"  THEN  GOSUB  7100 
620  IF  K$="D"  THEN  GOSUB  4000 
630  IF  K?="H"  THEN  GOSUB  6000 
640  IF  K?="C"  THEN  END 
650  GOTO  501 

1000  PRINT  "[CLR}":REM  CLEAR  SCREEN 

1010  PRINT  "COUPON  LIST" 

1015  PRINT 

1100  GOSUB  10000 

1200  IF  A$="END"  THEN  RETURN 

1550  PRINT  "{CLRJ":REM  CLEAR  SCREEN 

1600  GOSUB  9000 

1700  GOTO  1000 

2000  PRINT  "{CLR}":REM  CLEAR  SCREEN 

2200  PRINT  "ENTER  BRAND" 

2300  INPUT  J$ 

2400  PRINT 

2410  PRINT  "BRAND:  ";J? 

2420  PRINT 

2430  PRINT 

2500  GOSUB  10000 

2600  IF  A$="END"  THEN  GOTO  3300 

3000  IF  B$<>J$  THEN  GOTO  2500 

3100  GOSUB  9000 

3150  LET  T=l 

3200  GOTO  2500 

3300  IF  T=l  THEN  GOTO  3600 

3350  PRINT  J$;"  NOT  ON  FILE" 

3360  PRINT 

3400  PRINT  "HIT  RETURN  TO  CONTINUE" 

3450  PRINT 

3500  INPUT  K$ 

3600  RETURN 

4000  PRINT  "{CLR}":REM  CLEAR  SCREEN 

4200  PRINT  "ENTER  EXPIRATION  DATE" 

4300  INPUT  J$ 

4400  PRINT 

4410  PRINT  "DATE:  ";J$ 

4420  PRINT 

4430  PRINT 

4500  GOSUB  10000 

4600  IF  A$="END"  THEN  GOTO  5300 
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5000 

IF  E$<>J$  THEN  GOTO  4500 

5100 

GOSUB  9000 

5150 

LET  T=l 

5200 

GOTO  4500 

5300 

IF  T=l  THEN  GOTO  5600 

5350 

PRINT  "NONE  EXPIRE  ";J$ 

5360 

PRINT 

5400 

PRINT  "HIT  RETURN  TO  CONTINUE" 

5410 

PRINT 

5500 

INPUT  K$ 

5600 

RESTORE 

5700 

RETURN 

6000 

PRINT  " { CLR} " : REM  CLEAR  SCREEN 

6200 

PRINT  "TO  ENTER  A  FILE,  PLACE" 

6350 

PRINT  "THE  COMPUTER  IN  COM-" 

6400 

PRINT  "MAND  MODE  (THE  MODE" 

6450 

PRINT  "BEFORE  YOU  TYPE  RUN)." 

6500 

PRINT  "TYPE  IN  THE  LINE  NUM-" 

6550 

PRINT  "BER, '  DATA  ' , THE  FILE" 

6600 

PRINT  "NUMBER,  THE  BRAND  NAME" 

6650 

PRINT  "THE  PRODUCT,  THE  VALUE" 

6700 

PRINT  "AND  EXPIRATION  DATE." 

6710 

PRINT 

6720 

PRINT 

6800 

PRINT  "HIT  RETURN  TO  CONTINUE" 

6900 

INPUT  K$ 

7000 

RETURN 

7100 

PRINT  "{CLR}":REM  CLEAR  SCREEN 

7200 

PRINT  "ENTER  PRODUCT" 

7300 

INPUT  J5 

7400 

PRINT 

7410 

PRINT  "PRODUCT:  ";J$ 

7420 

PRINT 

7430 

PRINT 

7500 

GOSUB  10000 

7600 

IF  A?="END"  THEN  GOTO  8300 

8000 

IF  C$<>J$  THEN  GOTO  7500 

8100 

GOSUB  9000 

8150 

LET  T=l 

8200 

GOTO  7  500 

8300 

IF  T=l  THEN  GOTO  8600 

8350 

PRINT  J$;"  NOT  ON  FILE" 

8360 

PRINT 

8400 

PRINT  "HIT  RETURN  TO  CONTINUE" 

8410 

PRINT 

8500 

INPUT  K$ 

8600 

RESTORE 

8610 

RETURN 

9000 

PRINT  "FILE  NUMBER>";A$ 

9010 

PRINT 

9100 

PRINT  "BRAND {6  SPACES} >";B$ 

9110 

PRINT 

9150 

PRINT  "PRODUCT {4  SPACES] >"; C? 

9160 

PRINT 

9200 

PRINT  "VALUE {6  SPACES} >";D? 

9210 

PRINT 

9300 

PRINT  "EXP.  DATE {2  SPACES) >";E$ 

9310 

PRINT 

9400 

PRINT 

9410 

PRINT  "HIT  X  TO  ABORT  TO  MENU" 

9420 

PRINT  "HIT  RETURN  TO  CONTINUE" 

9500 

INPUT  K$ 

9540 

IF  K$="X"  THEN  RESTORE 

9550 

IF  K$="X"  THEN  GOTO  501 

9600 

RETURN 

10000 

READ  A$ 

10100 

i  IF  A$="END"  THEN  RESTORE 

10110 

i  IF  A$="END"  THEN  RETURN 

10200 

i  READ  B$,C$,D$,E$ 

10300 

i  RETURN 

e 
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David  Berdan 


In  this  fast-action  adventure  gatne, 

your  mission  is  to  maneuver  through 

the  countryside  until  you  reach  the 

castle  and  save  the  princess  —  if  you 

call.  There  are  all  sorts  of  dragons 

you  mustfitst  conquer  and  a  wily, 

evil  wizard  in  steady  pursuit.  The  game  has     ~'^ 

four  difficulty  levels.  Written  for  the  unex- 

panded  VIC,  versions  are  also  included  for  the 

64  and  Atari.  Joysticks  are  required. 


This  game  involves  tbiree  courageous  knights 
who  have  returned  home  from  war  only  to  find 
that  the  countryside  surrounding  their  castle  is 
infested  with  dragons  that  were  placed  there  by 
an  evil  wizard.  Trapped  inside  the  castle  is  the 
beautiful  princess,  who  anxiously  awaits  the 
first  knight  who  can  rescue  her.  One  at  a  time 
the  knights  try  to  slay  all  the  dragons  and 
enter  the  castle  to  save  the  princess. 

The  knights  quickly  discover  the  many 
dangers  of  the  hunt.  A  dragon  vvHl  eat  anyone 
who  comes  near  its  head.  The  only  way  to 
get  rid  of  one  is  to  zap  it  in  the  stomach. 
Guarding  the  castle  is  a  phantom  dragon  that 
can  only  be  eliminated  when  all  the  others  have 
been  overcome.  (The  castle  drawbridge  will 
remain  closed  until  he  is  conquered.)  At  times 
a  dragon  will  appear  from  nowhere,  and 
occasionally  a  dragon  you  thought  you'd 
disposed  of  will  reappear  to 
have  another  try  at 


knight.  And  last,  but  certainly 
not  the  easiest  of  the  perils,  is  the 
~evil  wizard  himself,  who  chases 

.--      the  knights  as  they  hunt  the 

^^~ — dragons.  If  the  wizard  catches  a 
knight,  the  knight  is  destroyed. 

;,  -        How  To  Play 

■■  ~        Maneuver  your  knight  through  the 

countryside  with  a  joystick.  You  are 

allowed  three  knights  at  the  start,  but 

(  1^'*^.  jl  watch  out  -  the  knights  can  be  consumed 

T^-^'-*^-^^  -  very  quickly  by  a  dragon. 

When  you  encounter  a  dragon, 
you  must  act  quickly.  Using  your  fire 
button,  aim  at  the  dragon's  stomach. 
This  is  its  oiily  vulnerable  point. 

You  have  no  defense  against  the 

evil  wizard  except  speed.  You  must 

be  constantly  aware  of  his  distance 

from  you.  Remember    if  he  catches 

you,  your  knight  is  destroyed. 

VIC  Dragonmoster 

The  original  VIC  version  of 
"Dragonmaster"  utilizes  a  program- 
mable character  set.  Since  232 
numerical  values  were  needed  to 
create  the  29  characters  used  in  the 
game,  it  was  necessary  to  create  a  data 
■fife  containing  the  numbers  and  read  them 
'  ;in  at  the  beginning  of  the  program  to  build 
the  custom  characters. 


o 
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WHEN  YOU  BUY  AN  ATARI"  C0^4PUTER, 
WE  PUT  OUR  EXPERTISE  ON  THE  LINE 


There's  no  limit  to  what  you  can  do  with  a  home 
computer... and  no  way  any  mere  instruction  man 
ual  can  help  you  discover  all  the  possibilities. 

So  ATARI  gives  you  the  extra  help  you  need: 
an  ATARI  computer  expert  to  answer  your 
questions.  Free.  He'll  help  you  write  your  own 
programs,  learn  how  to  do  new 
things,  and  diagnose  problems 
when  the  things  you're  trying 
to  do  just  don't  work  out. 

It's  the  ATARI  Help  Line. 
A  toll  free  hclp-and-information 
service  to  help  you  get  more  out 


of  your  ATARI  Computer.  Just  call  1-800-538-8543.* 

And  if  you  ever  need  anything  fixed, 
ATARI  has  over  1,600  ATARI  SERVICE^"  Centers 
nationwide.  You'll  find  the  nearest  one  listed 
under  "Computers"  in  your  Yellow  Pages. 

ATARI  SERVICE  isn't  the  only  good  reason 

to  buy  an  ATARI  system.  But  it's 
an  awfully  good  reason  not 
to  choose  any  other  kind. 


MlHlfldClfVlbC 

MCTORC  AUTH0RIZH3  NETWCfK 


1-800-538-8543' 
THE  AIARI  SERVICE'HELP  LINE' 


A. 
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RAT  HOTEL"  and  SAVE  NEW  YORK!'-  arc  IrademotUs  of  Credlne  iof.narf . 

"Commodore".  "VlC-20'.  and  -Commodore  64"  ore  trademarks  o(  Commodore  Etecironics.  Lid; 


CREATIVE 
^SOFTWARE 


A  Qlvitlon  ol  ASCI.  Inc. 


>  Sunnyvale.  CA  94089 


Two  Great  Game  Cartridges  for  Your  Texas  Instruments  99/4A^" 
Guaranteed  to  work  on  all  present  and  future  versions  of  the  TI  99/4A 
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Ambulance^  and  Driving  Demon"  are  trademarks  of  Funw.  itrc.  Iti<.  . 

"Texiss  In^iTuments,"  and  "I'pxas  Instiumetit.s  99/ 4 A"  "Tl  99;-* A"  are  iT.itfeni.ir lis  of  Tp\a.s  Jnsirumfrnis 


A  SubtldJiry  al  Crulive  SiA\«»n 

230  L  Caribbean  Drive  •  Sunnyvale,  CA  94089 


Program  1  is  the  main  game  program.  Pro- 
gram 2  is  the  data  file  needed  to  establish  the 
character  set  used  in  the  game.  (Please  note  that 
due  to  the  need  to  protect  a  block  of  memory  for 
the  character  set,  the  VIC  version  will  run  only  on 
the  unexpanded  VIC,  Please  remove  any  RAM 
expansion  cartridges.) 

Carefully  type  in  Program  1,  check  it  for  ac- 
curacy, and  SAVE  it  on  tape.  If  you  try  to  RUN 
Program  1  at  this  time,  it  will  want  to  input  the 
data  from  the  data  file  which  has  not  yet  been 
made.  Next,  type  NEW  and  then  type  in  Program 
2.  Be  careful  while  typing  in  the  numbers  here,  as 
any  slip  up  will  result  in  ill-formed  characters. 
When  you  are  certain  that  everything  is  right, 
RUN  Program  2.  Your  VIC  will  ask  you  to  press 
Record  and  Play  before  it  starts  writing  the  data 
on  the  tape  imn^ediately  following  the  copy  of 
Program  1 .  After  a  minute  or  so  the  screen  will 
display  DATATAPE  CREATED  and  the  tape  will 
stop.  It  would  be  wise  to  save  a  copy  of  Program 
2  a  little  farther  down  on  the  tape  so  that  if  you 
need  it  again  you  won't  have  to  retype  all  those 
numbers. 

Rewind  the  tape  to  the  beginning  of  Program 
1  and  type  LOAD.  When  the  program  has  been 
read  in,  type  RUN. 

Difficulty  Levels 

The  first  thing  to  appear  on  the  screen  is  the  in- 
structions. You  are  asked  to  choose  any  of  four 
skill  levels  by  pressing  the  appropriate  function 
key.  The  degree  of  difficulty  is  determined  by 
how  fast  the  wizard  pursues  the  knight.  The  EASY 
level  (Fl)  presents  a  real  challenge  to  the  new- 
comer. You  can  expect  to  be  defeated  quite  often 
while  you  are  learning  the  finer  points  of  the  game. 
The  next  levels,  HARD  (F3)  and  VERY  HARD 
(F5),  are  progressively  difficult.  The  IMPOSSIBLE 
level  (F7)  is  only  for  the  expert.  You  must  be  ex- 
ceptionally alert  and  skillful  with  the  joystick  to 
get  into  the  castle  at  this  level. 

If  you'd  rather  not  type  in  this  program,  I'll 
make  copies  (VIC  version  only).  Just  send  a  blank 
cassette,  self-addressed  stamped  mailer,  and  $3  to: 

David  Benin n 

3W20N.E.  Big  Rock  Road  ' 

Diivall,  WA  9S019 


BEFORE  TYPING... 
If  you're  new  to  computing,  please  read  ''How 
To  Type  COMPUTEI's  Programs"  and  "A 
Beginner's  Guide  To  Typing  In  Programs." 


Program  1:  Dragonmaster  -  Main  Program 
(unexpanded  VIC] 

100  PRINT " { CLR} " : IFPEEK  C  7448 ) =60ANDPEEK ( 7 
679)=160THEN125 

60     COMPUTf!     October  1963 


105  PRINT "DATA  BEING  READ  IN" 

110  OPENl, 1,0, "DATATAPE" 

115  FORD=7448T07679:INPUT#l,A:POKED,A:NEX 

T 
120  CLOSEl:POKE56,29 
125  CLR : PRINT " { CLR ) { BLK } " : U=36a 78 : DR=1 5 : K 

=2:JS=3  7154:P=7712:SW=0:S1=U-2:GOSUB2 

00;GOSUB280 
130  ZZ=7912:POKEZZ,35 
135  POKEJS,127:V=PEEK(JS-2)AND128 
140  E=-CV=0) 5pOKEJS-2,255:V=PEEK(JS-3) 
145  S=-((VAND8)=0) :W=-( CVAND16)=0) :N=-( (V 

AND4)=0) :SW=-( {VAND32)=0) : Q=P 
150  IFSANDPEEKCP+22)=32THENP=P+22 
155  IFWANDPEEK(P-1)=32THENP=P-1 
160  IFNANDPEEK(P-22)=32THENP=P-22 
165  IFEANDPEEK(P+1)=32THENP=P+1 
170  POKEP+30720,0 

175  GOSUB420:IFQ<>PTHENPOKEQ,32:POKEP,53 
180  IFSWTHENG0SUB375 
185  IFPEEK (P+1) =3 70RPEEK(P+1 )=60ORPEEK ( P- 

1 )=42THENGOSUB330 
190  IFPEEK { P+22 ) =370RPEEK { P+22 ) =60ORPEEK ( 

P+22)=42THENGOSUB330 
195  GOSUB470:GOTO135 

200  PRINT"{D0WNH5  spaces)  DRAGONMASTER" 
205  PRINT" (down) OBJECT;  BLAST  ALL": PRINT" 

{right} DRAGONS  AND  ENTER{5  RIGHT) CAST 

LE  TO  MARRY 
210  PRINT "PRINCESS. 
215  PRINT" [down) ZAP  DRAGONS  FROM  THE 

[2    SPACES} FRONT  WITH  FIRE  BUTTON 
220  PRINT" E DOWN) MUST  DEFEAT  PHANTOM" : PRIN 

T" DRAGON  LAST 
225  PRINT: PRINT "PRESS;  Fl-EASY" :PRINTTAB( 

7) "P3-HARD" 
230  PRINTTAB(7) "F5-VERY  HARD" ; PRINTTAB (7 ) 

"F7-IMP0SSIBLE" 
235  SL=15:GETA5:IFA$=""THEN235 
240  IFA?<CHR? { 134 )0RA$  >CHR$ ( 136 ) THENPRINT 

"{CLR} ": RETURN 
245  IFA?=CHR$ (134) THENSL=1 0 : PRINT " [ CLR) " : 

RETURN 
250  1FA$=CHR$ (135) THENSL=6 : PRINT " £  CLR) " ; R 

ETURN 
255  SL=3 : PRINT"! CLR) ": RETURN 
260  CL=INTCRND(1)*2)*2 
265  CS=L+30720 : POKECS , CL : POKECS+1 , CL : POKE 

CS+22 , CL:POKECS+23 , CL 
270  P0KEL,M:P0KEL+1 ,M+1 :P0KEL+22,M+2:P0KE 

L+2 3, M+3: RETURN 
275  P0KEL,32:P0KEL+1, 3  2 :P0KEL+22 , 32 : POKEL 

+23,32: RETURN 
280  F0RI=1T0126:PRINT"{4  SPACES) "; :NEXT: P 

RINT"  {home} ":POKE3a905,0 
285  POKEU+1,30:FORC=7424TO7431 :POKEC,0:NE 

XT:POKEU-9,255 
290  L=7888:M=45:CL=7:GOSUB265 :POKE3B629,C 

L : POKE7909 , 49 : CL=4 : L=L-3 : M=60 : GOSUB26 

5:F=36 
295  FORX=7680TO7701 : POKEX, F:NEXT:FORX=770 

2T08142STEP22 : POKEX , F : POKEX+2 1 , F : NEXT 
300  F0RX=81 64T08185 : POKEX , F : NEXT : F0RX=1T0 

X5:Z=INTCRND(1)*2) 
305  READA:M=41:L=7726+A:IFZTHENM=37 
310  GOSUB260:NEXT:POKEU,15:POKE7712,53:PO 

KE7693,53:POKE7694,53 
315  DATA  1,15,31,69,101,111,199,206,212,2 

68,275,316,353,362,367 
320  FORX=49TO52:POKE7909,X:POKES1, (X-44)* 

28 : FORT=1TO1000 : NEXT : NEXT : GOSUB325 : RE 

TURN 


WE  INTERRUPT  THIS  AD 
TO  BRING  YOU  THIS 
IMPORTANT  PROGRAM... 

Now  you  could  add  your  program  to  the  rapidly  a  . 

expanding  list  of  MMG  Software  with  MMG's  Write      J^    "^ 

Your  Own  Program  ContestF  Each  nnonth  a  \. 

program  will  be  chosen  and  developed  from  ^ 

the  entries  and  suggestions  sent  in  by  you  ■■ 

and  best  of  all,  the  winners  will  receive 

royalties  from  the  sale  of  their  entry.  ^ 

You  don't  have  to  be  a  computer  whiz  "^ 

to  enter,  so  see  your  local  retailer 

who  carries  ATARI  products  for 

details.  FINAL  FLIGHT  is  only  one  of        \ 

the  many  exciting  and  useful  ^^^ 

programs  for  the  ATARI  system  ^ 

now  available  from  MMG  Micrg^^  > 

Software  that  are  designed    W^^ 

with  you  in  mind.  At  MMG, 

we  believe  that  people  ' 

are  as  important  as  the       '-.  T 

programs  they  use.         ^^-  • 


r 


micro  software 

P.O.  Box  131    Marlboro.  NJ  07746 
(201)431-3472 


ATARI  ts  a  registered  tratfemarK  of  ATA 


325  POKEU,0:POKES1,0: RETURN 

330  POKEU ,15: F0RF=1T02 : F0RX=1 30TO200 ; POKE 

SI, X: NEXT 
335  FORX=200TO130STEP-1:POKES1,X:NEXT:POK 

EP,F+53:NEXT:GOSUB325 
340  POKE7695-K, 36 :K=K-1 : IFK=-lTHEN455 
345  POKEP,32:P=7712 : POKEP, 53 : RETURN 
350  L=P-21 :M=56 :CL=0 :GOSUB265 :GOSUB400 :L= 

P-21 :GOSUB275 : POKEU, 15 
355  FORX=52TO49STEP-1:POKE7909,X:POKES1, ( 

X-44 ) *28 : FORT=1TO1000 : NEXT : NEXT : GOSUB 

325 
360  FORX=7907TO7909 : POKEX-1 , 32 ;POKEX+3072 

0,0: POKEX , 53 : FORT=1TO1000 : NEXT :NEXT : P 

OKEX,32 
365  POKEU+1 , 59 : POKEU-9 , 240 : PRINT " { CLR} " : P 

0KE214, 22: PRINT: PRINT" {4  RIGHT} AND  TH 

EY  LIVED" 
3  70  PRINT" {down} {2  RIGHT } HAPPILY  EVER  AFT 

ER":GOTO460 
375  CL=0 :X=PEEK ( P+1 ) : Y=PEEK ( P-1) : IFX=62AN 

DDR=0THEN350 
380  IFX0  39ANDY0  44THENRETUEN 
385  IFX=39THENI,=P-21:M=56:GOSUB265 
390  IFY=44THENL=P-24:M=56;GOSUB265 
395  DR=DR-1 
400  POKEU, 15 :FORX=250TO128STEP-1 :P0KES1 ,X 

:NEXT:GOSUB325 
405  IPPEEK{P+l)=5BTHENL=P-21:GOSUB275 
410  IFPEEK{P-1)=59THENL=P-24:G0SUB275 
415  RETURN 
420  H=INT ( RND (l)*414)+7726: BB=INT ( RND ( 1 ) * 

2) :X=PEEK(H) 
425  IFX=37THENL=H:M=41:GOSUB260: RETURN 
430  IFX=41THENL=H:M=37:GOSUB260: RETURN 
435  IFH<>7731ANDH<>7822ANDH<>7874ANDH<>80 

05ANDHO8106THENRETURN 
440    IFX<>320RPEEK(H+l)<>320RPEEK(H+22)<>3 

20RPEEK(H+23)<>32THENRETURN 
445  I FBB=1THENL=H : M=3  7 : DR=DR+1 : G0SUB265 : R 

ETURN 
450  L=H : M=41 : DR=DR+1 : G0SUB26 5 : RETURN 
455  POKEU-9 , 240 : POKEU+1 , 59 : PRINT" { CLR} " : P 

OKE214,22:PRINT:PRINT"[3  RIGHT}THE  DR 
AGONS  WIN" 
460  FORX=1TO23:PRINT:FORT=1TO150:NEXT:NEX 

T 
465  POKEU+1, 27 :GOT0125 
470  CW=tCW+l)AND7:IFCW=lTHENCW=2 
475  POKEZZ+30720 , CW: CC=CC+1 : IFCC=SLTHEN48 

5 
480  RETURN 
485  I2=INT( (2Z-7680}/22) :IP=INT( Cp-7680)/ 

22);NZ=INTUIZ+IP)/2)*22 
490  N2=NZ+(P-IP*22+ZZ-IZ*22)/2:CC=1 
495  IFPEEK(NZ)=32THENPOKEZZ,32:POKENZ,35: 

GOTO510 
500  IFPEEK(NZ)=53THENGOSUB330 
505  RETURN 
510  ZZ=NZ ; IFPEEK( ZZ+1 )=530RPEEK( ZZ-1 }=530 

RPEEK(ZZ+22)=530RPEEKCZZ-22)=53THENGO 

SUB330 
515  RETURN 

Program  2:  Dragonmaster  -  Data  Fire  (for  VIC) 

1  OPENl,l,2, "DATATAPE" 

2  READX: PRINT* 1,X:IFX=-1THEN4 

3  G0T02 

4  CLOSEl: PRINT "DATATAPE  CREATED" 

5  END 

10  DATA60, 66, 165, 129, 153,165,66,60,170,85 

62    COMPirtS!    October  1983 


,170,85,170,85,170,85,0,56,108,254,15 
20  DATA15, 3 1,3 1,0, 0,0, 0,1, 6, 12, 152, 255, 63 

,63,31,31,15,31,61,176,17  6,152,216,220 
30  DATA252, 248, 224, 0,0, 0,0, 128, 96, 48, 25,0 

,28,54,127,240,240,248,248,13,13,25,27 
40  DATA59, 63, 31, 7, 25 5, 252, 252, 248, 248, 240 

,248,188,0,0,84,124,108,56,56,189 
50  DATA21, 31, 27, 31, 14, 14, 14, 94, 255, 255,  25 

5,255,170,255,255,0,254,254,254,254,17 

0 
60  DATA254, 254, 0,0, 0,0, 0,0, 0,25 5, 0,0, 0,0, 

32,24,6,1,0,0,0,16,8,4,2,1,0,0,8 
70  DATA4, 4, 2, 2, 1,0, 24, 126, 90, 2 19, 24, 36, 66 

,195,0,24,60,90,24,36,0,0,0,0,0 
80  DATA24, 24, 0,0, 0,16, 0,2, 72, 2, 21, 75, 21,1 

30,16,64,162,72,160,90,224,7,42 
90  DATA133, 18, 5, 32, 4, 0,168, 210, 168,  64, IB, 

64,8,32,0,40,68,82,5,10,21,10,0,0,0,0 
100  DATAl, 2, 4, 16, 85, 42, 21, 10, 21, 10,  21,  40, 
128,144,0,144,72,164,80,160,-1 


A  dragon  turns  to  dust  in  "Dragonmaster,"  VIC  version. 


Program  3:  Dragonmaster  -  64  Version 

Translation  by  Chus  Metcclf,  Programming  Assistant 


1000 

1010 

1020 

1030 
1040 

1050 
1060 
1070 
1080 


1090 
1100 

1110 
1120 
1130 
1140 
1150 
1160 


PRINT" { CLR } E7  3 " : POKE53  280 , 14 : POKE5 
3281,6 

IFPEEK( 14846 )=80ANDPEEK{ 14847 )=160TH 
EN1070 

PRlNTTAB(14)"l8  DOWN} PLEASE  WAIT": PR 
INTTAB(11}"DATA  BEING  READ  IN" 
F0RI=1T024 : READA : NEXT 

FORD=14616TOl4847:READA: POKED, A:NEXT 
POKE52,57:POKE56,57 


REM  RESTART  PROGRAM 

CLR : PRINT " { CLR} E  7  3 " : DR=24 : K=2 : P=10 

84 : 51=54276 : 32=54283 :GOSUB1260 : GOSUB 

1490 

P0KES2-1 , 3 : P0KES2+1 , 8 : POKES2+2 , 0 

ZZ=1446:POKEZZ,35:GR(0)=1;GR{1)=12:G 

R(2)=11:GR(3)=0:GRC4)=11:GR(5)=12 

V=31-PEEK(56320)AND31:Q=P 
IFVAND2 ANDPEEK ( P+40 ) =3  2THENP=P+40 
IFVAND4ANDPEEK ( P-1 ) =32THENP=P-1 
IFVANDIANDPEEK ( P-40 ) =3  2THENP=P-40 
IFVAND8ANDPEEK ( P+1 ) =3  2THENP=P+1 


^Mm 


WARNING  1'. 


This  Q---        y^iett  as 
strategy  as  v» 


•^■SlfiVi'^TSS 


y^ 


.■r&Ol  400/600/800' 

r 

CASSETTE 
DISK 

3^,S.MAX^NELL-"^ 
T.  LYNDON 


'Jrif-'i;,  ^Sii^?; 


T-^''"??;?!'^ 


32K-DISK    o 
<E24.95 


Games  are  100% 
machine 'ana^Bfle 

,or  supeHBSt 

action- 


rffl 


^> 


-r!^s":s';5' 


roptice'orc«uec.u.- 


Dealer  inquiries' 


nuited- 


CA  S'iSO'i 


•Atari'',  "Commodore",  and  ■TRS-BO"  are  trademarks  ot  Atari  Inc..  Commodore  Inc..  and  Tandy  Corp.  respectively. 


1170  POKES2,8:POKEP+54272,GR(GR) :GR=GR+1 : 

IFGR=6THENGR=0 
1180  GOSUB1930:IFQ<>PTHENPOKEQ,32:POKEP,5 

3 : P0KES2 , 65 : POKES2-3 , 3 
1190  IFVAND16THENGOSUB1800 
1200  IFPEEK ( P+1 ) =370RPEEK  C  P+1 ) =60ORPEEK ( P 

-1 )=42THENGOSUB1640 
1210  IFPEEK ( P+40 ) =370RPEEK ( P+40 ) =60ORPEEK 

( P+40 ) =4  2THENGOSUB1 640 

GOSUB2090 : GOTO1120 


1220 
1230 
1240 
1250 
1260 
1270 

1280 

1290 

1300 

1310 
1320 

1330 

1340 
1350 

1360 

1370 

1380 
1390 
1400 
1410 
1420 
1430 


REM  INSTRUCTIONS  AND  SKILL  LEVEL 
PRINTTAB(8)  "***  64  DRAGONMASTER  ***" 
PRINT" {2  down}  OBJECT:  BLAST  ALL  DRA 
GONS  f^D    ENTER" 

PRINT" {2  SPACES} THE  CASTLE  TO  MARRY 
{space} THE  PRINCESS." 

PRINT" {2  down}  zap  THE  DRAGONS  FROM 
{space} THE  FRONT  WITH" 

PRINT  "{2  SPACES] THE  FIRE  BUTTON,  BU 
T  STAY  AWAY":PRINT"C2  SPACESJFROM  TH 
EIR  HEADS  J " 

PRINT" {2  down!  you  MUST  ELIMINATE  PH 
ANTOM  DRAGON  LAST" 

PRINT" [2  DOWN] [2  SPACES}PRESS:  Fl  — 
EASy":PRINTTAB(9) "{doWN}F3  —  STAND 
ARD" 

PRINTTAB(9) "{D0WN}f5  —  VERY  HARD":P 
RINTTAB(9)"{D0WN)F7  —  EXTREMELY  HAR 
D" 

SL=15 : GETA$ : IFA$=" "THENl 340 
IFA?  < CHR? ( 1 34  J  ORA$  >  CHR$ { 136 ) THENPRIN 
T"{CLR] ": RETURN 

IFA$=" { F3 } "THENSL=10 : PRINT" { CLR} " : RE 
TURN 

IFA$= " { F5 } "THENSL=6 : PRINT " [ CLR} " : RET 
URN 
SL=3 : PRINT " I CLR] " : RETURN 


REM  DRAW  AND  ERASE  DRAGONS,  ETC. 

CL=INT ( RND{ 1 ) *2 ) *2 

CS=L+54272:P0KECS,CL:P0KECS+1,CL;P0K 

ECS+40 , CL : POKECS+41 , CL 
1440  POKEL , M: POKEL+1 , M+1 : POKEL+40 , M+2 : POK 

EL+41,M+3: RETURN 
1450  POKEL , 32 : POKEL+1 , 32 : POKEL+40 ,32: POKE 

L+41, 32: RETURN 
1460  : 
1470  : 

1480  REM  INITIALIZE  PLAYFIELD,  DRAGONS 
1490  POKE53265,0:POKE53280,6 
1500  POKE53281 , 0 : PRINT " { CLR} " : POKE532B1 , 1 

5 : FORC=145  92T0145  99 : POKEC , 0 : NEXT : CL= 

11 
1510  L=1404:M=45:GOSUB1430:POKE1443,49:L= 

L-3 : M=60 : GOSUB1430 : F=36 
1520  FORX=1024TO1063:POKEX,F:NEXT:FORX=10 

64T01 944STEP40 : POKEX , F : POKEX+39 , F : NE 

XT 
1530  FORX=1984TO2023 : POKEX , F : NEXT : F0RX=1T 

024 : Z=INT ( RND ( 1 } *2 ) 
1540  READA:M=41:L=1106+A:IFZTHENM=37 
1550  GOSUB1420:NEXT:POKE53272,31:POKE1084 

, 53 :POKE1047 , 53 :POKE1048, 53 
1560  DATA  1,30,65,82,91,138,203,222,234,3 

01,329,345,401,412,424,456,536 
1570  DATA  550,567,632,690,706,724,734 
1580  P0KE54296, 15 :POKE54277 , 138 :P0KE5427a 

,0:POKE53265,27 
1590  F0RX=49TO52:P0KE1443,X:POKE54273, (X- 
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Dragon  master  For 
The  64  And  Atari 

Chris  Metcolf,  Programming  Assistant 


Tlie  Connmodore  64  version  of  "Dragon- 
master"  runs  much  the  same  as  the  VIC  ver- 
sion. However,  the  colors  are  somewhat 
different.  You  will  find  that  you  are  a  flashing 
figure  in  shades  of  gray,  a  feature  which  could 
not  be  implemented  on  the  VIC  due  to  the 
memory  shortage.  The  pursuing  wizard 
flashes  all  the  colors  of  the  rainbow  (magic!) 
and,  by  his  mystic  powers,  pursues  you  by 
always  halving  the  distance  between  you.  If 
at  any  point  his  leap  brings  him  to  within 
one  square  of  you,  you're  finished. 

The  dragons  are  the  main  obstacle  in 
your  chivalrous  adventure.  To  eliminate  a 
dragon,  you  have  to  move  directly  in  front  of 
his  stomach  and  press  the  fire  button.  The 
dragon  will  disappear.  The  phantom  dragon 
guarding  the  gates  must  be  dispatched  last. 
You  will  find  that  the  dragons  do  move  about 
and  change  color  now  and  then,  but  this  is 
only  restlessness.  In  addition,  a  dragon  will 
occasionally  appear  from  nowhere  to  test 
your  mettle. 

The  programming  techniques  involved 
in  this  version,  as  in  tine  VIC  version,  are 
fairly  straightforward.  Programmable  char- 
acters are  used  for  dragons,  castle,  walls, 
knights,  wizard,  etc.  The  data  for  these  char- 
acters is  stored  from  14336  to  16384,  although 
the  program  uses  only  a  part  of  this.  The 
characters  are  put  on  the  screen  by  POKEs, 
as  are  their  colors  (the  color  screen  on  the  64 
is  from  55296  to  56295).  Simple  sounds  are 
created  using  two  voices  of  the  SID  chip. 
Voice  one  controls  dragon  and  the  knights 
elimination  as  well  as  drawbridge  noises; 
voice  two  maintains  the  movement  noise. 

The  Atari  version  also  employs  pro- 
grammable characters  (the  same  data,  in 
fact),  located  in  the  block  of  512  bytes  below 
the  top  of  your  available  memory.  The  colors 
used  are  somewhat  different.  The  castle  and 
outside  walls,  the  dragons,  the  wizard,  and 
the  knight  each  use  different  color  registers, 
Graphics  mode  1  is  used  to  simulate  the 
VlC's  22-column  display  as  closely  as  pos- 
sible. The  sound  used  is  simple  Atari  sound. 
However,  the  program  is  basically  the  same 
as  the  VIC  version  in  terms  of  play. 


f^^  '>>>^.       uinE  Y"^^  vo« 


Yo&j  Won't  Just  Sit  There 


ARCADE  ACTION  AT  ITS  VERY  BEST 


Snow  Cave 


Ice  Lasers 


When  you  help  SNOKtE  rescue  his  girlfriend  CARA,  the  action  really  starts!  CARA,  held  captive  by  the  GRODIES,  needs  to  be 
rescued  -  now!  It  won't  be  easy.  SNOKIE  will  face  all  the  natural  perils  of  the  arctic  including  snow-boulders,  glacier  crevasses, 
moving  ice-blocks  and  falling  icicles.  Also  there  are  ice  lasers  and  cold  rays,  installed  by  the  GRODIES.  Take  the  challenge. 
Go  for  itj 


ATARI 

400/600/800/1200/1400/1450 

1BK  TAPE  or  3ZK  DISK 

S34.gS 

by:  Y.  LEMPEREUR 

Game  design:  A.  Marsily 


^ 


ainsoFT 


i^^ 


28611  Canwood  St.,  Agoura,  CA  91301 
[213]  991-6540 

Dealer  inquiries  inuited. 

"Atari"  and  -'Commodore"  are  trademarks  ol  Atari  Inc.,  and  Commodore  inc.  respecliveiy. 


COMMODORE  64 
Tape  or  Disk 

534.95 
by:  T.  Lyndon 


If  unavailable  from 
your  local  dealer,  send 
$34.95  plus  52.00  shipping. 


WW0^-:.C 


48)*10:POKES1,8!POKES1,17 
1600  FORT=1TO800: NEXT: NEXT :GOSUB1680;RETU 

RN 
1610  : 
1620  : 
1630 
1640 


REM  PHANTOM  DRAGON  DIES,  VICTORY 

FORF=lT02 : POKES! , 8 : POKESl , 33 : FOEX=0T 

O40STEP.8:POKE54273,X:NEXT 

POKESl , 8 : POKESl , 33 : FORX=40TO0STEP- . 8 

:POKE54273,X:NEXT 

POKEP , F+5  3 : NEXT : POKESl , 8 

POKE1049-K,36:K=K-1:IFK<0THEN2030 

POKEP , 3  2 : P=l 084 : POKEP ,53: RETURN 

L=P-39 : CL=1 :M=56 :GOSUB1430 :GOSUB1860 

:L=P~39:GOSUB1450: POKES 3272, 31 

POKE54277 , 138 :POKE54278, 0 

F0RX=5  2T049STEP-1 : P0KE1443 , X : POKESl , 

8:POKESl,33:POKE54273, (X-4B)*10 

FORT=1TO800 : NEXT : NEXT : POKESl , 8 

FORX=1441T01443:POKEX-l,32:POKEX+542 

72,1:POKEX,53:FORT=1TO800:NEXT:NEXT 

PRINT" ICLR] " : POKE53280 , 7 : POKE53281 , 7 

POKE53272,21 iPRINT" [CLRJ  £2^ "TAB{13 

)"{22  DOWN] AND  THEY  LIVED" 

PRINTTAB(ll) "{DOWNJHAPPILY  EVER  AFTE 

R":GOTO2050 


1650 

1660 

1670 
1680 
1690 

1700 

1710 

1720 
1730 

1740 
1750 

1760 

1770 
1780 

1790 
1800 

1810 
1820 
1830 
1840 
1850 
1860 

1870 

1880 
1890 
1900 
1910 
1920 
1930 

1940 

1950 
1960 
1970 

1980 

1990 
2000 
2010 
2020 
2030 
2040 

2050 

2060 

2070  : 

2080  REM  THE  EVIL  WIZARD  MOVES 

2090  CW= ( CW+1 ) ANDl 5 : IFCW=1 5THENCW=0 

2100  CC=CC+1 :POKEZZ+54272 , CW: IFCC<>SLTHEN 

RETURN 
2110  IZ=INT( (ZZ-1024)/40) :IP=INT( (P-1024) 

/40) :NZ=INT( (lZ+IP)/2)*40 
2120    NZ=NZ+(P-IP*40+ZZ-IZ*40)/2:CC=1 
2130    IFPEEKCNZ)<>32THENRETURN 
66    COMPUTE!     October  1983 


REM  ELIMINATE  A  DRAGON 

CL=0:X=PEEK(P+1}:Y=PEEKCP-1J :IFX=62A 

NDDR=0THEN1690 

IFX0  39ANDY0  44THENRETURN 
IFX=39THENL=P-39 :M=56 :GOSUB1430 
IFY=44THENL=P-42 :M=56 :GOSUB1430 
DR=DR-1 

POKESl , 8 : POKESl , 129 : FORX=20TO0STEP- . 
25 : POKE54273 , X : NEXT : POKESl , 8 
IFPEEK(P+1)=58THENL=P-39:GOSUB1450 
I FPEEK ( P-1 ) =59THENL=P-42 : GOSUBl 450 
RETURN 


REM  TURN  DRAGON  /  CREATE  A  NEW  ONE 

H=INT(RND(1J*835)+1106:L=H:BB=INT(RN 

D(l)*2) :X=PEEK(H) 

IFX=37THENM=41 : GOSUB1420 : RETURN 

IFX=41THENM=3 7: GOSUBl 420: RETURN 

IFRNDC1)> .033THENRETURN 

FORI=-80TO120STEP40 : FORJ=-2T03 : IFPEE 

K(H+I+J)  0  32THENRETURN 

NEXT : NEXT : M=41 ; DR=DR+1 : IFBB=1THENM=3 

7 

GOSUB1420 : RETURN 


REM  THE  DRAGONS  HAVE  WON 

PRINT"[CLR)":POKE53280,2:POKE53281,2 

POKE53272,21:PRINT"{CLR]g33"TABCl3 

)"{24  DOWNJTHE  DRAGONS  WIN" 

FORX=1TO23:PRINT:FORT=1TO150:NEXT:NE 

XT:POKE53280,14:POKE53281,6:GOTO1080 


A  knight  zaps  a  dragon  in  "Dmgoivnaster,"  64  version. 


2140  POKEZZ, 32 : POKENZ, 35 : ZZ=NZ :P0KEZZ+542 

72,  CW 
2150  ZZ=NZ:IFPEEK(ZS+1)=530RPEEK(ZZ-1)=53 

ORPEEK( ZZ+40 )=53THENGOSUB1640 
2160  IFZZ> H03ANDPEEK( ZZ-40 ) =53THENGOSUBl 

640 
2170  RETURN 
2180  : 
2190  : 
2200  DATA60, 66, 165, 129, 153, 165, 66, 50, 170, 

85,170,85,170,85,170,85 
2210  DATA0, 56, 108, 254, 15, 15, 31, 31, 0,0,  0,0 

,1,6,12,152 
2220  DATA255, 63, 63, 31, 3 1,1 5, 31, 61, 176, 176 

,152,216,220,252,248,224 
2230  DATA0, 0,0, 0,128, 96, 48, 25, 0,28, 54, 127 

,240,240,248,248 
2240  DATA13, 13, 25, 27, 59, 63, 3 1,7,  255,  252,  2 

52,248,248,240,248,188 
2250  DATA0, 0.84, 124, 108, 56, 56, 189, 21, 3 1,2 

7,31,14,14,14,94 
2260  DATA255, 255, 255, 255, 170, 255, 255, 0,25 

4,254,254,254,170,254,254,0 
2270  DATA0, 0,0, 0,0, 0,255, 0,0, 0,0, 32, 24, 6, 

1,0 
2280  DATA0, 0,16, 8, 4, 2, 1,0, 0,8, 4, 4, 2, 2, 1,0 
2290  DATA24, 126, 90, 2 19, 24, 36, 66, 195, 0,24, 

60,90,24,36,0,0 
2300  DATA0, 0,0, 24, 24, 0,0, 0,16, 0,2, 72, 2, 21 

,75,21 
2310  DATAl 30, 16, 64, 162, 72, 160, 90, 224, 7, 42 

,133,18,5,32,4,0 
2320  DATA168,210,168,64,18,64,8,32,0,40,6 

8,82,5,10,21,10 
2330  DATA0, 0,0, 0,1, 2, 4, 16, 85, 42, 21, 10, 21, 

10,21,40 
2340  DATA128,144,0,144,72,164,80,160 

Program  4:  Dragonmaster- Atari  version 

Translation  by  Chris  Metcolf,  F'rogramming  Assistant 

1000  GOSUB  Z270:PQKE  77,0;POKE  752,1 

: SC  =  PEEK  <8B) +PEEK (89) »256 
1010  CH=PEEK (742) *2S6-1024 
1020  IF  PEEK (CH+24) =60  AND  PEEK(CH+2 

55)=160  THEN  1060 
1030  POSITION  4,9:PRINT  #6; "PLEASE  W 

AIT":PRINT  #6sPRINT  «6;"  DATA  B 

EING  READ  IN" 


'VE 
GOT  TO  DIG 
DEEP  TO  FIND 

A  MORE 
EXCITING  GAME 

THAN 
MINER  2049ER: 


Now,  Reston  brings  Commodore  VIC-20" 
and    Commodore  64"  owners  one  of  the  hottest 
home  computer  games  ever  created — Miner 
2049er"  Help  the  legendary  Mountie,  Bounty 
Bob'"  chase  the  dastardly  Yukon  Yohan  through 
an  obandoned  uranium  mine — all  ten  levels  of 
it.  But  you've  got  to  avoid  the  deadly  radiooc- 
tive  mutants.  And  watch  out  for  pulverizers, 
explosives,  slides  ond  foils.  And  grab  all  the 
treasure  you  can  along  the  way.  And  beat  the 
clock.  Any  computer  game  you've  played  up  to 
now  has  just  been  practice  for  Miner  2049©^'" 
It's  fast  and  furious,  a  gold  mine  of  action  for 
the  serious  computer  gamer.  And  Commodore 
VIC-20'"  and  Commodore  64"  owners  can  get  it 
only  from  Reston. 
A  Creative  Pastime "  from       /i 


Ke^tot  :>o^ytfan.t 


A  Prentice-Hall  Company 

11480  Sunset  Hills  Rd.  Reston,  VA  22090 

Available  at  your  local  computer  retailer  or  call  us  at 

(800)  336-0338. 

Commodore  VIC-20  and  Commodore  6^  ore 
registered  -trademarks  of  Commodore  Computer,  inc. 


Miner  2049er  and  Bounty  flab  are  registered  trademarks  a(  Big  Five  Software. 


,^.M:..u.,.  ...... .msmms&m mi- ^.i^c^ius^:. 


RINT     #6: 


tS     SPACEB> 


-t*^iir-Mir 


'Dragonmaster , "  Atari  version. 


1040 


1050 
1060 
1070 

1080 
1090 
1  100 
1110 
1  120 

1130 

1140 

1150 

1  160 

1170 
tlB0 
1190 


1200 


1210 
1220 
1230 

1240 


1250 


1260 


1270 


1280 

1290 
1300 


AND  PEE 


PEEK (P+1 


P,53 


AND  PEE  1490 


FOR  1=1  TO  15:READ  A:NEXT  I : FOR 

D=CH+24  TO  CH+255:READ  fl:POKE 
D,A:NEXT  D 
REM 

REM  l;iife*rf:l:>J::;ftM;T;1g 
RESTORE  : DR=15:K=2: P=BC+30: GR=0 
;  CW  =  0 

GOSUB  1240:6OSUB  1450 
ZZ=SC+212:POKE  22,35+192 
REM 

V=15-STICK (0) : Q=P: V=V/2 
IF  V<>INT<V)  AND  PEEK(P-20)=0  T 
HEN  P=P-20 

V=INT CV) /2: IF  V<>INT<V) 
K<P+20)=0  THEN  P=P+20 
V=INT (V) /2: IF  V<>INT(V) 
K(P-1)=0  THEN  P=P-1 
V  =  INT  (V) /2:  IF  VO0  AND 
)=0  THEN  P=P+1 

IF  OOP  THEN  POKE  Q,0:PDKE 
+12B:S0UND  1,100,6,15 
GOSUB  lBa0:SOUND  1,0,0,0 
IF  STRIG(0)=0  THEN  GOSUB  1760 
IF  PEEK(P+1)=37  OR  PEEK(P+1)=60 
+64  OR  PEEK(P-1)=42  THEN  GOSUB 
1590 

IF  PEEK (P+20) =37  OR  PEEK(P+20)= 
60  +  64  OR  PEEK  (P  +  20) =42  THEN  GOS 
UB  1590 

GOSUB  2020:GDTO  1110 
REM 
REM  H:fe*<;llI^**iJ.i-M:i;i>^fc>:*i<WiWW=t.'Ja 

I! 

GOSUB  2270: POSITI DN  4,i:PRINT  # 
6:  "P!IJ^t-t.1t':.T^t--4TJB"  :  PRINT  #6:  PRINT 
#6 

MiHlsOii  BLAST  ALL": 
■■  DRAGONS  AND  ENTER" 
■•  CASTLE  TO  RESCUE"-.  PR 
PRINCESS.  ": PRINT  #6;  PR 


1310  PRINT  #6;"<:3  SPACES! 

BT":  PRINT  #6;"<3  SPACES>| 

EE^a?IE"  :SL=15:  GR  =  0 
1320  A=PEEKC764) : IF  PEEK ( 764 ) =255  TH 

EN  GR=GR+0. 4; GR=GR- (eR>=256) *25 

6+( INT(GR)=198) ;POKE  711,INT(GR 

) : GOTO  1320 
1330  POKE  764,255:GOSUB  2270:POKE  75 

6,CH/256:IF  A=30  THEN  SL=10:RET 

URN 

IF  A=26  THEN  SL=6: RETURN 

IF  A=24  THEN  SL=3: RETURN 

RETURN 

REM 

REM 


DRHW     flMD     ERRSE     DRflGOMS  .      ETI 


CL  =  0 

caL=CL»64 

POKE  L,M+COL:POKE  L+1, 

OKE  L+20,M+2+COL: POKE 

COL; RETURN 

POKE  L,0;POKE  L+1,0;POKE  L+20,0 

:POKE  L+21,0:RETURN 

REM 

REM 


1340 

1350 

1360 

1370 

1380 

1390 

1400 

1410 

M+l+COL: P 

L+21,M+3+ 


1420 

1430 
1440 

1450 
1460 

1470 


1480 


PRINT  #6; 
PRINT  #6; 
PRINT  #6; 
INT  #6; 
INT  #6 
PRINT  #6; 
RINT  #6;" 


Barn:  dragons   from":p 

FRONT  WITH  BUTTON.":? 

RINT  #6:PRINT  tt6         

PRINT  #6;"   ELIMINATE  HmEIEE"  : 
PRINT  #6;"  lJ:T:Trfii:  LAST.  " 

PRINT  #6:PRINT  #6     

PRINT  #6;"C3  ■^ParFRi  iM-MJ.tar"  :  P 


1500 
1510 

1520 

1530 
1540 

1550 
1560 
1570 
1580 
1590 

1600 

1610 
1620 

1630 

1640 
1650 

1660 
1670 
1680 

1690 


IHITIHLIZE  plrvfj:ei-i>  drrgo 


a 

GOSUB  2270:POKE  756,CH/256 

FOR     C  =  CH     TO     CH  +  7:POI<E     C,0:NEXT 

CiCL=l 

L=SC+190: M=45: GOSUB  1400:POKE  S 

C+209, 49+64: L=L-3j M=60: GOSUB  14 

00: F=36+128 

FDR  X=SC  TO  SC+19:P0KE  X,F:NEXT 

X:FOR  X=SC  TO  SC  +  460  STEP  20:  P 
OKE  X,F;POKE  X+19,F:NEXT  X 
FOR  X=SC+460  TO  SC+479:P0KE  X,F 
iNEXT  X:FOR  X=l  TO  15:Z=INT<RND 
( 1  J  «2) 
READ  A: M=41 : L=SC+42+A: IF  Z  THEN 

M  =  37 
GOSUB  1390rNEXT  XsPOKE  756,CH/2 
56:P0KE  SC+30 , 53+ 1 28 : POKE  SC+13 
,53+128:P0KE  SC+14, 53+128 
DATA  1,14,31,69,101,111,200,206 
,212, 268, 274, 314, 353, 362, 367 
FOR  X=49  TO  52:POKE  SC+209,X+64 
FOR  T=l  TO  75:S0UND  0,(S4-X)«40 
,  10,  15-T/5:NEXT  TiNEXT  X 
GOSUB  1630 
RETURN 
REM 

REM  m^>*^^ii;i.M:l;;  Wh^W  M  |i|  I 
FOR  F=l  TO  2:F0R  X=150  TO  80  BT 
EP  -1:B0UND  0, X , 1 0, 1 5 : NEXT  X 
FOR  X=80  TO  150:SDUND  0,X,10,15 
:NEXT  X:SOUND  0,0,0,0 
POKE  P, F+53+ 12B: NEXT  F 
POKE  SC+15-K, 36+128: K=K-1 : IF  K< 
0  THEN  1970 

0: P=SC+30: POKE  P, 53+128: 


PHOMTOM  DRHGOH  DIE3  J   UICTOl 


POKE  P, 

RETURN 

REM 

REM 

D 

L=P-19: CL=0: M=56:G0SUB  1400 

GDBUB  1820: L=P-19: GOSUB  1420 

FOR  X=52  TO  49  STEP  -1:P0KE  SC+ 

209,X+64:FOR  T=l  TO  75 

SOUND  0,  (54-X)  «40,  10,  15-T/5: NEX 

T  T:NEXT  X 
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AiGSoftwcae 

fiihosthe  ,  ^ 
iGomeWon 

'  11 :  riw's  defense  ^orcej-JJe^^^^^^^^  ^.^^  ^,gh,  leve^s^^^^^  ^^^^^ 


0.  600, 12C 


1  yourself. 
,  for  hours. 


thef^exttimeyourerea 
for  you!     , 


,  TO  outmoneu- 


NlGHTSTRll^E 

CAToriVersionl 


Oneortwoployers 
i6K  Required 


.  ^  •'•«5!^ 


„.HT.T.mEcn.0.O,CSo.e. 


.VJ^ 


DROIDS 

S^ieS^ofploy 
Oneo'tv.oployers 


.^,ori  400.600  «'^'*  i^!; 

ol  Aiori.  inc. 
.»VlC20i3atTode(tiarkof 
Com«.odOTe0ec.ro.^ics. 


1700 

1710 

1720 

1730 

17A0 
1750 
1760 

1770 
1780 

1790 

1800 
1810 
1820 

1830 

1B40 

1050 
1860 
1870 
1880 

1B90 

1900 

1910 
1920 

1930 

1940 
1950 
1960 
1970 

1980 

1990 

2000 
2010 
2020 

2030 

2040 

2050 


2060 
2070 
2080 


2090 

2100 
21  10 


FOR  X=SC+ 
,0:POKE  X 
NEXT  T:Ne 
GRAPHICS 
LOR  2,2,6 
POKE  756, 
NT  "AND  T 
PRINT  : PR 

EVER  AFT 
REM 
REM 
CL-0Z X=PE 

X=62-t-64 
IF  X<>39 
IF  X=39  T 
1400 

IF  Y=44  T 
1400 
DR=DR-1 
REM 

FOR  X=200 
5:NEXT  X: 
IF  PEEK(P 
UB  1420 
IF  PEEK<P 
UB  1420 
RETURN 
REM 
REM 
H=INT (RND 
INT(RND(1 


207  TO  5C+209:POKE  X-1 

,53+12a:F0R  T=l  TO  75: 

XT  X 

0:SETCOLOR  4,2,6:SETC0 

: SETCQLOR  1,1,2 

224:P0SITIDN  13,23:PRI 

HEY  LIVED" 

INT  "<9  SPACES>HAPPILY 

ER":GOTD  1990 


ELXMINHTE  R  DRRGO 


EK  <P+1 )  :y  =  PEEK(P-l >  :  IF 
AND  DR=0  THEN  1660 
AND  Y044  THEN  RETURN 
HEN  L=P-19: M=56: BDSUB 

HEN  L  =  P-22: M=56:  GOSUB 


TO  255:S0UND  0,X,10,1 
SOUND  0,0,0,0 
+1)=58  THEN  L=P-19:GOS 

-1)=59  THEN  L=P-22iGOS 


TURN  DRRGON,   CRERTE  HEH  ON 


(1) t396)+SC+42:L=H:BB= 
) «2) : X=PEEK(H) 


IF  X 

TURN 

IF  X 

TURN 

IF  R 

FOR 

2  TO 

RN 

NEXT 

B=l 

BOSU 

REM 

REM 

GRAP 

LOR 

POKE 

NT  " 

POKE 

:  FDR 

TO  1 

REM 

REM 

CW  =  C 

6 

POKE 

HEN 

IZ=I 

>  /20 

NZ  =  N 

s  IF 

1590 

IF  P 

POKE 

IF  P 

+  20) 

8  TH 

IF  Z 

128 

RETU 

REM 


=37  THEN  M=41:G0SU 

=41  THEN  M=37:B0SU 

ND  (  1 )  >0. 033  THEN  R 

I=-40  TO  60  STEP  2 

3: IF  PEEK (H+I+J> 

J:NEXT  I:M=41:DR= 
THEN  M=37 
B  1390: RETURN 


B  139a:RE 

B  1390:RE 

ETURN 
0:FOR  J=- 
THEN  RETU 

DR+1 : IF  B 


2120 
2130 
2140 
2150 
2160 
2170 
21B0 

2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 


THE  DRRQONS  HRUE  HO 


HICS  0:SETCOLOR  4, 

2,  4, 4: SETCOLOR  1,4 
756, 224: POSITION 

THE  DRAGONS  WIN" 
752, 1 : FOR  X=l  TO 
T=l  TO  35:NEXT  T: 

060 


4, 4:SETC0 

,8 

13, 23: PRI 

23: PRINT 
NEXT  X:GO 


THE  EMIU  HXZRRD  MOUE3 


W+7:1F  CW>255  THEN 

71  1  ,CW:CC  =  CC+1 :  IF 
RETURN 

NT  (  (  ZZ-SC )  /20)  :  IP  = 
)  : NZ=INT  <  C  I  Z  +  IP)  /2 
Z+CP-IP»20+ZZ-IZ«2 
PEEK (NZ) =53+12B  TH 


CW=CW-25 

CCOSL     T 

INT  <  fP-SC 
)  »20 

0) /2: CC=1 
EN     GOSUB 


iN 


92: 2Z=NZ 
)R  PEEKCZZ 
1 ) =53+12 


EEK(NZ)   THEN  RETURI 
ZZ,0:POKE  NZ,35+1 
EEK ( ZZ+ 1 ) =53+ 128  Ol 
=53+12B  OR  PEEKCZZ 
EN  GOSUB  1590 

Z>SC+39  AND  PEEK CZZ-20) =53+ 
THEN  GOSUB  1590 
RN 
r.l!M:r;T.H4:1>T:^J: 


DATA  60, 66, 1 
0, 170, 85, 170 
DATA  0, 56, 10 
,0,0,0,  1,6,  1 
DATA  255,63, 
76, 176, 152, 2 
DATA  0,0,0,0 
54, 127, 240, 2 
DATA  13, 13,2 


52, 248 
DATA  0,0,84, 
1  ,31  ,27,  31  ,  i 
DATA  255,255 
5,0. 254, 254, 
,0 

DATA  0,0,0,0 
,24, 6,1,0 
DATA  0,0, 16, 
,2,1,0 

DATA  24, 126, 
, 0, 24, 60, 90. 
DATA  0,0,0,2 
2,2,21,75,21 
DATA  130, 16, 
4, 7,  42,  133,  1 
DATA  168,210 
0, 40, 68, 82, 5 
DATA  0,0,0,0 
10,21, 10,21, 
DATA  128.144 
0 

GRAPHICS  17: 
COLOR  0,0,0: 
COLOR  2,4,25 


65, 129, 153, 165, 66, 6 

, 85, 170, 85, 170, 85 

B, 254,  15,  15.31,31,0 

2,  152 

63, 31, 31, 15,31,61, 1 

16,220, 252,248, 224 

,  128,96, 48, 25, 0,28, 

40, 248, 24B 

5, 27, 59, 63, 31,7, 255 

, 248, 240, 248, 188 

124,  108, 56,  56,  189, 2 

4, 14, 14, 94 

, 255, 255, 170, 255, 25 

254, 254, 170, 254, 254 

,0,0, 255, 0,0, 0,0, 32 
B,4,2, 1,0,0,8,4,4,2 


90, 219, 24, 36, 66. 195 
24, 36, 0, 0 
4,24,0,0,0,  16,0,2,7 

64,  162, 72,  160,  90, 22 

8,5,32,4,0 

, 168, 64, 18, 64, 8, 32, 

,  10,21,  10 

,  1  ,  2, 4,  16, 85, 42, 21  , 

40 

, 0,  144, 72,  164, 80,  16 

SETCOLOR  4,12,6:SET 
SETCOLOR  1,0,10:SET 
RETURN  O 


ATARr40(r 
AND  800* 
OWNERS 


Question  #6: 

How  can  you  have  64K 
RAM  and  complete 
compatibility  with  all  Atari 
products? 

A.  Weld  3  computers  together 

B.  Drugs 

C.  The  Mosaic  64K  RAM  Select 

D.  Exercise 

E.  All  of  the  above 


ZOfiE-ZtS-OOS-l 

]\e3  'is\esQ  3IVSOW  I^WE'Iu  jnoX  pup  uoni'uijojui 

3JOIU  joj   agqeiieAE  puiif  sji  jo  uia)sXs  Xjouidiu  paouPApp 
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Let  your  Atari  experience  the 

mpp 

iViPP-1150  Printer  interface 


Replaces  Atari  850™  Interface  Module. 

Compatable  with  all  software  [including  Visicalc™, 

Text  Wizard™,  Rlemanager  800™,  etc.]. 

5  foot  cable  with  Centronics  plug  [compatible  with  Epson, 

NEC,  Prowriter,  etc.]. 

2  year  warranty. 

Connects  to  serial  bus  on  connputer. 

Supports  serial  printer  with  additional  cable. 

Works  on  ALL  Atari  Computers. 


only 


MPP-1 


III 


IVioclem 


•  No  Atari  850™  Interface  Module  needed 

•  Smart  Terminal  Software  on  Cartridge. 

•  Direct  Connect  to  Phone  Line. 

•  Connects  to  Joystick  Port. 

•  Works  on  ALL  Atari  Computers. 

Smart  Terminal  Features: 

•  Multiple  Buffers 

•  Off-LJne  Editing 

•  Upload/Download  of  Text 
and  Programs 

•  Rjil/Half  Duplex 

•  Supports  XMODEM  Protocol 


9viitpJiO^ 


MPP-1000C 

Mod  am 


qO  Q  o  L. 


•  ASCII/ATASCII  Translation 

•  Allows  Transfer  of  RIes 
Larger  than  Memory 

•  Variable  Baud  Rate 

•  Parity  Options 

•  1 00%  Machine  Language 


new 


lo\A/  price 


miCROBITS  PERIPHERAL  PRODUCTS 

225  W.  Third  Street  •  Albany,  Oregon  97321  •  (503]  967-9075 


Moving  Maze 


Matt  Giwer 


Can  you  maneuver  through  "Moving  Maze"  while 
fighting  time  and  avoiding  the  relentless  pursuit  of  the 
Rover?  Impossible?  Try  it  and  see.  Written  for  the  Atari 
with  joystick,  versions  are  included  for  the  unexpanded 
VIC  (joystick  optiottal)  and  the  64  with  joystick. 


During  a  stop  for  refueling  on  an  out-of-the-way 
planet,  you  meet  a  mysterious  old  man  who  offers 
you  the  key  to  a  fantastic  treasure  buried  deep 
within  a  mountain.  Many  have  tried  to  get  to  it, 
but  all  have  been  stopped  by  the  unspeakable 
Rover  of  the  Maze.  The  old  man  has  the  master 
control  to  a  moving  maze  which  guards  the  treas- 
ure. With  his  dying  gasp  he  puts  it  in  your  hand. 
It  looks  like  an  antique  Atari  joystick.  "Push  the 
button,"  he  says,  "and  you  will  control  the  maze." 
Never  being  one  to  pass  up  an  adventure,  you 
start  off  toward  the  mountain. 

When  you  get  there  you  find  yourself  on  one 
side  of  a  slowly  moving  maze.  Every  once  in  a 
while  the  dark  red  Rover  passes  your  way.  If  you 
push  the  button  on  the  joy- 
stick, the  maze  speeds  up; 
if  you  release  the  button, 
the  maze  slows  down. 
Armed  with  that  secret 
you  enter  the  maze.  To 
get  the  treasure  you 
must  move  as  far  as  you 
can  to  the  right  side  of 
the  screen. 

Game  Movement 

"Moving  Maze"  uses 
Player/Missile  Graphics 
with  string  manipulation. 
The  heart  of  the  game  is 
the  technique  in  lines  2210 
and  2217.  This  routine 
scrolls  the  dimensioned 
PM$  RAM  that  is  devoted 
to  Players  1,  2,  and  3.  In 
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A  ship  is  about  to  enter  the  maze  in  the  VIC  version  of 
"Moving  Maze." 


this  game  the  vertical  yellow  lines  that  form  the 
maze  are  these  players.  The  speed  is  controlled 
by  lines  2400  and  2410,  where  the  scrolling  is  in- 
creased or  decreased  with  each  pass  through  the 
loop. 

You  move  verticall)'  and  horizontally  with  a 
joystick.  The  difference  in  the  two  motions  is  that 
you  can  move  horizontally  only  one  increment  at 
a  time.  This  is  controlled  by  setting  and  unsetting 
the  flag  (Fl)  in  lines  2300,  2301,  and  2305,  and  is 
necessary  due  to  the  speed  with  which  the  pro- 
gram executes  and  the  lack  of  sensitivity  of  the 
Atari  joystick.  Without  this  flag,  it  is  too  easy  to 
move  two  steps  at  once  and  crash  into  a  wall. 
Hitting  a  maze  wall  costs  you  one  life  and 
sends  you  back  to  the  start.  If  the  Rover  runs  over 
you,  it  costs  you  two  lives  (but  sometimes  you 
will  be  lucky  and  lose  only  one  and  not  be  sent 
back  to  the  beginning).  You  have  five  lives  to  lose. 
Your  final  score  will  be  300  points,  less  one  point 
per  second  it  takes  you  to  get  through,  plus  100 
points  for  each  life  you  have  left  when  you  finish. 

The  maximum  score  is  800 
points,  but  it  is  impos- 
sible to  achieve.  A  good 
score  is  750. 


Obstacles 

The  first  difficulty  is 
maneuvering  through 
the  walls  of  the  maze, 
which  are  set  up  in  the 
subroutine  at  the  5000 
lines.  Note  that  in  line 
55  the  PM$  was  not 
cleared  to  all  blanks  but 
was  set  to  146.  This 
turned  on  bits  1,  4,  and 
7,  which  are  those  cor- 
responding to  2,  16,  and 
128,  respectively.  Thus 
their  sum,  146,  is  put  into 


frtmBf:-^^^^0^1'^:0^^^^ 


In  the  flash  of  one  second, 

Delta-10  can  print 

the  alphabet  six  times. 


At  160  cps,  100%  duty  cycle,  Delta-10  is 
built  for  speed.  It's  the  dot  matrix  printer  that 
quickly  strikes  up  an  intense  working  relation- 
ship with  your  computer. 

There's  no  nonsense.  Delta-10  performs 
with  serial  and  parallel  interfaces  as  standard. 
The  8K  buffer  gives  Delta-10  the  1 1 

power  to  instantaneously  store  and 
print  data  as  it  frees  your  computer 
to  continue  its  job.  Turn  Delta  on 


m 


microoici'inc 

THE  POWIR  BEHIHD  THE  PRINTED  WORD. 

Computer  Peripherals  Division 
P.O.  Sox 612186.  Dalias/FI.  Wof Ih  Airport,  TX  75261 


and  it  can  print  three  crisp  copies  simul- 
taneously at  the  continuous  speed  of 
160  cps. 

And  Delta-10's  performance  isn't  only  meas- 
ured in  swiftness.  There's  the  diversity  of  its 
character  fonts,  its  true  descender  matrix, 
and  its  underlining  ability 
3/      Star's  new  Delta-10.  Designed 
^  for  red-hot  efficiency  And  isn't 
that  what  you  need? 


fn 

i 

n 
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BusGard^ 


NEW! 


BusCard  allows  you  to  expand  the 
capabilities  of  your  Commodore  64. 
It  gives  you.  easy  to  use  "BASIC  4" 
commands  and  the  fast  IEEE  interface 
for  access  to  the  Commodore  Business 
Machines  line  of  peripherals,  including 
high  capacity  dual  drives  and  hard  disk 
systems,  irnlike  other  interfaces, 
BusCard  is  fully  compatible  with 
software.  Wo  need  to  buy  a  printer 
interface  —  BusCard  Includes  a 
Centronics  printer  port.  Serial 
and  user  po]7ts  remain 
available  for  modem  and 
serial  peripherals.  Plus: 
machine  language 
monitor,  complete 
documentation  and  a 
one  year  warranty. 


S199 


Paperclip^** 

Professional  Word  Processor 

For  Commodore  64  and  CBM/SuperPet 


"Absolute^  t±Le  most  veraatUe  word  processor  I 

have  seen."  Midnight  Software  Gazette     March/April,  1933 

"...  a  veiy  powerful  word  processor,  with  so 
many  features  that  most  people  only  need  a         ; 
fraction  of  them"  compute'  ApriLlgsai" 

So  easy  to  use  that  even  novices  can  get 
professional  results. 

Paperclip  has  every  standard  word  processor 
function,  plus  many  exclusive  features,  including 
horizontal  scrolling  for  charts  and  wide  reports,  up 
to  250  columns,  colunm  moves,  alphanumeric 
sorts  and  arithmetic.  Works  with  80  column  cards 
and  every  popular  printer,  with  Instant  printer 
set-up.  Professional  handling  of  form  letters,  mail 
list  merge,  and  large  documents. 

Complete,  professional  and  easy  to  use.  No  where 
else  win  you  find  PaperCUp's  capabilities  at  this 
hreakthroiigh  price. 


SI25 


NEW! 
Delphi's  Oracle         '^ 

Professional  Data  Base  Management 

For  Commodore  64  and  PET/GBM 


Delphi's  Oracle  is  a  powerful  Information  handling 
program  that  allows  you  to  enter,  retrieve  and 
update  data  with  incredible  speed  and  flexibility. 

•  Large  record  size  (over  8000  characters)  •  Up  to 
99  fields  and  9  display  pages  per  record  •  Indiides 
report  writer  and  mail  label  printing  •  Design,  your 
own  forms  on  the  screen  or  on  printed  reports 

Delphi's  Oracle  brings  power  and  versatHLty 
usually  found  only  in  mainframe  or  minicomputer 
systems,  with  provision  for  safeguarding 
accurate  data  entiy,  and  excellent  flexibility  in 
searching  for  records. 


SI50 


INCLUDED 


FOR  MOKE  IlJFORMAnO]Sr  AND  YODB  NEAREST  DEALER: 


Citg^  Software  Distributors 
US  TOLL  FREE:  800-55B-1008 

73S  W.  Wisconsin  Ave. 

MUwaukse,  Wl  53233 

Software  International 
560  N.  Mountain  Ave. 
Upland,  CA  91786 
714-981-7640 


Batteries  Included 
186  Queen  Street  West 
-5bronto,  Ont.  M5V  IZl 
416-596-140S 

Software  Distritiutors 
10083  W.  Jefferson  Blvd 
Culver  City,  CA  90230 
Cal:  800-252-4025 
US:  800-421-0814 


CBM  Systems 

7668  Tfelegraph  ad 

City  of  Commerce,  CA  90040 

213-904-0111 

Kapri  International 
7419C]ybournAve. 
Sun  VaU^.GA  91352 
213-766-2774 


PET/CBM  and  Cammodora  64  are  trademarks  of  Commodore  Electronics,  Ltd. 


all  of  the  string  characters.  In  lines  5000  through 
5040  I  set  some  of  these  lines  to  other  combinations 
of  2,  16,  and  128,  specifically,  18,  130,  and  144. 
This  sets  up  a  random  series  of  openings  in  the 
lines.  However,  since  this  is  random,  there  may 
never  be  an  opening  in  some  walls,  so  lines  5050, 
5060,  and  5070  create  such  openings.  Line  5073 
puts  blanks  into  the  Missile  and  Player  0  pages, 
and  lines  at  5080  read  in  the  shapes  for  Player  0 
and  the  Rover  which  are  the  combination  of  the 
four  missiles.  Player  0  has  two  shapes,  the  normal 
playing  shape  and  the  explosion  shape. 

The  next  difficulty  is  avoiding  the  Rover, 
who  sweeps  the  corridors  of  the  maze.  Its  move- 
ment is  not  totally  random,  however.  In  the 
routine  at  5200,  the  range  of  the  random  variable 
for  the  Rover  depends  upon  your  location  in  the 
maze.  If  you  are  outside,  all  corridors  are  equally 
likely.  However,  the  farther  you  get  into  the  maze, 
the  less  "choice"  the  Rover  has.  When  you  are  in 
the  last  corridor,  the  Rover  roams  only  the  last 
two  corridors.  Thus,  the  closer  you  get  to  exiting 
the  maze,  the  more  likely  the  Rover  is  to  attack 
you  in  that  corridor.  Since  the  Rover  (the  com- 
puter) knows  where  you  are,  it  can  attack  you 
more  frequently  when  you  are  closest  to  winning. 
The  Rover  is  not  a  typical  adversary. 

Colliding  with  the  maze  wall  is  handled  in 
the  5100  lines.  This  routine  writes  in  the  explosion 
shape,  provides  an  audio  effect,  decreases  the 
lives,  does  some  housekeeping,  and  then  puts 
the  player  back  to  the  beginning  with  the  original 
shape.  The  5400  lines  handle  being  run  over  by 
the  Rover. 

Other  Game  Features 

The  routine  at  line  5700  handles  the  timing  and 
scoring  for  the  game.  Line  5700  calculates  the 
number  of  seconds  since  the  internal  clock  in  re- 
gisters 18,  19,  and  20  was  reset.  When  the  game 
first  comes  on,  it  has  measured  the  time  since  the 
GRAPHICS  0  call  in  line  30018,  which  resets  them 
automatically.  These  are  reset  within  the  game  in 
line  5790.  Register  20  is  read  first  and  reset  last 
since  it  changes  the  fastest.  This  method  also  gives 
the  most  accurate  time  measurement. 

Line  5710  determines  the  score,  and  the  sec- 
ond statement  in  that  line  requires  that  you  com- 
plete the  maze  to  get  any  score  at  all.  Therefore, 
winning  requires  completing  the  maze  and 
moving  your  player  to  the  right.  The  rest  of  the 
lines  are  resets  for  a  new  game. 

Finally,  the  data  for  the  player,  the  Rover, 
and  the  explosion  are  in  lines  10000-10020. 

The  string  manipulation  technique  in  this 
game  uses  scrolling  to  good  advantage.  It  permits 
the  user  to  control  the  speed  of  the  motion  and  to 
employ  it  in  the  game  as  an  additional  control 
variable.  This  adds  complexity  and  requires  more 

76    COMPUIB    OcSober1983 


than  a  little  getting  used  to  in  order  to  play  the 
game  well. 

The  technique  also  permits  a  very  compact 
game.  The  program  requires  a  bit  over  5K  and, 
when  running,  well  under  lOK.  Further,  I  made 
no  use  of  the  unused  2K  in  PM$  but  rather  DIMen- 
sioned  another  array  B$  for  convenience.  As  to 
the  power  of  this  technicjue,  it  would  be  difficult 
to  find  another  game  using  full  P/M  graphics  in 
single-line  resolution  with  as  much  motion  and 
challenge  that  uses  so  little  RAM.  This  is  why  I 
urge  you  to  examine  and  master  the  technique. 

Program  1:  Moving  Maze  -Atari  Version 


S0  DIM  PM* (4096) , E* (250 

55  PM*  C  1  > =CHR* (146)  :PM* 
46) :PM» (2) =PM* ( 1 ) 

56  B* ( 1) =CHR« (0) : B« (250 
2) =B* ( 1 > 

90  SP=0 

1900  GOSUB  30000: BOSUB 

00:GOSUB  5800 

2100  FOR  1JI<:  =  0  TO  1  STE 

2120  IF  S1=0  THEN  BOSUB 

2210  PM«  (ST-76a,ST--768  + 

24 + 25 5- SP, ST +1024+ 

67+SP, ST-1 >=PM* (ST 

SP) 

PM*(ST+2«256+l+SP, 
(ST-767+SP, ST-1 ) : P 
512+SP) =PM» (ST-768 
T=STICK (0) : IF  T=15 
TO  2350 
IF  Fl=l  THEN 
Fl=l : IF  T>12 
PX=PX+6* (T=7) 
) -6* (PX>199) 
PX=PX+6*  <T  =  7) 
) -6* (PX>200) 

2350 
PY=PY+10»(T=13)-10 
Y<35) -10* (PY>225> : 
, ST+2B3+PY) =B« (1,5 
PMY=PMY+10: IF  PMY> 
B  5200 

PM» (ST+4a6-PMY, ST+ 
1  ,78) 

IF  PEEK (53260) <>0 
00 
IF 
00 
IF 


2217 


2300 

2301 
2305 

2310 

2314 


2320 
THEN 

-6«  (T 
POKE 

-6»  (T 
POKE 


2320 

2350 

2360 

2365 

2370 

2400 

2410 

2500 
2501 
2900 
4999 
5000 

5010 

5020 
5030 


PEEK  <5325B) <  >0 


THEN 


STRIG (0) =0 
P>200  THEN  SP=200 
IF  STRI6(0)=i  THEN 
P<0  THEN  SP=0 
IF  PX>ia0  THEN  Sl= 
IF  LIVES<=0  THEN  S 
NEXT  UK 

REM  SET  UP  MAZE  & 
FDR  I=ST+512  TO  ST 

32 
T=INT (30«RND (0) ) +1 

IF  T<28  THEN  FDR 
(  I+a ,  I  +  J  >  =CHR* ( IB) 
IF  T>27  THEN  IF  T< 
=0  TO  31:PM* ( I+J, I 
:NEXT  J 

IF  T>2S  THEN  FOR  J 
I+J,  1+J>  =CHRt (144) 


) 

( 1096) =CHR« ( 1 

) =CHR« (0) ; B* ( 

5000: GOSUB  52 

P  0 

5700 
SP) =PM« (ST+10 
255) : PM* (ST-7 
+512, ST+1280- 

ST+5*256) =PM» 
M*  <ST  +  512, ST  + 
, ST-76a+SF) 
THEN  F1=0:GO 

2320 

=  1  1  ) +6* (PX<55 

53248, PX 

=  1  1 ) +6* (PX<56 

53248, PX: GOTO 

« (T=14) +10*  (P 

PM* (ST+236+PY 

7) 

506  THEN  GOSU 

513-PMY) =B* (5 

THEN  GOSUB  51 

THEN  GOSUB  54 

SP=SP+1 : IF  S 

SP=SP-2: IF  S 

0: WIN=1 
1=0 

PLAYER 
+5*256-1  STEP 

:  IF  T>25  THEN 
3=0    TO  31:PM* 
:NEXT  J 
29  THEN  FOR  J 
+J) =CHR* ( 130) 

=0  TO  31:PM*( 
:NEXT  J 


JUMPMAN'SAGREATGAME. 
BUT  YOU'VE  GOTTO  WATCH  YOUR  STER 


■w:ij'i5-wr 


■%^.i 


SV- 


Meet  the  Alienators.  A  fiend- 
ish bunch  who've  planted  bombs 
throughout  your  Jupiter  Command 
Headquarters. 

Your  job?  Use  your  lightning 
speed  to  scale  ladders,  scurry 
across  girders,  climb  ropes  and  race 
through  30  levels  to  defuse  the  bombs  before  they  go  off. 

That's  the  kind  of  hot,  non-stop  action  we've 
packed  into  the  award-winning* best-selling  Jumpmanr 
and  into  Jumpman  Jr.'"our  new  cartridge  version  with 
12  all-new,  different  and  exciting  screens. 

Both  games  force  you  to  make  tough  choices. 
Should  you  avoid  tiiat  Alienator,  climb  to  the  top 


and  try  to  work  your  way  down,  or  try  to  hurdle 
him  and  defuse  the  bombs  closest  to  you 
before  they  go  off? 

If  you  move  fast  you'll  earn  extra  lives. 
But  if  you're  not  careful,  it's  a  long  way  down. 

So  jump  to  it.  And  find  out  why  Jumpman 
and  Jumpman  Jr.  are  on  a  level  all  their  own. 

One  to  four  players:  8  speeds;  joystick 
control.  Jumpman  has  30  screens.  Jumpman  Jr. 
has  12  screens. 


Epyx 


snisnevGAMts  nti  THiMoioii-GmE  pumtt. 

*1983C.E.S.  aw.irri  winner. 


5040 

NEXT  I 

5730 

5048 

REM  ASSURES  A  PASSAGE  THROUGH  T 

HE  MAZE 

5731 

5050 

FOR  J=0  TO  31 :PM« (768+ST+J , 768+ 

ST+J) =CHR* < IB) : NEXT  J 

5732 

5060 

FOR  J=0  TO  31 : P«* t 1024+ST+J, 102 

4+ST+J) =CHR*(130) ;NEXT  J 

5733 

5070 

FOR  J=0  TO  31 : PM* ( 1 132+ST+J j 1 15 

2+ST+J) =CHR* ( 144) : NEXT  J 

5740 

5073 

PM* (ST, ST +250) =B*:PM«<ST+256,ST 

5750 

+506) =B* 

5780 

5079 

PY=128: PX=67 

5080 

FOR  1=1  TO  7:READ  A: B* (20+ I , 20+ 

5781 

I)=CHR«<A>  :NEXT  I  :  PO.  .E  5324B,PX 

5783 

:POKE  704, 78:PM* (ST+246+PY, ST+2 

96  +  PY) =B*  CI  , 57) 

5784 

50B5 

FOR  1=1  TD  8: READ  A : B* ( 60+ I , 60+ 

I )=CHR« (A) : NEXT  I 

5790 

5087 

FOR  1=1  TO  16:READ  AsB*t90+I,90 

+  I)=CHR*(A)  -.NEXT  I 

5B00 

5090 

RETURN 

5810 

5099 

REM  HIT  WALL 

5815 

5100 

POKE  53278,0 

5820 

51  10 

PM*  CST  +  246  +  PY, ST  +  293  +  PY) =B*  (80, 

5825 

106) 

5830 

5120 

FOR  J=15  TD  0  STEP  -2:F0R  1=250 

5890 

TO  50  STEP  -50:SOUND  0,I,6,J:N 

10000 

EXT  I:NEXT  J : SOUND  0,0,0,0 

5130 

LIVES=LIVES-1 

10010 

5131 

POSITION  35,0:7  LIVES; 

5182 

PM* (ST  +  246  +  PY, ST  +  276  +  PY>=B»  <220 
,  250) 

10020 

5184 

PY=128: PM* (ST+236+PY, ST+283+PY) 

30000 

=B* < 1 ,57) : PX=67:PDKE  53248, PX 

30018 

5190 

RETURN 

30022 

5199 

REM  SETS  RANDOM  PATH  FOR  ROAMER 

5200 

J=8:IF  PX>66  THEN  IF  PX<79  THEN 
J=9:B0T0  5220 

30030 

5201 

IF  PX>78  THEN  IF  PX<91  THEN  J=S 

31000 

:GOTD  5220 

31010 

5202 

IF  PX>90  THEN  IF  PX<103  THEN  J= 

7:6DTO  5220 

31020 

5203 

IF  PX>102  THEN  IF  PX<115  THEN  J 

31022 

=6:B0T0  5220 

31030 

5204 

IF  PX>114  THEN  IF  PX<127  THEN  J 
=5:60T0  5220 

31040 

5205 

IF  PX>126  THEN  IF  PX<139  THEN  J 
=4: GOTO  5220 

31041 

5206 

IF  PX>138  THEN  IF  PX<151  THEN  J 

31090 

=3: GOTO  5220 

32000 

5207 

IF  PX>150  THEN  J=2 

5220  T=INT(J»RND( 
:PMY=230 

5230  POKE  53255, P 
DKE  53253, PM 

5290  RETURN 

5399  REM  ROAMER  H 

5400  POKE  53278,0 
5410  FDR  1=250  TD 

=15  TO  8  STE 
5420  SOUND  0,1,10 
NEXT  J:NEXT 

5480  SOUND  0,0,0, 

5481  POSITION  35, 
5490  RETURN 

5700  SECS=INT( (PE 
9) «256+PEEK ( 

5710  SCR=300-SECS 
(WIN=1 ) :POKE 

5711  IF  SCR>HSCR 
5720  POSITION  22, 

S:  "sLIVES; 
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0) >+l:PM=178-T«12-3 

M:POKE  53254, PM+2:P 
+4;POKE  53252, PM+6 

ITS  PLAYER 

190  STEP  -30:FOR  J 
P  -1 

, J: SOUND  1,1,6, J-4: 
I  : LIVES  =  LIVES-1 
0:SOUND  1,0,0,0 
0!?  LIVES; 

EK ( 18) «65536+PEEK ( 1 
20) ) /60) 
+100*LIVES: SCR=SCRt 

623, 18 
THEN  HSCR=SCR 
0:?  "<:6  SPACES>LIVE 


POSITION  22, 1 : 
ECS;  ■•    ■■  ; 
POSITION  22,2: 
^3  3PACESJ"; 
POSITION  22,3: 
HSCR 

POSITION  22,4: 
TART" 

IF  STRIG(0)=1 
GQSUB  5800 
POKE  623, 17: SI 
SECS=0: SP=0 
POSITION  35,0: 
PM*  <ST  +  246  +  PY, 
,  250) 

PY=12a: PM*  <ST  + 
=B* (1 ,57) : PX=6 
POKE  1S,0:POKE 
ETURN 

POKE  18.0:POKE 
POSITION  22,0: 
POSITION  22, 1 : 
POSITION  22,2: 
POSITION  22,3: 
POSITION  22,4: 
RETURN 
DATA  128,224, 
28 

DATA  255,255, 
55, 255 

DATA  24,60, 12 
24, 24, 24, 24, 2 
REM  PM  SETUP 
GRAPHICS  0 
POKE  559,62sP 
623, 17 

POKE  752, 1 : ? 
710,96:POKE  7 
REM  FIND  PMBA 
ADHI=INT (ADR ( 
0=ADR (PM*) -25 
P=INT ( (ADHI+a 
POKE  54279, P« 
ST=8»P*256+10 
POKE  53249,75 
OKE  53251 , 147 
FOR  1=1  TO  3; 
KE  704+1,218: 
RETURN 
SAVE  '■D:MA2E" 


?  "   SECONDS:   " ; S 

?  "SCORE:   ■■  ;  SCR;  " 

?  "HIGH  SCORE:   "; 

?  "PUSH  TRIG  TO  S 

THEN  5740 

=1 : LIVES=5: WIN=0: 

?  LIVES; 
ST+276+PY)=B*(220 

236+PY, ST+283+PY) 
7:P0KE  53248, PX 
19,0:POKE  20,0:R 


19,0:POKE  20,0 

?  "ti2  spaces: 

7  "{16  SPACES> 

?  "tl6  SPACES> 

?  "tl6  SPACES> 

?  "{IS  SPACES> 


248, 252, 248, 224,  1 

255, 255, 255, 255,2 

6, 255, 255, 126,60, 
4, 24, 24, 90, 126 

OKE  53277, 3:P0KE 


"{CLEAR>  "; SPOKE 

09, 12: POKE  712, 96 

SE 

PM*) /256) :REM  ADL 

6»ADHI 

)  /S) 

8 

24-256-ADR(PM*) 

SPOKE  53250, 1 11:P 

POKE  53256+1, 3;P0 

NEXT  I 

"Moving  Maze,"  Atari  version. 


^saysyou 

cant  beat 
Gridruimer. 

Gridrunner™  is  the  toughest,  fastest,  arcade 
quality  game  ever  to  challenge  a  Commodore"''  or  Atari® 
computer  owner. 

How  tough  is  Gridrunner? 
So  tough  that  He^are™  is  offering  $5  just  for 
taking  the  Gridrunner  challenge.  And  you  don't  even  have 
to  beat  the  game  to  get  the  greenbacks.  There's  a  check 
right  inside  every  Gridrunner  box,  good  for  $5  off  your  next 
HesWare  purchase.  You  spend  your  check  right  in  the 
store,  on  your  choice  of  exciting  HesWare  action,  education, 
and  computer  utility  programs.  Even  HesWare  peripherals. 

No  one,  not  even  the  author,  has  ever  reached 
even  the  14th  level  of  Gridrunner  But  maybe  you've 
got  what  It  takes  to  go  all  the  way  to  the  31st 
level  (20  levels  on  VIC  20™  version).  Maybe  you 
can  master  the  patterns  of  the  X/Y  Zappers. 
And  stop  the  Gridsearch  Droids  before  they 
mutate  into  lethal  Pods. 

The  Gridrunner  challenge.  Just  one    . 
of  the  ways  that  HesWare  is  expanding  the 
computer  experience.  Look  for  all  the 
HesWare  products  at  your  ^avorite 
software  retailer. 
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Program  2:  Moving  Maze -vie  version 

by  Marc  Sugiyama,  Programming  Assistant 

10  POKE55,94:POKE56,29:CLR 

15  PRINT"{CLR]"CHR$(8) ; : SS=36879 :CS=36865 
: FF=2  5  5 : POKECS , FF : F8=484 : Z4^4 ; Z5  =  5 : RL= 
62:RB=63 

DS=36869:SE=8164:T3=23:F4=44:H4=64:V1= 
36875 :DEFFNA(J)=Z3+J*Z3+S+F8*{JANDZ1) 
DIMTC5),D(4),K{4):23=3:SP=160:KS=197:Z 
Q=2:RB=7673:RC=7665:RM=1:BU=198:S2=.94 
:SN=1 

H8=128 :H3=32 : S=7680 :RS=57 : Z0=0 : Zl=l : SK 
=5;T2=22:T1=21:SH=57:ML=7518:ZB=176:LI 
=  3 

F0RI=1T04:READD(I) ,K(I) :NEXT: JD=37154 : 
Jl=JD-3 : J2=J1+X :POKEJD, 127 
FORI=1TO7:FORJ=0TO7:READA;POKE76 16+1*8 
+ J, A: NEXT: NEXT 

FORI=7518T07614:READA:POKEI,A:NEXT 
POKESS-l,10:A?="lRVS} {WHT} {3  SPACES} 
tOFF}{RED39{RVS]{2  SPACES] {OFF} {CYN 3 9 
{RVS3{2  SPACES 1 { OFF) {pur} 9 [RVS] 
{2  SPACES} {off} {GRN}9{ RVS} {2  SPACES  3 
{0FF}{BLU}9ERVS}{2  SPACES} {off} {YEL} 9 
{RVS}  ": PRINT "{home} "; :FORI=0TO21 
55  PRINTA$"{RVS)"CHR$(160)"  " ; :NEXT:PR1NT 
A$ " {RVS} "CHR? (160) "{home}"; :P0KE8185,1 
60 

FORI=0TOLI-1:POKES+T1+T2*I,61 :NEXT:POK 
ESS , 8 : POKEDS , FF : POKECS ,25: GOT0265 
POKEVl,240sOE=OE-Zl 
FORJ=0TO5 : I FT ( J ) =Z0THEN85 
T{J)=T(J)+Z1:IFTCJ)>SKTHENP0KEFNA(J),R 
S:T{J)=Z0 
GOTO90 

IFRND ( Zl ) >  S2THENT ( J ) =Z 1 : POKEFNA ( J ) , SP 
NEXT I POKEVl , Z0 : POKESL , El : SYSML: IFPEEK { 
SL ) =E10RPEEK ( SL ) =SPTHENPOKESL , OS 
RETURN 

IFROTHEN110 

R1=RND ( Zl ) > . 5 : RD=T2+F4*R1 : RT=INT ( RND ( 

Zl ) *Z5 ) *Z3+Z4-F8*R1+S 

POKEVl , 200 : POKERC+RM, FF : POKERB+RM, FF : 

IFR1THEN125 

RM=RM+Z1 : IFRM>Z4THENRM=Z0 

GOTO130 

RM=RM-Z1 : IFRM<Z1THENRM=Z5 

POKERC+RM, H8: POKERB+RM, Zl 

POKERT , SP : POKERT+Zl , SP : RT=RT+RD : RO=RO 

+Z1 : IFRO=T3THENRO=Z0 : POKEVl , Z0 : RETURN 

POKERT , RL : POKERT+Zl , RR: POKEVl , 20 : RETU 

RN 

IFPEEK(SL) <>0STHENEM=PEEKCSL) :GOTO240 

IF { PEEK { KS ) =H3 ) =Z0AND { PEEK ( Jl ) ANDH3 ) T 

HEN165 

ZW=  ( ZW+Zl ) ANDZ3 : 1PZW=Z0THENZW=21 

ONZWGOSUB65 , 100 , 65 iGOT0145 

DI=Z0:A=PEEKCKS) :IFA<>H4THEN195 

IF ( PEEK { J2 ) ANDH8 ) =Z0THENDI=Z4 : GOTO20  5 

J=PEEK(J1) :IF(JANDZ4)=Z0THENDI=Z1:GOT 

O205 

IF ( JANDB ) =Z0THENDI=2 : GOTO205 

IF(JAND16)=Z0THENDI=Z3 

GOTO205 

F0RI=1T04 : IFA=K( I )THENDI=I 

NEXT 

IFDI=Z0THEN235 

IFDI=Z3THENOE=OE-SN:IFINT((SL-S)/T2)= 

(SL-S)/T2THEN235 

IFDI=Z4THEN0E=0E+SN 


60 

65 
70 
75 

80 
85 
90 

95 
100 

105 

110 

115 
120 
125 
130 

135 

140 

145 
150 

155 
160 
165 
170 
175 

180 
185 
190 
195 
200 
205 
210 


VIC  Notes 

Marc  Sugiyama  Prograinming  Assistant 

The  VIC  version  of  "Moving  Maze"  (Program 
2)  uses  thie  same  game  layout  as  the  Atari 
version,  but  the  rules  of  the  game  tiave  been 
changed.  Whenever  you  run  into  a  wall  or 
the  Rover,  you  are  sent  back  to  the  beginning 
of  the  maze,  without  exception.  You  man- 
euver through  the  maze  using  the  I,  J,  K, 
and  M  keys  or  a  joystick.  Pressing  the  space 
bar  or  the  fire  button  on  the  joystick  causes 
the  maze  to  speed  up,  but  you  lose  one  point 
every  time  the  maze  moves.  You  cannot  move 
while  the  joystick  button  or  the  space  bar  is 
depressed.  When  you  complete  a  maze, 
another  will  appear,  but  the  openings  in  the 
walls  will  be  smaller.  The  game  ends  when 
you  lose  all  five  lives. 

Moving  Maze  uses  up  almost  all  of  the 
memory  of  an  unexpanded  VIC,  so  do  not 
enter  any  extra  spaces  or  REMs.  Also,  the 
program  will  not  handle  VIC's  floating 
memory,  so  remove  any  expansion  memory 
cartridges. 


215 
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220  EL=SL+D(DI) i IFEL<SOREL>SE+TlTHEN235 
225  POKEVl, 220 :E1=EM:EM=PEEK( EL) :IFEM<>SP 

THEN240 
230  POKESL ,  SP :  0S=SH+DI :  POKEEL ,  OS  :  SL=EL 
235  ZQ=23-ZQ : POKEVl , Z0 : ON2QGOSUB70 , 1 00 : GO 

T0145 
240  IFEM0224THEN255 
245  POKEVl, 0:SN=SN+1:SK=SK-1:1FSK<2THENSK 

=2 
250  FORI=1T05:POKESS, 25:A=TAN(I ) :P0KESS,8 

1 A=TAN ( I ) : NEXT : GOT0265 
255  POKESL , RS : POKEVl , 0 ; POKEVl+2 ,129: FORI= 

15TO0STEP-1 :P0KESS-1,I:A=TAN(I) :NEXT 
260  POKEV1+2,0:POKESS-1, 10:LI=H-^:1FLI=- 
1THEN270 
265  POKESL, El : SL=7922 :0S=61 : EM=OS ;E1=EM: P 

OKESL,OS:POKES+Tl+T2*LI,SP;GOT0145 
270  POKEVl , 0 : POKECS , FF : POKESS , 42 : POKEDS , 2 

40:PRINT"{CLR}{OFF}{2  DOWN] { WHT 3  YOU 

{space} HAVE  USED  ALL  OF" 
275  PRINTSPC(5)"Y0UR  LIVES  ... {DOWN} " 
280  PRINTSPC(7) "SCORE: "OE: IFOE>HITHENHI=0 

E : PRINT" {RVS}", • 
285  PRINT" {2  RIGHT}HIGH  SCORE £oFF} : "HI :0E 

=0 
290  PRINT" {down} [2  SPACES}PLAY  AGAIN  (Y/N 

) ? " : POKECS , 25 : POKEBU , 0 
295  GETA$ : IFA$  <  > "Y"ANDA$  <  > "N"THEN295 
300  I FA?= " Y"THENPOKECS ,255: LI=3 : SK=5 : GOTO 

50 
305  PRINT"{CLR}{bLU]"; : POKE JD, FF : POKESS, 2 

7:  END 
310  DATA  -22,12,22,36,-1,20,1,44 
315  DATA  126,126,126,126,126,126,126,126 
320  DATA  16,56,108,198,130,254,146,130 
325  DATA  130,146,254,130,198,108,56,16 


INTRODUCING  A  REAL-TIME 

WARGAME  SO  FAST  YOU'LL  CALL 

IT  A  STRATEGY  ARCADE  GAMEI 


At  SSI,  we're  the 
first  to  admit  that  the 
last  thing  our  war- 
games  are  famous  for 
is  their  speed  of  play. 
But  then,  our  strategy 
games  are  designed 
to  challenge  your 
mental  —  rather  than 
manual  —  dexterity. 

Now,  don't  get 
us  wrong.  We 
love  real-time 
arcade  aaion  as 
much  as  the  next 
person.  So  we've 
put  a  great  deal  of 
energy  to  develop  a 
game  that's  the  per- 
fea  union  of  these 
two  worlds:  heart- 
pounding  arcade 
excitement  in  a 
thought-provoking, 
tactically  challenging 
wargame. 

Today,  like  proud 
parents,  we  are 
delighted  to  announce 
the  successful  culmi- 
nation of  our  efforts: 
COMBAT  LEADER." 

In  every  way, 
COMBAT  LEADER  is 
the  Ideal  first-born  of 
this  new  hybrid  of 
strategy  arcade  war- 
games. 

As  a  strategy  simu- 
lation, it  has  all  the 
detailed  rules  to  make 
you  feel  like  a  real 
tjattle  commander 
poised  to  engage 
enemy  tanks  and 
infantry  on  a  scrolling 
map  display  of  foliage, 
hills,  open  and  rough 
terrain.  For  example. 


TC. 


•\ 


■^ 


COMBAT  LEADER 

On  48K  disk  or  cassette  for  the  ATARI®  400/800/1200;  $39.95.      ware  or  game  store 


there  are  complete 
ratings  of  armor  thick- 
ness and  strength, 
speed  and  fire  accu- 
racy for  over  70 
historical  and  modem 
tanks.  Accurate  rules 
govern  visibility  and 
enemy  sightings. 

As  an  arcade  game, 

COMBAT  LEADER 

doesn't  let  any  of 

these  details 
slow  down  your 

play.  The  computer 
handles  all  "book- 
keeping" chores  while 
giving  you  real-time 
action:  Your  troops 
look,  retreat  advance, 
paffol  and  ftre  the 
instant  you  order 
them  to  do  so.  No 
waiting,  no  pause.  In 
faa.  the  pace  is  so 
fast  we  had  to  pro- 
vide slower  levels  of 
play  to  give  you  a 
chance  at  this  game. 

At  SSI,  we  make  it  a 
habit  to  keep  adver- 
tising h^fje  down  to  a 
minimum.  So  when 
we  say  this  is  one  of 
the  fastest  and  finest 
games  around 
(strategy/  or  arcade), 
we  don't  do  so  lightly. 
Our  14-day  money- 
back  guarantee 
promises  you'll  agree 
with  us  once  you  get 
your  hands  on  it. 
■™       To  do  that  ail  you 
have  to  do  is  visit  your 
local  computer/soft- 


todayl 


If  there  are  no  convenient  stores  near  you,  VISA  and  Mastercard 
holders  can  order  dirert  by  calling  SOO-227-1 61 7,  ext.  33S  (toll 
free).  In  California,  call  800-772-3545,  ext  335. 


FROM  SSI 


To  order  by  mall,  send  your  check  to:  Strategic  Simulations  Inc 

883  Stierlin  Road,  BIdg.  A-200,  fVlountain  View,  CA  94043.  Please 
specify  disk  or  cassette.  (California  residents,  add  6.5%  sales  tax.) 


WRITE  FOR  A  FREE  COLOR  CATALOCa  OF  ALL  OUR  GAMES. 


Atari  is  a  registered  trademark  of  Atari  Inc. 


330  DATA  31,52,100,198,100,52,31,0 

335  DATA  248,44,38,99,38,44,248,0 

340  DATA  127,255,255,255,255,255,255,127 

345  DATA  254,255,255,255,255,255,255,254 

350  DATA  162,3,134,0,160,3,162,22,169,30, 

133,2,169,0,133,1 
355  DATA  177,1,133,251,24,165,1,105,22,13 

3,1,144,2,230,2,177 
360  DATA  1,133,252,165,251,145,1,165,252, 

133 , 251 , 202 , 208 , 230 , 200, 200 
365  DATA  200,162,22,169,31,133,2,169,228, 

133,1,177,1,133,251,56 
370  DATA  165,1,233,22,133,1,176,2,198,2,1 

77,1,133,252,165,251 
375  DATA  145,1,165,252,133,251,202,208,23 

0,200,200,200,198,0,208,166,96 


Guide  your  shuttle  through  the  maze,  64  version. 

Program  3:  shuttle  Escape  -  64  Version 

by  Eric  Brandon,  Programming  Assistant 

100  GOSUB3000 

110  PRIIJJTCHR?  ( 142  ) 

120  IF  PEEK(49153)<>169  THEN  GOSUB  10000: 

GOSUB  50000 
130  V=13*4096:CO=50 
140  POKE  V+16,0 
150  POKE  V+39,1:POKEV+40,1 
160  POKE  V+0,CO:POKEV+4,CO-2:POKEV+5,221 
170  POKE  V+1,200 
180  POKE  V+2,C0 
190  POKE  V+3,179 
200  POKE  V+21,3 
210  POKE  V+39,1:POKEV+40,1:POKEV+41,8:POK 

EV+42,1 
220  POKE  2040,245 
230  POKE  2041, 246 :POKE2043, 246 
240  POKE  2042,247 

250  FOR  K=l  TO  500  :  NEXT  K:POKEV+21,7 
260  GOSUB  2000 
270  1=200 
280  P=l 
290  Q=Q+.01*P 
300  P=P+.1:C=C+1 
310  I=l-Q 
320  IF  PEEK(2042)=248  THEN  POKE  2042,254: 

GOTO340 
330  IF  PEEK<2042)=254  THEN  POKE  2042,248 
340  POKE  V+l,I:POKEV+3,I-21;POKEV+5,I+21 
350  P0KES+22,P2:P0KES+23,10R(16-P2/16)*16 
360  P2=P2+P2/244 
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370  IF  C=60THEN  POKEV+23,4 

380  IF  C=20THEN  POKEV+2  3,4 

3  90  IF  C=40  THEN  POKEV+23 , 0 :POKE2042 , 248 

400  IF  C<70  THEN  290 

410  POKE  2040,249 

420  POKE  2043,250:POKEV+6,CO;POKEV+7,I:PO 
KEV+21,15 

430  Q=Q+.01*P 

440  P=P+.l:C=C+l:C2=C2+.6 

450  I=I-Q 

460  IF  PEEK{2042)=248  THEN  POKE  2042,254: 
GOTO480 

470  IF  PEEK{2042)=254  THEN  POKE  2042,248 

480  POKE  V+1, I:POKEV+5,I+21 

490  NR=I4-C2*C2:NC=CO+C2*3 

500  POKE  V+7,NR:POKBV+3,NR-21iPOKEV+6,NC: 
P0KEV+2,NC 

510  IF  C=83  THEN  POKE  2043 , 251 : POKE2041 , 253 

520  IF  C=86  THEN  POKE  2043,252 

530  IF  C=89  THEN  POKE  V+21,5 

540  POKES+22,P2 :POKES+23, 10R( 16-P2/16 ) *16 

550  P2=P2+P2/244 

560  IF  I>25  THEN  430 

5  70  POKE  S+4,128 

580  POKE  V+5,I+21 

590  1=1-2 :IFI>0  THEN580 

600  POKE  V+21,1 

610  FOR  J=l  TO  2000: NEXT 

620  PRINT" E HOME} [10  RIGHT} { WHT} { 2  SPACES} 
ORBIT  ACHIEVED. ..." 

630  FOR  1=1  TO  1000; NEXT 

640  POKE  2040,244 

650  POKE  V,0:POKEV+1,117 

660  FOR  1=0  TO  348  STEP2 

670  POKE  V,I  AND  255 : POKEV+16, 1/255 

680  NEXT 

690  FOR  1=0  TO  1000:NEXT 

700  GOTO  4000 

710  POKE  53281, 12 ;POKE53280, 12: PRINT" {WHT} 

720  END 

2000  S=54272 

2010  POKES+24, 15+16+32 : POKES+23 , 1+16*5 

2020  POKES+5,0 

2030  POKES+6, 16*15+15 

2040  POKES+4,129 

2050  POKES+1,11 

2060  P2=100: RETURN 

3000  POKE  53281, 0:POKE532a0,0 

3010  PRINT" (CLR}" 

3020  PRINT"? 5  DOWN}" 

3040  T=12 

3050  PRINTTAa(T)"E7  3£RVS}£{2  SPACES} 
{RIGHT}  {RIGHT}  {RIGHT}  {RIGHT} 
{RIGHT} {3  SPACES} {right} {3  SPACES} 
{right}  {3  RIGHT}£[2  SPACES}" 

3060  PRINTTABCt)"{RVS]  (3  RIGHT}  {RIGHT} 
E SPACE} {right}  {right}  {2  RIGHT) 
[3  RIGHT}  [2    RIGHT}  {3  RIGHT}  " 

3070  PRINTTAB(T)"E*S{RVS}  6*3 {RIGHT} 

{3  SPACES} {RIGHT}  { RIGHT}  {2  RIGHT} 
{SPACE) {3  RIGHT}  {2  RIGHT}  [3  RIGHT} 
{2  SPACES}" 

3080  PRINTTAB(T)"{RVS} {2  RIGHT}  {RIGHT} 
{RIGHT)  {right}  {right)  {2  RIGHT} 
{3  RIGHT}  {2  RIGHT)  {3  RIGHT }  " 

3090  PRINTTABCt)"{RVS) {2  SPACES }{ OFF) £ 
{RVS} {RIGHT}  {right}  { RIGHT }{0FFT 
E*3{RVS}  {OFF)£{RVS}{2  RIGHT} 
{3  RIGHT}  [2  RIGHT} {OFF) E*3{RVS} 
{2  SPACES} {RIGHT ] {OFF} E*a{ RVS} 
[2  SPACES}" 


DYNAMIC  PRINTER  INTERFACES 
for  the  VIC  2r  and  the  COMMODORE  64® 

UNLIKE  ANY  OTHERS  THAT  HAVE  COME  BEFORE  .     .     ., 

It'i  not  quick  or  easy  to  do  thingi  nghtH  After t  hog  mmidtt  ofna—reh  and  devaloprntnt:  RAX-Wara.  TfUAC  CONTROLS  CORP.  and  MtCRO-mK  0.1.  hava 
bnught  tha  worid  battar  paralat  mtarfacai.  Battar  bacausa  they  both  hava  tba  abiSty  to  pravida  TRUE  EMULATION  of  ttta  Commodora '  priatar.  That's  rightl! 
Graphic  Charaetars.  tabbing.  Dot  Graphics,  and  ttia  otfiar  faaturas.  A  fonmdabia  task  that  was  finaty  accompSthad  '  , 

THE  CONNECTION  -^  —  The  Ultimate  Parallel  interface  for  tf»  VIC  20  or  Commodore  64.  This  fully  intelligent  interface  plugs  into 
the  disk  (serial)  socket  just  like  the  standard  printer  It  can  easily  be  assigned  any  device  number  aiid  it  will  provide  virtually 
TOTAL  EMULATION  of  the  Commodore*  printer.  Using  the  latest  technology,  this  interface  will  display  the  full  GRAPHIC 
CHARACTERS  or  convert  them  to  their  equivalent  represetitatioiw  tn  clyrtaxt.  It  supports  all  of  the  standard  commands  (OPEN, 
PRINT#,  and  CLOSEI,  Column  tabbing,  dot  tabbing,  gra^ic  repe^MpNTessable  graphics,  and  the  other  features  of  the 
Commodore "  Printer  Software  designed  to  operate  with  Ae  CoiSiR»re»  Printer  will  operate  using  "THE  CONNECTION'^ 
Beside  this,  a  2K  buffer  has  been  provided,  a  full  printer  self  test,  LED  Status  indicators.  Printer  Reset  switch,  skip  over  perf, 
margin  set  and  programmable  line  length.  This  interface  is  printer  specific  to  take  advantage  ji|<Ne  special  features  of  your 
printer  In  the  standard  mode  (non-graphicsl,  it  is  designed  to  interface  virtually  any  parallel  piflBiijl|j||*Jt|Uidard  Centronics 
configuration  and  connector  Specify  your  printer  when  ordering.  Additional  ROM's  niav^|||||^^Ked  for  other  printer 


spplications; 


I  this  for 


DISTRIBUTING  INI 
1 342  B  Rt.  23,    f. 
Butler,  NJ  07405' 
201-838-9027 


BUFFERED  PARALLEL  CABLE  &  DRIVER  —  A  parallel  interface  for  the 
budget  minded.  This  interface  plugs  into  the  USER-port  and  comes  with  an 
extensive  manual  with  driver  iM^gs  for  the  VtC  20™  and  the  Commodore 
64".  It  can  be  used  with^jK^Uiny  printer  that  has  a  standard 
Centronics  type  configuratitm^Mmiection.  Fully  fauffmifor  maximum 
protection  of  your  computer  ONLY  $29.95  Add  "CABiflflENS' cartridge 
for  the  VIC  20  (diskette  for  the  64)  and  get  a  full  GrajM^^^tion  Driver. 
With  this  package  you  can  print  all  of  the  Graphi^pfsraictSrs  tfiat  your 
computer  has  plus  EMULATE  the  Commodor§^ 
printer  specific  to  take  full  advantaflfijif  your  pnin 
graphic  matrix  printers  ....  ^ 


■■^^^^^: 


'^Bff; 


Dealer  and  Distributor  ] 

Inquiries  Invited 


NOTE  We  solicit  harBware  aniJ  software  items  Iw  the  VIC  20'  and  CBM  64*   Royalties,  license  fees  Of  oulrigiit 
pu(clias«s  can  be  negolialed  CBM  54*  &  VtC  20'  aie  Registered  Tratiematks  o(  Commodofe  Business  Machnes  Inc 


64  Notes 

Eric  Brandon,  Programming  Assistant 

The  Commodore  64  version  of  "Moving 
Maze"  has  been  renamed  "Shuttle  Escape," 
since  it  has  a  space  shuttle  theme. 

Shuttle  Escape  plays  much  like  the  other 
versions.  The  main  difference  is  that  a  quan- 
tity called  FUEL  has  been  added  to  the  game. 
You  begin  with  2000  fuel  units  v^^hich  you 
lose  at  the  rate  of  60  units  each  second 
whether  the  shuttle  is  moving  or  not.  If  you 
touch  a  wall  or  one  of  the  roving  droids,  you 
lose  100  units  each  1/60  second.  When  you 
have  run  out  of  fuel,  the  game  is  over. 
Fortunately,  you  can  refill  your  tanks  by 
reaching  the  right-hand  side  of  the  screen. 

If  you  want  to  stop  the  game  for  a  mo- 
ment, just  hold  down  the  SHIFT  key.  If  you 
want  to  stop  the  game  for  a  longer  period  of 
time,  use  SHIFT  LOCK, 

You  can  speed  up  the  movement  of  the 
walls  by  holding  down  the  fire  button  on  the 
joystick.  This  won't  make  gaps  appear  any 
sooner,  but  it  will  speed  up  any  gaps  that  are 
already  there.  The  penalty  is  that  while  the 
fire  button  is  down,  your  fuel  disappears 
twice  as  fast. 

Programming  Shuttle  Escape  revealed 


some  interesting  problems.  The  first  is  that 
sparkle  -  little  specks  of  snow  -  appears  on 
the  screen.  Usually  this  causes  no  difficulty, 
but  when  you  try  to  use  the  VIC-II's  sprite- 
background  collision  detection  register,  it 
turns  out  that  sprites  can  collide  with 
sparkle! 

What  this  meant  to  Shuttle  Escape  was 
that  occasionally,  for  no  apparent  reason, 
the  shuttle  would  "collide"  and  you  would 
lose  100  fuel  units.  Since  moving  the  character 
set  eliminates  sparkle,  it  was  relocated  to 
$3000. 

Another  quirk  of  the  64  is  that  the  VIC-II 
chip  can  look  at  only  16K  of  memory  at  a 
time.  When  you  turn  on  your  machine,  it  is 
looking  at  the  first  16K  block  from  $0000- 
$3FFF.  It  was  decided  to  leave  it  there  for 
simplicity.  This  meant  that  the  sprite  data, 
the  relocated  character  set,  and  the  entire 
BASIC  program  all  had  fo  be  squeezed  into 
16K.  Because  of  this  memory  limitation, 
when  the  machine  language  creates  a  char- 
acter set  at  $3000,  it  destroys  the  DATA  state- 
ments in  the  program.  Fortunately,  the 
DATA  statements  are  no  longer  needed  since 
they  have  already  been  POKEd  into  memory. 

Because  running  the  program  will  de- 
stroy it,  be  sure  that  when  you  type  it  in, 
you  SAVE  it  before  you  try  to  RUN. 


3100  PRINT 

3110  PRINTTAB(T) "{CYN3 [RVS}£{2  SPACES] 
{RIGHT}£{2  spaces}! right }£ 
{2  SPACES} { RIGHT l£  E*31RIGHT3 
{2  SPACES }E* 3 {right] £{2  SPACES}" 

3120  PRINTTAB(T) "{RVS}  {3  RIGHT} 

{3  RIGHT}  {3  RIGHT}  E RIGHT}  [RIGHT] 

f SPACE 3 {right]  [right]  " 

3130  PRINTTAB(T)"[RVSl[2  SPACES} {2  RIGHT} 
lOFF]g*3iRVSj  i*3[RIGHT} 
I 3  RIGHT] [3  SPACES] (RIGHT] [2  SPACES] 
{0FF}£{RIGHT]{RVS]{2  SPACES]" 

3140  PRINTTAB(T)"{RVS}  [5  RIGHT]  {RIGHT} 
{SPACE] [3  RIGHT]  { RIGHT]  [RIGHT] 
{3  right]  " 

3150  PRINTTAB{T)"i*3lRVS}{2  SPACES] 

[right] [2  SPACES} [off ]£  E*3tRVS} 
{2  SPACES] {right}  [ RIGHT]  [RIGHT] 
[3  RIGHT]{0FF}E*i{RVS}{2  SPACES}" 

3999  RETURN 

4000  v=l 3*4096 ; POKE53281 ,  0 : POKE53280  , 0 
4010  POKE  V+21,0:POKEV+2  3,0 

4020  GOSUB  2000:POKE  S+5 , 7*16 : POKES+6 , 249 

:P0KES+4,128 
4030  POKE  V+40,03:POKEV+41,07:POKEV+42,03 

; POKEV+43 , 07 : POKEV+44 , 03 : POKEV+45 , 07 
4040  POKE  V+46,03:FOR  1=1  TO  6  :  POKE  V+2 

*I,  (36+40*1  J AND255:NEXT 
4050  POKE  V+16,64:P0KE  2040 , 244: POKEV, 30: 

POKEV+1, 148; POKE  V+21,255 
4060  FOR  1=2041  TO  2047 j POKEI , 255 : NEXT 
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4070 

PRINT" [CYN] {CLR]FUEL 

4080 

PRINT"02000" 

4090 

PRINT "SCORE:" 

4100 

PRINT "00000" 

4110 

PC0)=1029:P(4)=1994:P{1)=1039:P(5)=2 

004:P(2)=1049:P(6)=2014:PC3)=1059 

4120 

SYS  45152 

4130 

POKE  P(0),227 

4140 

IF  PEEK(2)=255  THEN  20000 

4150 

IF  PEEK(653)=1  THEN  4150 

4160 

IF  RND(1)>.05  THEN  4140 

4170 

IF  RND(1)>.5  THEN  4200 

4180 

P=RNDC1)*5:IF  PEEK(P(P ) ) <>160  THEN  4 

180 

4190 

POKE  P(P) ,227:GOTO4140 

4200 

P=RND(1)*3+4:IF  PEEK( P (P) ) <>160  THEN 

4200 

4210 

POKE  P(P) ,228:GOTO4140 

5000 

FB=(J  AND  16) 

5010 

IFFL=0AND  FB=0  THEN  POKE  2,0: POKE  49 

290, 2: GOTO  5030 

5020 

IF  FL=15  AND  FB=16  THEN  POKE  2,0:POK 

E  49290,3 

5030 

FL=FB 

5040 

IF  (J  AND  8)=0  AND  DX<4  THEN  DX=DX+1 

:GOTO5060 

5050 

IF  (J  AND  4)=0  AND  DX>-4  THEN  DX=DX-1 

5060 

IF  (J  AND  1)=0  AND  DY>-4  THEN  DY=DY- 

1:GOTO5080 

5070 

IF  (J  AND  2)=0  AND  DY<4  THEN  DY=DY+1 

5080 

X=PEEK  C V ) +PEEK ( V+16 ) *256 

5085 

Y=PEEK(V+1) 

n-^ 


'^       J* 


It  sits  on  the  sands  of  Egypt-silent,  foreboding;  the 
blue  waters  of  the  Nile  sliding  silentfy  by.  Pharoah's 
Pyramid  becl<ons  to  us  across  rrillennia;  mysterious, 
alluring.  Where  did  the  stones  come  from?  How 
were  they  laid  one  on  top  of  another?  How  many 
lives  were  lost  under  hot  suns  and  cool  moons  to 


provide  a  resting  place  for  the  pharoahs  of  Egypt? 
Now  you  can  have  a  personal  statue  in  its  comple- 
tion. IVIatch  wits  with  the  ancient  Egyptian  God, 
Osiris.  Take  advantage  of  gifts  given  you  by  the 
beautiful  (sis.  Fight  through  the  plagues  of  Moses 
as  brick  by  brick  you  build  one  of  the  wonders  of 
the  world.  There  hasn't  been  a  greater  challenge 
since  the  original  Pharoah's  Pyramid! 


HISTORY  PROVES  THAT  ALL  GREAT  GAMES  HAVE  THREE  THINGS  IN  COMMON. 


t'SA«9««K79e^- 


FAST-PACED  FUN   THAT  LASTS 


EVER  INCREASING  CHALLENGE 


GRAPHICS  THAT  LIVE 


PHAROAH'S  PYRAMID  Is  a  fast  action  game  with  that  special  f<lnd  of  challenge  that  makes  you  say... 

"This  time  I  go  all  the  way!" 


AVAILABLE 
NOW  FROM... 


fjiij3fis^  QKfmrdLJoPim&mj^ 


The  company  that  loves  great  games  as  much  as  you  do,  see  your  local  dealer  or  call  toll  free.  !•  800 •624* 5596 

P.O.  BOX  267T4  •  SALT  LAKE  CJTY  •  UTAH  •  84126 


5090  NX=X+DX:IF  NX>21  AND  NX058  THEN  POK  10590 

E  V,NXAND255:POKEV+16, NX/256  10600 

5100  NY=Y+DY:IF  NY<20  THEN  NY=210  10610 

5110  IF  NY>210  THEN  NY=20  10620 

5120  POKE  V+1,NY  10630 

5130  RETURN  10640 

10000  I=15616:TI$="000000"  10650 

10005  PRINT" {home} {WHT] [12  RIGHTIREADY  IN   10660 

"LEFT?(STR$(149-INT{Tl/60)),4)"  SEC   10670 

ONDS  "  10680 

10010  READ  A: IF  A=256  THEN  10025  10690 

10020  C1=C1+A:P0KE  I , A: 1=1+1 :GOTO  10005     10700 

10025  IF  C1O34430  THEN  PRINT"CHECKSUM  ER   10710 
ROR  IN  LINE  10025": END  10720 

10026  RETURN  10730 
10030  DATA  0,0,0,0,0,0,0  .  10740 
10040  DATA  0,0,24,0,0,28,0  10750 
10050  DATA  0,31,0,0,31,255,240  10760 
10060  DATA  31,255,8,20,255,254,31  10770 
10070  DATA  127,255,30,63,254,24,0  10780 
10080  DATA  0,0,0,0,0,0,0  10790 
10090  DATA  0,0,0,0,0,0,0  10800 
10100  DATA  0,0,0,0,0,0,0  10810 
10110  DATA  0,0,0,0,0,0,0  10820 
10120  DATA  0,0, 71, 192,0, 247, 192^,  10830 
10130  DATA  0,247,192,1,255,192,2  10840 
10140  DATA  255,192,2,255,192,2,247  10850 
10150  DATA  192,2,247,192,3,247,192  10860 
10160  DATA  3,247,192,3,247,192,3  10870 
10170  DATA  247,192,3,247,192,3,247  10880 
10180  DATA  192,3,255,192,3,255,192  10890 
10190  DATA  7,103,192,7,103,192,15  10900 
10200  DATA  229,128,31,119,128,31,240  10910 
10210  DATA  0,0,0,0,0,0,0  10920 
10220  DATA  0,0,0,0,0,0,0  10930 
10230  DATA  0,0,0,0,0,0,0  10940 
10240  DATA  0,0,0,0,0,0,0  10950 
10250  DATA  0,0,0,0,0,0,0  10960 
10260  DATA  0,0,0,0,0,0,0  10970 
10270  DATA  0,0,0,0,0,0,0  10980 
10280  DATA  0,0,3,128,0,15,192  10990 
10290  DATA  0,15,192,0,15,192,0  11000 
10300  DATA  15,192,0,1,252,0,1  11010 
10310  DATA  116,0,1,212,0,0,88  11020 
10320  DATA  0,0,80,0,0,0,0  11030 
10330  DATA  0,0,0,0,0,0,0  11040 
10340  DATA  0,0,0,0,0,0,0  11050 
10350  DATA  0,0,0,0,0,0,0  11060 
10360  DATA  0,0,0,0,0,0,0  11070 
10370  DATA  0,0,0,0,0,0,0  11080 
10380  DATA  0,0,0,0,0,0,0  11090 
10390  DATA  0,0,0,0,1,252,0  11100 
10400  DATA  1,252,0,1,252,0,1  11110 
10410  DATA  254,0,7,248,0,6,249  11120 
10420  DATA  0,2,251,0,6,122,0  20000 
10430  DATA  3,242,0,0,248,0,0 

10440  DATA  248,0,0,60,0,0,120  20010 

10450  DATA  0,0,56,0,0,56,0  20020 

10460  DATA  0,96,0,0,96,0,0  20030 

10470  DATA  8,0,0,32,0,0,0  20040 

10480  DATA  0,0,0,0,0,0,64  20050 

10490  DATA  0,0,240,0,0,240,0  20060 

10500  DATA  1,240,0,2,240,0,2  20070 

10510  DATA  240,0,2,240,0,2,240  20080 
10520  DATA  0,3,240,0,3,240,0 

10530  DATA  3,240,0,3,240,0,3  20090 
10540  DATA  240,0,3,240,0,3,240 

10550  DATA  0,3,240,0,7,96,0  20100 

10560  DATA  7,96,0,15,224,0,31  20110 

10570  DATA  112,0,31,240,0,0,0  20120 
10580  DATA  7,192,0,7,192,0,7 
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DATA  192,0,7 
DATA  0,7,192 
DATA  7,192,0 
DATA  192,0,7 
DATA  0,7, 192 
DATA  7,192,0 
DATA  192,0,7 
DATA  0,3,128 
DATA  0,2,0,0 
DATA  7,192,0 
DATA  192,0,3 
DATA  0,1, 192 
DATA  7,192,0 
DATA  64,0,7, 
DATA  0,5,192 
DATA  7,192,0 
DATA  128,0,3 
DATA  0,0,2,0 


DATA  0,6,64,0,0,64,0 
DATA  4,128,0,3,64,0,6 
DATA  0,0,1,0,0,0,0 
DATA  0,0,0,0,0,128,0 
DATA  1,64,0,6,0,0,1 
0,6,64 
4,0,0 
3,128,0,0 
0,0,0 
0,0,0 
0,0,0 
0,0,0 
0,0,0 
0,0,0 
0,0,0 


192,0,7, 192 

0,7,192,0 

7,192,0,7 

192,0,7,192 

0,7,192,0 

7,192,0,7 

192,0,7, 192 

0,0,0,0 

7,192,0 

6,192,0,4 

64,0,6,192 

0,4,0,0 

7,128,0,7 

92,0,1,192 

0,6,64,0 

7,192,0,0 

128,0,0,0 

0,1,0 


DATA  0,0,5,0, 
DATA  0,0,0,0, 
DATA  0, 128,0, 
DATA  0,0,0,0, 
DATA  0,0,0,0, 
DATA  0,0,0,0, 
DATA  0,0,0,0, 
DATA  0,0,0,0, 
DATA  0,0,0,0, 
DATA  0,0,0,0; 
DATA  0,0,1,128,0,6,128 
DATA  0,2,64,0,5,192,0 
DATA  3,128,0,1,252,0,1 
DATA  252,0,1,236,0,1,126 
DATA  0,3,248,0,2,120,0 
DATA  0,248,0,0,120,0,0 
DATA  112,0,0,120,0,0,120 
DATA  0,0,48,0, 0,48,0 
DATA  0,0,0,0,0,0,0 
DATA  0,0,0,0,0,0,0 
DATA  0,0,0,0,0,0,0 
DATA  0,0,0,0,0,0,0 
DATA  0,16,0,0,16,0,16 
DATA  56,16,10,16,160,4,16 
DATA  64,10,124,160,1,2  5  5,0 
DATA  1,255,0,11,255,144,127 
DATA  255,252,11,255,144,1,255 
DATA  0,1,255,0,10,124,160 
DATA  4,16,64,10,16,160,16 
DATA  56,16,0,16,0,0,16 
DATA  0,0,0,0,0,0,256 

SC=0:FOR  1=0  TO  4:  SC=SC+(  PEEK(H48- 
I  )-48  )  *10tl  :NEXT  I 
IF  H<SC  THEN  H=SC 
POKE  S+4,128 
POKE  13*4096+21,0 
FOR  1=1  TO  1000: NEXT  I 
PRINT" [CLR] OUT  OP  FUEL ...{ DOWN ) 
PRINT "YOU  SCORED  £ WHT } "SC " { CYN } PO INTS 
PRINT "HIGH  SCORE [WHT} "H"[CYN} 
PRINT"{3  DOWN} (11  SPACEsJaGAIN?  (Y 
[space} OR  N) " 

PRINT" [down}  OR  PRESS  FIRE  BUTTON  T 
0  START  AGAIN" 
GETA? 

IF  A$="N"THEN  END 

IF  {PEEK( 56320)  AND  16)=0  THEN  GOTO 
4000 


A  MICROCOMPUTER 
EXPERIENCE 
FOR  TODAY 

Arcaders  who've  seen  and  played 
the  ATARI  and  TRS-ao  versions  of 
STRATOS  came  to  the  same 
conclusions  —  these  state-of-the-art 
games  were  ahead  of  their  time.  After 
all,  any  program  that  boasts  crisp 
graphics,  punchy  sounds,  joystick 
compatability  and  a  full  complement  of 
extras,  lllte  high  score  saving  and 
multi-player  option  has  a  definite  touch 
of  tomorrow. 

THE  GAME'S  SCENARIO  IS  A  REAL 
KNOCKOUT 

The  object  is  to  successfully 
defend  a  futuristic  city  from  waves  of 
attacking  alien  ships. 


ATARI  SCREEN  SHOT 
The    batUe    begins!    Atari   version    features 
colors  and  sounds  that  YOU  can  changel 


And  these  crafty  alien  critters  are 
just  part  of  a  rapid-fire  graphics 
bonanza  that  includes  meteor  swarms, 
multiple  attack  waves,  and  even  a  free- 
moving  saucer  that  will  repair  your 
city's  damaged  force  field  on  the  ATARI 
version. 
GOOD  NEWS 

You  don't  have  to  wait  years  for 
the  spectacular  —  STRATOS  is 
available  now  for  the  ATARI  and  TRS-SO 
systems. 

STRATOS.  Entertainment  of  the 
future  —  today. 


THS-80  SCREEN  SHOT 

The  TRS-SO  version  blows  you  awa/  with  Its 


/"^  ^^^  "■  COPYRIGHT  1982 

Amdventure 

\^>^  INTERNATIONAL 


To  order,  see  your  local  dealer.  If  tie  does  no!  have  the  program,  then  call 

1*X)-327-7172  (orders  only  please)  or  write  for  our  free  catalog. 

Published  by  ADVENTURE  INTERNATIONAL 

a  subsidiary  of  Scolt  Adams,  Inc. 

BOX  3435  •  LONGWOOD,  FL  32750  •  (305)  830^194 


AVAILABLE  NOW! 


ATARI  400/800/1200  16K  TAPE inM)161  $34.S 

ATARI  400/800/1200  32K  DISK 1S2-0161  S34.95 

COMMODORE  S4  TAPE lECMlTGI  S34.95 

COMODOREM  DISK 162-0161  $34.95 

TBS-BO  16RTAPE 010-0161  S24.95 

TRS-80  32K  DISK 012-0161  SZ4.K 

Coming  Soon  For  Ttie  Cotor  Computer! 

PRICES  SUBJECT  TO  CHANGE 


20130  IF  A$<>"Y"  THEN  20100 

20140  GOTO4000 

50000  1=49152 :TI$="000000" 

50010  PRINT" {home} £wHT) {12  RIGHTJREADY  IN 

■'LEFT$(STR?(103-INT(Tl/60)  )  ,4)  "  SEC 

ONDS  " 
50015  READ  A: IF  A=256  THEN  PRINT" {HOME) 

{10  RIGHT} {21  spaces} {SHIFT-SPACE}" 

:GOTO50045 
50020  IF  A=-l  THEN  1=49920  :  GOTO  50010 
53030  IP  A==2  THEN  1=50688  :  GOTO  50010 
50040  C2=C2+A:POKE  I , A: 1=1+1 : GOTO  50010 

50045  IF  C2<> 188431  THEN  PRINT"CHECKSUM  E 
RROR  IN  LINE  50045": END 

50046  RETURN 

50050  DATA  120,169,0,141,20,3,169 
50060  DATA  195,141,21,3,88,173,14 
50070  DATA  220,41,254,141,14,220,165 
50080  DATA  1,41,251,133,1,160,0 
50090  DATA  185,0,208,153,0,48,185 
50100  DATA  0,50,153,0,50,185,0 
50110  DATA  209,153,0,49,185,0,211 
50120  DATA  153,0,51,185,0,212,153 
50130  DATA  0,52,185,0,213,153,0 
50140  DATA  53,185,0,214,153,0,54 
50150  DATA  185,0,215,153,0,55,169 
50160  DATA  15,141,156,200,200,208,200 
50170  DATA  165,1,9,4,133,1,173 
50180  DATA  14,220,9,1,141,14,220 
50190  DATA  169,28,141,24,208,169,15 
50200  DATA  141,156,200,169,255,141,15 
50210  DATA  212,169,128,141,18,212,169 
50220  DATA  0,133,2,141,224,207,141 
50230  DATA  255,207,141,254,207,141,253 
50240  DATA  207,141,252,207,141,249,207 
50250  DATA  160,6,169,20,153,0,207 
50260  DATA  169,0,153,16,207,136,208 
50270  DATA  243,169,251,141,251,207,160 
50280  DATA  0,169,4,133,252,132,251 
50290  DATA  169,216,133,254,132,253,169 
50300  DATA  160,160,5,145,251,160,10 
50310  DATA  145,251,160,15,145,251,160 
50320  DATA  20,145,251,160,25,145,251 
50330  DATA  160,30,145,251,160,35,145 
50340  DATA  251,165,251,24,105,40,133 
50350  DATA  251,144,2,230,252,201,232 
50360  DATA  208,211,169,1,160,10,145 
50370  DATA  253,169,4,160,5,145,253 
50380  DATA  169,7,160,15,145,253,169 
50390  DATA  14,160,20,145,253,169,8 
50400  DATA  160,25,145,253,169,13,160 
50410  DATA  30,145,253,169,3,160,35 
50420  DATA  145,253,165,253,24,105,40 
50430  DATA  133,253,144,2,230,254,201 
50440  DATA  232,208,199,96,-1 
50450  DATA  173,141 
50460  DATA  2,201,1,208,3,76,49 
50470  DATA  234,230,2,165,2,201,2 
50480  DATA  240,3,76,49,234,169,0 
50490  DATA  133,2,169,3,133,252,169 
50500  DATA  216,133,251,160,45,177,251 
50510  DATA  32,79,195,160,55,177,251 
50520  DATA  32,79,195,160,65,177,251 
50530  DATA  32,79,195,160,75,177,251 
50540  DATA  32,79,195,165,251,24,105 
50550  DATA  40,133,251,144,2,230,252 
50560  DATA  201,192,208,213,76,0,198 
50570  DATA  201,160,240,19,201,32,240 
50580  DATA  37,162,1,232,221,174,195 
50590  DATA  208,250,202,189,174,195,145 
50600  DATA  251,96,152,56,233,40,168 
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50610 

DATA 

50620 

DATA 

50630 

DATA 

50640 

DATA 

50650 

DATA 

50560 

DATA 

50670 

DATA 

50680 

DATA 

50690 

DATA 

50700 

DATA 

50710 

DATA 

50720 

DATA 

50730 

DATA 

50740 

DATA 

50750 

DATA 

50760 

DATA 

50770 

DATA 

50780 

DATA 

50790 

DATA 

50800 

DATA 

50810 

DATA 

50820 

DATA 

50830 

DATA 

50840 

DATA 

50850 

DATA 

50860 

DATA 

50870 

DATA 

50880 

DATA 

50890 

DATA 

50900 

DATA 

50910 

DATA 

50920 

DATA 

50930 

DATA 

50940 

DATA 

50950 

DATA 

50960 

DATA 

50970 

DATA 

50980 

DATA 

50990 

DATA 

51000 

DATA 

51010 

DATA 

51020 

DATA 

51030 

DATA 

51040 

DATA 

51050 

DATA 

51060 

DATA 

51070 

DATA 

51080 

DATA 

51090 

DATA 

51100 

DATA 

51110 

DATA 

51120 

DATA 

51130 

DATA 

51140 

DATA 

51150 

DATA 

51160 

DATA 

51170 

DATA 

51180 

DATA 

51190 

DATA 

51200 

DATA 

51210 

DATA 

51220 

DATA 

51230 

DATA 

51240 

DATA 

.51250 

DATA 

51260 

DATA 

51270 

DATA 

51280 

DATA 

51290 

DATA 

51300 

DATA 

51310 

DATA 

177,251,201,32,240,1,96 

152,24,105,40,168,169,227 

145,251,96,165,252,201,3 

240,22,152,56,23  3,40,168 

177,2  51,201,160,240,1,96 

152, 24, 105, 40, 158, 159, 99 

145,251,96,152,24,105,120 

168,177,251,201,100,240,1 

96,152,56,233,120,168,169 

99,145,251,96,160,228,239 

249.2  26,120,119,99,32,32 
100, 111, 121,98, 248,247,227 
-2,169,7,133,252 
169,32,133,251,160, 170,177 
251,32,47,198,160,180,177 
251,32,47,198,160,190,177 
251,32,47,198, 165,251,56 
23  3,40,133,2  51,176,2,198 
252,201,56,208,220,76,160 
198,201,160,240,19,201,32 

240.3  7,162,1,23  2,221,142 
198,208,250,202,189,142,198 
145,251,96,152,24,105,40 
168,17  7,251,201,32,240,1 
96,152,56,233,40,168,169 
228,145,251,96,165,251,201 
32,240,22, 152,24,105,40 
168,177,251,201,160,240,1 
96,152,56,233,40,168,169 
100,14  5,251,96,152,56,23  3 
120,168,17  7,2  51,201,99,240 
1,96,152,24,105,120,168 
169,100,145,251,96,32,99 
119,120,226,249,239,228,160 
160,22  7,247,248,98,  121,111 
100,32,173,0,220,72,41 
15,201,15,240,8,169,129 
141,4,212,76,183,198,169 
128,141,4,212,104,41,16 
205,25  5,207,240,48,141,255 
207,201,16,208,24,169,2 
141,15,195, 169,1,  141,2  52 
198,141,229,200,169,0,  141 

2  50,207,141,224,207,76,239 
198,169,1,141,15,195,169 
2,141,252,198,141,229,200 
169,0,133,2,32,245,198 
76,32,200,238,2  50,207,173 
250,207,201,1,240,1,96 
169,0,141.250,207,173,0 
220,141,254,207,41,1,208 
13, 17  3,253,207,201,2  53,240 
23,206,253,207,76,45,199 
173,254,207,41,2,208.10 
17  3,253,207,201,3,240,3 
238,2  53,207, 17  3,254,207,41 
8,208,13,173,25  2,207,201 
3,240,2  3,2  38,2  52,207,76 
82,199,173,254,207,41,4 
208,10,173,252,207,201,253 
240,3,206,252,207,173,254 
207,41,3,201,3,208,16 
173,253,207,240,11, 16,6 
238,253,207,76,107,199,206 
2  53,207,17  3,254,207,41,12 
201 , 12,208, 16, 173, 252, 207 
240,11,16,6,2  38,2  52,207 
76,132,199,206,2  52,207,174 
249,207,208,32,174,240,207 
224,60,176,2  5,17  3,253,207 
24,109,1,208,201,80,176 


51320  DATA  5,169,244,76,191,199,201 
51330  DATA  244,144,27,169,80,76,191 
51340  DATA  199,173,253,207,24,109,1 
51350  DATA  208,201,41,176,5,169,244 
51360  DATA  76,191,199,201,244,144,2 
51370  DATA  169,41,141,1,208,173,252 
51380  DATA  207,48,32,24,109,0,208 
51390  DATA  141,240,207,173,249,207,105 
51400  DATA  0,141,249,207,201,1,208 
51410  DATA  42,173,240,207,201,55,144 
51420  DATA  35,32,155,200,76,4,200 
51430  DATA  24,109,0,208,141,240,207 
51440  DATA  173,249,207,105,255,141,249 
51450  DATA  207,208,12,173,240,207,201 
51460  DATA  25,176,5,169,25,141,240 
51470  DATA  207,173,240,207,141,0,208 
51480  DATA  173,16,208,41,254,13,249 
51490  DATA  207,141,16,208,173,31,208 
51500  DATA  41,1,240,3,76,101,200 
51510  DATA  96,162,5,189,119,4,201 
51520  DATA  57,240,6,254,119,4,76 
51530  DATA  58,200,169,48,157,119,4 
51540  DATA  202,208,235,76,58,200,162 
51550  DATA  5,189,39,4,201,48,240 
51560  DATA  6,222,39,4,76,222,200 
51570  DATA  169,57,157,39,4,202,208 
51580  DATA  235,120,169,234,141,21,3 
51590  DATA  169,49,141,20,3,88,169 
51600  DATA  255,133,2,76,222,200,0 
51610  DATA  162,0,160,240,238,32,208 
51620  DATA  232,208,250,200,208,247,169 
51630  DATA  0,141,32,208,162,3,189 
51640  DATA  39,4,201,48,240,4,222 
51650  DATA  39,4,96,169,57,157,39 
51660  DATA  4,202,208,237,162,5,169 


51670  DATA  48,157,39,4,202,203,250 
51680  DATA  104,104,76,81,200,160,15 
51690  DATA  162,3,189,39,4,201,57 
51700  DATA  240,6,254,39,4,76,180 
51710  DATA  200,169,48,157,39,4,202 
51720  DATA  208,235,136,208,230,169,0 
51730  DATA  141,249,207,169,25,141,240 
51740  DATA  207,169,148,141,1,208,172 
51750  DATA  156,200,192,9,240,4,136 
51760  DATA  140,156,200,173,5,4,201 
51770  DATA  160,208,5,169,227,141,5 
51780  DATA  4,96,238,224,207,173,224 
51790  DATA  207,201,1,240,3,76,124 
51800  DATA  201,169,0,141,224,207,173 
51810  DATA  27,212,201,7,175,25,168 
51820  DATA  185,0,207,201,20,208,8 
51830  DATA  169,1,153,16,207,76,16 
51840  DATA  201,201,255,208,5,169,255 
51850  DATA  153,16,207,160,6,185,0 
51860  DATA  207,24,121,16,207,153,0 
51870  DATA  207,72,152,10,170,104,157 
51880  DATA  1,208,136,208,235,160,6 
51890  DATA  185,0,207,201,20,240,10 
51900  DATA  201,255,240,6,136,208,242 
51910  DATA  76,66,201,169,0,153,16 
51920  DATA  207,76,52,201,173,30,208 
51930  DATA  41,1,240,51,162,0,160 
51940  DATA  240,238,32,208,232,208,250 
51950  DATA  200,208,247,169,0,141,32 
51960  DATA  208,162,3,189,39,4,201 
51970  DATA  48,240,6,222,39,4,76 
51980  DATA  49,234,169,57,157,39,4 
51990  DATA  202,208,235,162,5,169,48 
52000  DATA  157,39,4,202,208,250,76 
52010  DATA  49,234,256 


ir  Vic  20™  or  Commodore  64^"  Compute? 

This  exciting,  new  weather  package 

allows  you  to  learn,  monitor,  and  predict 

the  weather  using  the  same  equipment  as 

the  pros. 


^Your  Own  Weatherman 

The  new  HAWS  (Home  Auto- 
Tnatlc  Weather  Station)  com- 
bines a  quality  weather  sensor 
with  software  to  let  you  track 
weather  conditions  inside  or 
outside  your  home.  HAWS  moni- 
tors weather  data  including  dew 
point,  temperature,  humidity, 
and  atmospheric  pressure;  plots 
historical  data  and  graphically 
displays  weather  trends:  deter- 
mines the  comfort  and  chill  fac- 
tors to  help  you  dress;  HAWS 
even  forecasts  the  weather  and 
compares  your  predictions  to 
the  local  weatherman's. 

HAWS  uses  the  same  sensor 
employed  by  weather  services  in 
60  countries  worldwide.  The 
HAWS  package  costs  only 
$199.95  and  includes  the  sensor, 
cassette  or  floppy  disc  program, 
15-foot  cable  with  connector  for 
the  computer,  and  a  complete 
user's  manual. 

Send  today  or  call  toll  free  to 
order  your  HAWS  package. 


Ordering  Information 
Send  $199.95  in  check  or  money  order  payable  to 
Vaisala,  Inc.  Include  name,  address,  telephone  num- 
ber, your  computer  model  (VIC  20  or  Commodore  64), 
and  program  preference  (tape  cassette  or  floppy  disc). 
Or  call  toll  free  to  place  your  order. 
Major  credit  cards  accepted. 
Dealer  inquiries  invited. 

l'800-227-3800  ext  haws 

VIC  20  and  Commodore  64  are  tfademarks  of  Commodore  Electronics  Ltd. 


Learn/Teach  Meteoroiogy 

More  than  a  toy  or  game, 
HAWS  provides  the  first  oppor- 
tunity to  use  your  computer  as  a 
data  sampler  and  data  analysis 
system  for  meteorology,  allow- 
ing the  user  to  interact  with 
incoming  data  to  monitor  and 
forecast  weather  conditions. 
HAWS  includes  an  instructive 
software  program  and  a  com- 
plete user's  manual  that  teaches 
meteorological  terms  and  equa- 
tions to  allow  anyone  to  quickly 
grasp  weather  concepts  either  at 
home  or  in  the  classroom.  Sim- 
ple plug-in  components  and 
easy  hookup  also  means  you 
can  free  up  your  computer  at 
any  time  for  other  duties.  HAWS 
is  a  great  educational  tool  for 
anyone,  Order  today. 

®  VAISALA 

VAISALA  INC. 

2  TOVifER  OFFICE  PARK 

WOBURN.  MA  01801 


Mosaic  Puzzle 


Bruce  Jordan 


Remember  that  once-popular  sliding-squares  game? 
With  only  one  free  space,  you  tried  to  move  the  colored 
plastic  tiles  around  to  get  a  particular  sequence  or  color 
pattern.  Although  it  was  a  challenge,  this  computer 
variation  of  the  game  can  be  a  mind-boggling  test  of 
skill  and  dexterity.  Versions  for  VIC,  64,  Atari,  and 
theTl-99l4A. 


"Mosaic  Puzzle"  is  a  computer  version  of  those 
sliding-squares  puzzies  that  used  to  drive  people 
nuts  before  the  advent  of  Rubik's  Cube.  It  can  run 
on  either  an  unexpanded  or  3K  expanded  VIC. 
The  object  of  the  game  is  to  arrange  the  15  num- 
bered squares  (hexadecimal  numbers  1-F  in  this 
version)  into  some  predetermined  order  by  sliding 
them  around  in  their  frame.  The  first  ie-w  moves 
are  easy,  but  as  the  game  progresses,  it  gets  a  lot 
more  complicated.  You'll  find  yourself  rearranging 
everything  just  to  get  the  last  few  squares  in 
place. 

This  version  of  the  game  has  a  timer  for  up  to 
23  hours,  59  minutes,  59  seconds,  and  a  chicken 
switch.  It  also  automatically  checks  for  the  win- 
ning order  and  allows  you  to  go  back  to  the  puzzle 
the  way  you  left  it  or  reset  it  to  the  beginning  ar- 
rangement. 

When  you  start  the  game,  you're  asked  if 
you  wish  to  set  a  time  limit.  If  you  answer  Y  for 
yes,  enter  the  time  limit  in  one  line  with  no  spaces 
or  punctuation  between  the  values.  For  example, 
for  a  1-hour,  23-minute  limit,  enter  012300. 

Next,  enter  the  goal  order.  This  will  be  the 
order  that  you  will  try  to  match  to  win  the  game. 
When  this  is  done,  the  upper  half  of  the  screen 
will  clear,  and  the  puzzle  will  appear.  A  moment 
later,  the  message  !GO!  will  flash  on  the  screen, 
along  with  a  tone.  The  controls  for  moving  the 
squares  are  as  follows: 

@  up 
?/  down 
=  right 
:     left 
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A  game  is  just  undenoay  in  the  TI  version  of  "Mosaic  Puzzle.' 


If  you  succeed  in  getting  the  squares  in  the 
goal  order,  the  message  YOU  WIN!  appears  on 
the  screen,  accompanied  by  a  short  tune  and  the 
elapsed  time.  If  the  time  runs  out  before  you  are 
finished,  you'll  hear  an  unpleasant  sound.  If  you 
want  to  stop  the  game,  press  RETURN  and  the 
screen  will  display  the  elapsed  time.  You  can  then 
restart  the  game,  either  as  you  left  it  or  reset,  by 
hitting  RETURN  a  second  time. 

Below  is  a  brief  description  of  the  program  as 
originally  written  on  the  VIC. 

Line  1  sets  the  limit  of  memory  at  7600.  This 
gives  a  place  to  store  the  image  of  the  puzzle. 

Lines  2-5  define  variables.  Note  that  S,  SC, 
and  SS  are  defined  in  tvv'o  consecutive  lines.  This 
is  done  because  there  are  two  possible  entry  points 
when  restarting  the  game. 

Lines  10-66  GET  the  time  limit. 

Lines  70-290  GET  the  goal  order  and  make 
sure  that  no  number  is  entered  more  than  once. 

Lines  300-365  put  the  puzzle  on  the  screen, 
either  from  the  data  table  or  from  memory,  then 


Be  Amazed! 


Telengard:  How  low  can  you  go? 


We've  created  a  subterranean  monster.  Fifty 
stories  low. 

That's  the  number  of  levels  In  the  TELEriQARD 
dungeon. 

Each  labyrinthine  level  holds  hundreds  of  dark  chambers 
and  tomb-like  corridors  for  the  mighty  adventurer  to  ex- 
plore. It  goes  without  saying  that  a  shifting  collection  of 
hideous  monsters  with  unpredictable  behavior  patterns  can 
make  life  in  the  TELEriQARD  maze  quite  interesting— and 
frequently  quite  short! 

Using  wits,  magic  and  true  grit,  your  character  delves 
deeper  and  deeper  into  the  depths  of  TELEHQARD  in  this 
realtime  fantasy  rote-playing  game.  Available  on  cassette 
for  Commodore®  64,  Atari®  Home  Computers  {40K), 
TR5-80®  Mods.  I /111  {52K)  and  FET®  2001  (32K)  for  a 
ghoulish  $23.00.  48K  diskettes  for  Apple®  II,  Atari®  ,  Com- 
modore® 64  and  TRS-80®  available  also,  for  $28.00. 

AnD  FOR  THOSE  WHO  DOIN'T  DIG  UnDERGROUPID  GAMES  .  .  . 
There's  B-1  NUCLEAR  BOMBER,  a  nail-biting  solitaire  simulation 
of  a  manned  6-1  on  a  mission  over  the  Soviet  Union.  Your  plane  is 
equipped  with  six  Phoenix  Missiles,  a  one  megaton  warhead  and 
orders  to  retaliate!  Cassette  for  Commodore  64,  Atari  Home  Com- 
puters (32R),  T199/4  6f4A  (16K).  VIC-20(16K),  Timex /Sinclair  1000 
(16K),  and  TRS-80  Mods.  I/Ill  (I6K)  are  available  for  an  explosive 
$16.00.  Diskette  versions  for  Apple  (48K),  TR5-80  (32K),  Atari  (24K) 
and  IBM  {48K)  just  $21.00. 

Bl 

NOGtEAR 
BOMBER 


nUHEWAR:  Defend  your  country  by  massive  espionage  efforts,  or 
by  building  jet  fighter  bombers,  missiles,  submarines  and  ABM's. 
Your  cold  and  calculating  computer  will  choose  its  own  strategy! 
Cassette  for  Commodore  64,  VIC-20  (16K),  TR5-80  Mods.  1/liI  (I6K) 
and  Atari  Home  Computers  Just  $16.00. 

FOOTBALL  STRATEGY:  Animated  action  on  a  scrolling  field.  A 
head-to-head  challenge  or  solitaire  as  you  select  the  best  offensive 
or  defensive  plays  in  response  to  your  opponent.  Commodore  64, 
Atari  Home  Computers  (32K)  and  TR5-80  Models  I/III/IV  (16K) 
cassette  for  $16.00.  Atari  (32K),  IBM  (64K)  and  TR5-80  Models 
I/lll/IV  (32K)  diskettes  available  at  $21.00. 

T.G.I.F,:  Thank  Goodness  It's  Friday!  Avalon  Hill's  new  party  game 
for  one  to  four  players  recreating  an  often-not-so-typical  week  in 
the  lives  of  the  working  class.  Half  the  fun  is  Just  making  it  from 
Monday  to  Sunday.  Commodore  64,  Atari  Home  Computers  (40K} 
cassette  for  a  meager  $20.00.  Atari  diskette  (48K)  for  $25.00. 

AVAILABLE  WHEREVER  GOOD  COMPUTER  GAMES  ARE 
SOLD  or  call  Toil-Free;  1  (800)  638-9292  for  the  name  of  a 
store  near  you.  Ask  for  Operator  C. 

a  Division  of  the 

Avalon  Hill  Game  Company 

4517  Harford  Road,  Baltimore,  MD  21214  U.S.A.  Earth 

'  Trademarks  of  Tandy  Corp.,  Apple  Computers.  Commodore  Business  Machines.  Warner 
Communications  and  Internationa!  Business  Macilines. 


QUALITY 


(^^gs 


print  the  go  message  and  start  the  timer. 

Lines  360-560  check  the  timer,  move  the 
number  squares,  and  check  for  the  winning  order. 

Lines  570-710  print  the  winning  or  losing 
message,  display  the  elapsed  time,  and  play  the 
sound  effects. 

Lines  720-740  save  the  position  of  the  blank 
square,  then  clear  the  variables  and  reset  the 
game. 

Lines  745-790  are  the  DATA  statements  for 
the  puzzle's  beginning  order  and  the  winning 
tune. 

Program  1:  Mosaic  Puzzle- vie  version 


BEGINNING  PROGRAMMERS 
If  you're  new  to  computing,  please  read  "How 
To  Type  COMPUTEI's  Programs"  and  "A 
Beginner's  Guide  To  Tj^ing  In  Programs." 


1  POKE55,176:POKE56,29:CLR 

2  S=7845:SC=38565:SS=7603:GOTO4 

3  SS=7603:S=PEEK(SS)*256+PEEK(SS+1) :SC=S+ 
30720 

4  DIMA$(16) 

5  PRINT" ECLR] ":G=8018:X=0:DX=1:P=38738:V= 
36878: 51  =  36876: 52  =  36877 :POKEV,  15 

10  PRINT"TIME  LIMIT?  [ RV5} {GRN JY{OFF} 

(  RVS } ( PUR } N { OFF } [ BLU } " 
20  GETA$:IFA?=""THEN20 
30  1FA?<"N"ORA$>"Y"THEN20 
40  IFA$=>"O"ANDA5<="X"THEN20 
50  IFA?="N"THEN70 
60  PRINT" {CLRl ": INPUT "HRS:MINS: SEC ";T5:H= 

I :IFLEN(T$) <>6THEN60 
62  IFLEFT? {T$ , 2 ) > "23 "ORLEFT$ {T$, 2 ) < "0"THE 

N60 
64  IFMID$ (T$ , 3 , 2 ) > "59"ORMID$ (T? , 3 , 2 ) < "0"T 

HEN60 
66  IFRIGHT$ (T? , 2 ) > "59"ORRIGHT$ (T$ , 2 ) < "0"T 

HEN60 
70  PRINT" {CLR}"TAB( 24) "TYPE  IN  GOAL  ORDER 

80  PRINT "{down} [3  SPACESjl  2  3  4  5  6  7  8 
{SPACE}9"SPC(8) "A  B  C  D  E  F  {RVS}S 
{0FF)"TAB(49) "IN  ANY  ORDER" 
90  PRINTTAB(118)"GOAL"TABC30) "E4  Y3 " 
100  FORK=0TO3 : POKE7996+K, 100 : POKE8106+K, 9 

9 : POKE3871 6+K, 0 : POKE38826+K, 0 : NEXTK 
110  FORK=22T088STEP22 : POKE7995+K, 103 : POKE 

8000+K, 101 :POKE38715+K,0:POKE38720+K, 

0: NEXTK 
130  F0RI=1T016STEP1 
140  GETA$(1) :IFA?(I)=""THEN140 
150  FORL=I-1TO0STEP-1:IFA$(I)=A$CL)THEN14 

0 
160  NEXTL 

165  IFA?(I)="S"THEN190 

170  IFA?(I)<="0"ORA?(I)=>"G"THEN140 
180  IFA$(I)=>": "ANDA$(I)<="@"THEN140 
190  B=VAL(A$Cl) ) :C=B+48:IFB=0THEN220 
200  POKE38467+2*B,7 : POKEG+X,C: POKEP+X, 0 :X 

=X+DX : IFX=4THENG=G+2  2 : P=P+22 :X=0 
210  NEXTI:IFI=17THEN300 
220  IFA?{I)="A"THENB=1 
230  IFA$(I)="B"THENB=2 
240  IFA$(I)="C"THENB=3 
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250  IFA$(I)="D"THENB=4 

260  IFA$(I)="E"THENB=5 

270  IFA?(I)="F"THENB=6 

272  B2=B 

275  IFA?(I)="S"THENB=7:B2=32 

280  POKE38492+2*B, 7 :P0KEG+X,B2: POKEP+X, 0; 

X=X+DX: IFX=4THENG=G+22 :P=P+22 :X=0 
290  NEXTI 

300  FORR=0TO132 : POKE7702+R, 32 : POKEjB422+R 

, 1 : NEXTR 
310  PRINT" [home} "TAB(29) "PUZZLE"TAB( 29) " 

E6  Y2" 
320  FORK=0TO3 : POKE7754+K, 100 : POKE38474+K, 

0 : POKE7864+K, 99 : POKE38564+K, 0 : NEXTK 
330  FORK=22T088STEP22 : POKE7753+K, 103 : POKE 

3847  3+K,0:POKE7  758+K,101:POKE38478+K, 

0: NEXTK 

335  IFP1=0THEN340 

336  FORK=0TO66STEP22 : FORJ=0TO3 : POKE7  776+J 
+K, PEEK(7605+J+K) 

337  POKE38496+J+K,PEEK(7609+J+K) :NEXTJ:NE 
XTK:G0TO352  . 

340  READA,B,C:IFA=-1THEN355 

350  POKE7776+A, B : POKE38496+A, C : GOTO340 

352  READA,B,C:IFA=-1THEN355 

353  GOT0352 

355    FORT=1TO1500:NEXT 

360    POKESl, 235 :POKEV, 15 : PRINT" {HOME} "TABC 

2  28 ) " { RVS } { RED ] 1 GO 1 [ OFF } { BLU ] " 
365    FORT=1TO500:NEXT: PRINT" {HOME} "TAB{228 

) "(4    SPACES} ":POKES1,0:TI$= "000000" 
370    IFHO1THEN380 

375    IFT5<=TI$THENT$=TI5:GOTO600 
380    GETB?:IFB5=""THEN370 

390  D=ASC(B$) :ON-(D=47)-2*(D=58)-3*(D=61 ) 

-4* ( D=64 ) -5* ( D=13 )GOTO410 , 440 , 470  ,  500 

,620 
400  GOTO370 

410  IFPEEK(S-22)=100THEN370 
420  POKES, PEEK (S-2 2) : POKESC, PEEK{ SC-22 ) :P 

OKES-22 , 32 : POKESC-22 , 1 : S=S-22 : SC=5C-2 

2 
430  GOSUB530:GOTO370 
440  IFPEEK(S+1)=101THEN370 
450  POKES, PEEK(S+1 ) : POKESC, PEEK ( SC+1 ) 

ES+l,32:POKESC+l, 1 : 5=5+1 :SC=SC+1 
460  GOSUB530:GOTO370 
470  IFPEEK(S-1)=103THEN370 
480  POKES, PEEK (S-1) : POKESC, PEEK ( SC-1 ) 

ES-1 , 32 : POKESC-1 , 1 : S=S-1 :SC=SC-1 
490  GOSUB530 :GOTO370 
500  IFPEEK(S+22)=99THEN370 
510  POKES, PEEK (S+22 ) : POKESC, PEEK ( SC+22 ) :P 

OKES+22, 32 :POKE5C+22,l :S=S+22 : SC=SC+2 

2 
520  GOSUB530:GOTO370 

530  FORM=0TO66STEP22 : FORN=0TO3STEP1 
540  W=PEEK(7776+M+N) : IFW-128>0THENW=W-128 
550  IFW<>PEEK(8018+M+N)THENRETURN 
560  NEXTNiNEXTM 
570  T5=TI$:PRINT"[HOME}"TAB(2  26} "{rVS} 

[yel}you  winUoff}  [BLU]  " 
580  READN,D:IFN=-1THEN620 
585  POKESl , N : FORT=lTOD : NEXT : GOTO580 
600  PRINT" {HOME} "TAB (225) "{rVS} {gRN} !Y0U 

[SPACE] LOSE  J [OFF] [ BLU] " : P0KES2 , 135 : PO 

KES1,128:FORT=1TO500:NEXT 
610  POKES2,0: POKESl, 0 
620  T$=TI5 : FORK=0TO66STEP2  2 : FORJ=0TO3 : POK 

E7605+K+J,PEEK(7776+K+J) 
630  POKE7609+K+J,PEEK(38496+K+J) :NEXTJ:NE 


:POK 


;POK 


XTK 
700  PRINTTAB(199) "HIT  RETURN  TO  PLAY"SPC{ 

10) "AGAIN" 
710  PRINT"{3  RIGHT}tIME="LEFT$(T$,2);":"M 

ID$ (T$ , 3 , 2 ) ; " : " RIGHT? ( T$ , 2 ) 
720  GETC$:IFC$=""THEN720 
730  IFC$=CHR$(X3)THENPOKESS,INTCs/256) : PO 

KESS+1 , SAND255 : CLR: GOT0736 

735  GOTO720 

736  PRINT"  (CLR}  RESET {RVS] 

{GRN}1{0FF}{BLU3{H0ME}E2  DOWNJOR  AS  Y 
OU  LEFT  IT.{RVS3 {PUR)2£oFF}{BLU}" 

737  GETV$:IFV$=""THEN737 

738  1FV$<"1"0RV?>"2"THEN737 

739  IFV$="1"THEN2 

740  IFV$="2"THENP1=1:G0T03 

745  DATA0, 49, 0,1, 178, 4, 2, 51, 0,3, 180, 4 
750  DATA22, 53, 0,23, 182, 4, 24, 55, 0,25, 184, 4 
760  DATA44, 57, 0,45, 129, 4, 46, 2, 0,47, 131, 4 
770  DATA66, 4, 0,67, 133, 4, 68, 6, 0,69, 32,1 
780  DATA-1,-1,-1 

790  DATA208 ,150,0,50, 208 ,75,0,50, 208 ,75,2 
18,175,208,115,218,175,224,250,0,0,-1 
-1 


"Mosaic  Puzzle,"  VIC  version. 


Program  2:  Mosaic  Puzzle  -  64  Version 

Translation  by  Chris  Metcolf,  Programming  Assistant 

1  POKE55,176:POKE56,29:CLR 

2  S=7845':SC=38565:SS=7603:GOTO4 

3  SS=7603:S=PEEK(SS)*256+PEEK(SS+1) : SC=S+ 
30720 

4  DIMA${16) 

5  PRINT" tCLR} ":G=8018:X=fci:DX=l:P=38738:V= 
36878 : 31=36876 ; 52=36877 :POKEV, 15 

10  print"time  limit?  [rvs} [grn}y[off} 
{rvsI [pur}n[off3 {blu}" 

20  GETA$:rFA$=""THEN20 

30  IFA$<"N"ORA$>"Y"THEN20 

40  IFA$=>"O"ANDA$<="X"THEN20 

50  IFA?="N"THEN70 

60  PRINT"{CLR} ":INPUT"HRS:MINS:SEC";T$ :H= 

1 : IFLEN ( T? ) <  >  6THEN60 
6 2  IFLEFT? ( T$ , 2 ) > " 2 3 " ORLEFT? { T? , 2 ) < "0 "THE 

N60 
64  IFMID? ( T$ , 3 , 2 ) > " 59 "ORMID? ( T$ , 3 , 2 ) < " 0 " T 

HEN60 
94    COMPUTE!    October  1983 


66  IFRIGHT? ( T$ , 2 ) > " 59 "ORRIGHT? ( T? , 2 ) < "0 "T 

HEN60 
70  PRINT"{CLR3"TAB(24) "TYPE  IN  GOAL  ORDER 

80  PRINT" {down} {3  SPACES31  2  3  4  5  6  7  8 
{SPACE}9"SPC(8) "A  B  C  D  E  F  {RVS}S 
(off] "TAB(49) "IN  ANY  ORDER" 
90  PRINTTAB(11S)"GOAL"TAB{30) "E4  y3 " 
100  FORK=0TO3 :POKE7996+K,100:POKE8106+K,9 

9 : POKE38716+K, 0 : POKE38826+K, 0 :NEXTK 
110  FORK=22T088STEP2  2 : POKE7995+K, 103 : POKE 

8000+K,101 :POKE38715+K,0:POKE387  20+K, 

0:NEXTK 
130  F0RI=1T016STEP1 
140  GETA?(I) :IFA?(I)=""THEN140 
150  FORL=1-1TO0STEP-1 : IFA$ { I )=A$ (L)THEN14 

0 
160  NEXTL 

165  IFA?(I)="S"THEN190 
170  IFA$ ( I ) <="0 "ORA? ( I ) => "G"THEN140 
180  IFA? ( I )=> " : "ANDA? ( I ) <="@"THEN140 
190  B=VAL{A$(I) ) :C=3+48:IFB=0THEN220 
200  POKE38467+2*B,7:POKEG+X,C:POKEP+X,0:X 

=X+DX : IFX=4THENG=G+22 : P=P+22 :X=0 

NEXT! ; IFI=17THEN300 

IFA? ( I )="A"THENB=1 

IFA? ( I ) ="B"THENB=2 

I  FA?  ( 1 )  =  "  C  "  THENa=3 

IFA? ( I ) ="D"THENB=4 

IFA?(I)="E"THENB=5 

IFA? ( I ) ="F"THENB=6 

B2=B 

IFA?(I)="S"THENB=7:B2=32 

P0KE3  8492+2  *B , 7 : POK£G+X , B2 : POKEP+X , 0 : 

X=X+DX: IFX=4THENG=G+22 : P=P+22 :X=0 

NEXTI 

FORR=0TO132:POKE7702+R,32:POKE38422+R 

, IrNEXTR 

PRINT" {home} "TAB(29) "PUZZLE"TABC29) " 

E6  Y3" 

FORK=0TO3:POKE7  754+K,100;POKE38474+K, 

0 ; POKE7864+K, 99 : POKE38584+K, 0 :NEXTK 

FORK=22T088STEP22 :POKE7753+K, 103 : POKE 

38473+K, 0 : POKE7  758+K, 101 :POKE38478+K, 

0 : NEXTK 

IFP1=0THEN340 

FORK=0TO66STEP2  2:FORJ=0TO3;POKE7775+J 

+K,PEEK(7605+J+K) 
337  POKE38496+J+K,PEEK(7609+J+K) :NEXTJ:NE 

XTK:GOT03  52 
340  READA,B,C:IFA=-1THEN355 
350  POKE7776+A, B: POKE38496+A, C : GOTO340 

352  READA,B,C:IFA=-1THEN355 

353  GOT0352 

355    F0RT==1T01 500: NEXT 

360    P0KES1,23  5:P0KEV,15:PRINT"£H0ME] "TAB( 

228) "{RVS} {red} IGOl £0FF3 {BLU}" 
365    FORT=1TO500:NEXT: PRINT" {home} "TAB( 228 

) "{4    SPACES} ":POKES1,0:TI$="000000" 
370    IFHO1THEN380 

375    IFT$<=TI$THENT?=TI$:GOTO600 
380    GETB?:IFB$=""THEN370 
390    D=ASC(B?) :0N-CD=47)-2*(D=58)-3*CD=61 ) 

-4*(D=64)-5*(D=13)GOTO410,440,470,500 

,620 
400    GOTO370 

410  IFPEEK(S-22)=100THEN370 
420  POKES, PEEK(S-22 ) : POKESC, PESK ( SC-22 ) :P 

OKES-22 , 32 :POKESC-22 , 1 : S=S-22 : SC=SC-2 

2 
430  GOSUB530:GOTO370 
440  IFPEEKCS+1)=101THEN370 


ffl 


DO  YOU 

HAVE  THE 

RIGHT  STUFF?? 


TAKEOFFS,  LANDINGS,  CLIMBS 

DIVES,  STEEP  TURNS,  CHANDELLES, 

AILERON  ROLLS,  BARREL  ROLLS,  LOOPS, 

CUBAN  8'S,  SPLIT  S'S,  IMMELMANN  TURNS, 

AERIAL  COMBAT,  DEFLECTION  SHOTS,  STRAFING   RUNS, 
DIVE  BOMBING,  AIR-AIR  MISSILE  LAUNCHES, 

FLIGHT  LEADERSHIP,  FLIGHT  TEAMWORK, 
HEAD  TO  HEAD  COMBAT 

MicroProse  Software  has  the  right  stuff  and  we  do  all  these  maneuvers  in  our  flight 
simulations!!!  We  would  like  to  share  our  RIGHT  STUFF  with  you.  Our  over  1 0,000  hours  of 
flying  experience  in  all  types  of  aircraft  from  the  giant  C-5A  Galaxy  to  actual  combat  in  the 
A-7  fighter  allows  us  to  bring  you  the  BEST,  MOST  REALISTIC,  and  MOST 
CHALLENGING  flying  simulations  available  for  your  ATARI  or  COMMODORE  64 
computers!  Try  your  RIGHT  STUFF  with  our  fine  flying  simulations!!! 


y/j 

^i/^kg 

B 

2/^zi^X^3^j| 

WJ~LLJI 

f^tgt^Bt 

HELLCAT  ACE  (Pacific)  and  SPITFIRE  ACE  (Europe) 

are  3-D  aerial  dogfights  requiring  real  fighter  pilot  skills  and 
maneuvers.  (AT/C,... $29.95).. .WINGMAN  is  a  player  vs. 
player,  head  to  head,  split  screen,  air  to  air,  and  air  to  ground 
simulation  requiring  flight  leadership  skills  to  dive,  loop, 
bomb,  and  strafe  enemy  territory  while  defending  your  own 
territory.  (AT/C,...$34.95)...MIG  ALLEY  ACE  is  a  split 


screen,  head  to  head,  3-D  aerial  dogfight  combat  simulation 
of  Korean  Conflict  out  the  cockpit  F-86  flying.  <AT,... $34.95) 
...SOLO  FLIGHT  is  an  outstanding  flight  trainer  that  pro- 
vides realistic  takeoffs  and  landings,  crosscountry  navigation, 
and  uses  a  three  dimensional  view  of  the  actual  airborne 
aircraft  and  the  surrounding  terrain  to  provide  realistic  and 
challenging  training  to  pilots  of  all  skill  levels.  (AT, ...$34.95) 


If  you  cannot  find  our  software  at  your  local  retailer,  you  can  order  by  MasterCard  or  Visa, 
money  order,  COD,  or  Check.  Add  $2.50  for  postage  and  handling.  MD  residents  add  5% 
sales  tax.  Call  or  write: 

MicroPros^  Software     ^  Canbou  court,  ParUton,  MD  21120,  (301)  357-4739 

DEALER  INQUIRIES  WELCOME! 


ATARI  and  Commadore  64  arc  the  regisiered  trademarks  of 
ATAltt.  Inc.  &  Commodore  fiustnesa  Machines 


Commodore  64  Notes 

Chris  Metcalf,  Programming  Assistant 

The  Commodore  64  version  of  "Mosaic 
Puzzle"  is  very  much  the  same  as  the  original 
VIC  version.  However,  some  minor  changes 
have  been  made.  Either  the  RETURN  key  or 
the  fire  button  allows  you  to  pause  momen- 
tarily before  resuming  the  game,  restarting 
the  program,  or  stopping  play  entirely. 
Breaking  off  and  resuming  has  no  effect  on 
the  time  clock  (displayed  at  the  top  of  the 
screen  along  with  the  time  limit). 

As  an  aid  to  the  user,  various  keys  for 
up,  down,  right,  and  left  can  be  selected  at 
the  beginning  of  the  game.  A  joystick  can 
also  be  used,  as  long  as  it  is  plugged  into 
control  port  two.  The  time  limit  is  an  option 
in  this  version;  if  no  time  limit  is  selected, 
the  screen  will  display  elapsed  time  and  TIME 
LIMIT:NONE. 


739  1FV$="1"THEN2 

740  IFV$="2"THENP1=1:GOT03 

745  DATA0, 49, 0,1, 178, 4. 2, 51, 0,3, 180, 4 
750  DATA22, 53, 0,23, 182, 4, 24, 55, 0,25, 184, 4 
760  DATA44, 57, 0,45, 129, 4, 46, 2, 0,47, 131, 4 
770  DATA66, 4, 0,67, 13 3, 4. 68, 5, 0,69, 32,1 
780  DATA-1,-1,-1 
790  DATA208, 150, 0,50, 208, 75, 0,50, 208, 75, 2 

18,175,208,115,218,175,224,250,0,0,-1 

,-1 


in£rrcs?S£ir:99-t9,t6  "cm i -moiie 


PUZZLE 


450  POKES , PEEK ( S+1 ) : POKESC , PEEK ( SC+1 ) : POK 

ES+1 , 32 : POKESC+I , 1 : S=S+1 : SC=SC+1 
460  GOSUB530:GOTO370 
470  IFPEEK(S-I)=103THEN370 
480  POKES, PEEK (S-1) : POKESC, PEEK CSC-1 ) : POK 

ES-1 , 32 : POKESC-1 , 1 i S=S-1 : SC=SC-1 
490  GOSUB530:GOTO370 
500  IFPEEK(S+22)=99THEN370 
510  POKES, PEEK (S+2 2) iPOKESC, PEEKCSC+22 ) :P 

OKES+2  2,32: POKESC+2  2 , 1 : S=S+2  2 : SC=SC+2 

2 
520  GOSUB530:GOTO3  70 

530  FORM=0TO66STEP22:FORN=0TO3STEP1 
540  W=PEEK(7776+M+N) : IFW-128>0THENW=W-128 
550  IFW<>PEEK(8018+M+N)THENRETUEy!l 
560  NEXTN:NEXTM 
570  T?=TI$: PRINT "{home} "TAB (226) "{RVS} 

{YEL]Y0U  WIN! {off} [BLUS" 
580  READN,D:IFN=-1THEN620 
585  POKES1,N:FORT=1TOD:NEXT:GOTO580 
600  PRINT "{home) "TAB (225) " f RVS } {GRN] lYOU 

{SPACE} LOSE  I {OFF] {BLU} " : POKES2 , 135 :PO 

KES1,128:FORT=1TO500:NEXT 
610  POKES2,0:POKES1,0 
620  T5=TI? : FORK=0TO66STEP22 :FORJ=0TO3 : POK 

E7605+K+J, PEEK(7776+K+J) 
630  POKE7609+K+J,PEEK(38496+K+J ) :NEXTJ:NE 

XTK 
700  PRINTTABC199) "HIT  RETURN  TO  PLAY"SPC( 

10) "AGAIN" 
710  PRINT" {3  RIGHT}TIME="LEFT5(T?,2); ":"M 

ID$(T$,3,2) r ": "RIGHT$(T$,2) 
720  GETC$:IPC$=""THEN720 
730  IFC$=CHR$C13)THENP0KESS,INT(S/256) :P0 

KESS+1 , SAND255 : CLR:G0T0736 

735  GOTO720 

736  PRINT "{CLR) RESET {RVS] 

[grn)1{0FFHBLU}  {home}  {2  DOWNJOR  AS  Y 
OU  LEFT  IT. {RVS}{PUR}2{0FF}{BLUJ" 

737  GETV$:IFV$=""THEN737 

738  IFV$<"1"0RV?>"2"THEN737 
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"Mosaic  Puzzle,"  64  version. 

Program  3:  Mosaic  Puzzle  -Atari  Version 

Translation  by  Marc  Sugiyama,  Programming  Assistant 


PUZZLE$(16) ,G0AL4C16 
GOAL* 


lZ3:456789RBCI>Er 


110  DIM  ANS*(1) 

)  ,  TEMP*  (  1  ) 
120  PUZZLE*= 

=  "  <:  16 

130  CHBASE=PEEK ( 106) *256: I 
ASE+17>=102  AND  PEEK(C 
=126  THEN  170 

140  POKE  106, PEEK ( 106) -6: G 
16:SETC0LQR  0,0,0:POSI 
RINT  #6; "PLEASE  STAND 

150  CHBASE=PEEK ( 106) «256 

160  FDR  l=&  TO  479:POKE  CH 
K <57344+I > :POKE  708, PE 
NEXT  I 

170  FOR  I=4S0  TO  487: POKE 

:POKE  CHBASE  +  a+I  ,  128:  N 

130  FOR  1  =  496  TO  SI  1:  POKE 

:NEXT  I:  POKE  r.HBASE  +  49 

CHBASE+51 1 , 2S5 

190  GRAPHICS  2:SETC0LDR  2, 

200  SETCOLOR  4 , 0 , 0 : SETCOLO 

TCQLQR  1,0,3 
210  TIME=0:PRINT 
A  TIME  LIMIT 
ANS*: IF  ANS*< 
THEN  210 
220  IF  ANS*="N"  THEN  290 
230  TRAP  230: PR  INT  "{CLEAR 
MINUTES  9{2  LEFT>";:I 
240  TRAP  40000; IF  MIN<0  OR 

MIN)   THEN  230 
250  T  IME  =  3600tMIN 
260  TRAP  260:PRINT  "{CLEAR 
SECONDS  0{2  LEFTD";:! 


{CLEARED 
N{2  LEFT 
"Y"  AND 


F  PEEK  (CHB 
HBASE+470) 

RAPHICS  2+ 
TION  2, 6: P 

BY" 

BASE+I , PEE 
EK'<  53770)  : 

CHBASE+I , 1 
EXT  I 

CHBASE+1 , 0 
6, 255: POKE 

0,  10 

R     2  ,  0  ,  0  :  S  E 

0  YOU  WANT 
>  "  ;  :  INPUT 

ANS* <  :;  "N" 


3  NUMBER  OF 
NPUT  MIN 
MIN^  >INT  < 


}•  NUMBER  OF 
NFUT  SEC 


stake  a.Clai 


e  most 


exciting  Neip  Game  for  your 
Atari  Hdine  C 


e  prbspnnmuig 
tninnthat  brou^  you 
■Robot  Mtack",  "Defense 
Command"  ^nd  many  other 
great  Arcade  games  for 
your  TRS-80'" 
'   100%  machine  language 

•  16K  ROM  Cartridge,  the 
largest  available  anywhere! 

•  Written  specifically  for  the  ^ 
Atari®  —  not  a  converted^  \ 
Apple®  game.  :W 

•  Ten  different  rounds 

•  Difficulty  adjustment  -^ 

•  High  score  table  r 

•  Demo  mode  ,' 
J  Spectacular  soundand    ' 
y   graphics              >->     j 

•  Runs  on  any        |      \r  . 
400/800  with        V  _l,   ! 
at  least  16K 
memory 

•  Only  $49.95  * 

Available  also 
For  the  5200- 


I 


Round  10: 


^'^i,  -^^ 


^^^iHS^P 


■'order,  s^. youri;. 


'PO.  flO?SpJ!ya^.l'<iflig^, CA  91409 ■  (213)782  61 


r  Suippinc 


R^;.  ^9er' 


V  or  money  order  to^us  fbr  l-^StS^  ph 
dents  add  6'^%  s^tes^ax^ 


Atari  Notes 

Marc  Sugiyama,  Programming  Assistant 

"Mosaic  Puzzle"  for  the  Atari  is  similar  to 
the  original  VIC  version;  however,  there  are 
some  differences.  As  you  select  the  order  for 
the  goal,  the  letters  will  move  from  the  puzzle 
box  to  the  goal  box.  The  game  begins  once 
you  have  selected  all  of  the  letters  and  num- 
bers (do  not  forget  about  the  space).  If  you 
have  selected  a  time  limit,  the  amount  of 
time  you  have  left  is  displayed  at  the  bottom 
of  the  screen.  If  you  did  not  select  a  time 
limit,  the  elapsed  time  is  displayed. 

You  move  the  space  (hole)  around  the 
puzzle  board  with  a  joystick  plugged  into 
the  first  port.  Pressing  the  trigger  activates 
the  pause  function.  The  timer  is  stopped, 
but  the  screen  is  cleared  as  well.  Pressing 
the  trigger  again  returns  you  to  the  game. 
Pressing  Q  while  you  are  in  the  game  allows 
you  to  quit  the  program. 


;  SEC; 


270     TRfiP     40000:  IF     SEC<0     DR     SEC<MNT< 

BEC)      DR     SE059     THEN     260 
280     TIME=TIME+SEC«60: IF     TIME=0     THEN 

230 
290  GRAPHICS  2+ 1  6  :  SETCQLOR  4,i3,0;5ET 

COLOR  2, 8, S: SETCOLOR  0,1,4:SETCO 

LOR  1,5,10:POKE  756 , CHBft3E/256 
300  XP0S=4: YPDS=3 
310  BDSUB  S80:GOSUB  860 
320  POSITION  1,11:PRINT  #6; "TYPE  IN 

GOAL  ORDER" : SPfiCE= 1 : OPEN  #1,4,0, 

"  K :  ■■ 
330     GET     #1,AC:IF      <AC:;49     OR     AO70     OR 
(AOS7     AND     AC<:65)>     AND     AC032     TH 

EN  330 
340  IF  AC=32  THEN  HERE=16:G0T0  360 
350  HERE=AC-48: IF  HERE>9  THEN-HERE=H 

ERE-7 
360  IF  PUZZLE* (HERE, HERE) ="   "  THEN  3 

30 
370  PUZZLES (HERE, HERE)="  ":GOAL*(SPA 

CE, SPACE) =CHR$(AC+12a):5PACE=SPA 

CE+1 
380  GOSUB  860:GOSUe  870: IF  SPACE<>17 

THEN  330 
390  CLOSE  ttl  :  PUZ  ZLE$=  "F^*.gWi^J=W:1iI»J>33 

[ai":GOSUe  a60:POSITION  1,11:PRIN 

T  #6;  "CIS  SPACES]  " 
400  POKE  18,0:POKE  19,0:PDKE  20,0 
410  CLOCK=PEEK (18) *65536+PEEK (19) *25 

6+PEEK (20) 
420  IF  TIME<>0  AND  CLOCK: =TIME  THEN 

580 
430  POSITION  5, 11: IF   NOT  TIME  THEN 

450 
4  40  riIN=INT  (  (TIME-CLOCK)  /3600)  :  SEC=I 

NT  (  (TIME-CLOCK)  /60) -60«MIN: GOTO 

460 
450  MIN=INT (CLOCK/ 3 600) : SEC=INT (CLDC 

K/60) -60»MIN 
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410 


THIS  = 


460  PRINT  #6; "TIME  ";MIN;":* 
:  IF  STRIG(0)=0  THEN  780 
IF  PEEK (764) =47  THEN  670 
JDY=STICK (0) : IF  JDY=15  THEN 
HERE=XPDS+YPOB*4 
IF  JDY=13  AND  YPOS<>0  THEN 
-4:G0SUB  560 : YPQS=YPQS-1 
IF  J0Y=14  AND  YP0SO3  THEN  THIS  = 
4:GDSLfB  560  :  YPOS  =  VPOS+ 1 
IF  JQY  =  7  AND  XPQ30  1  THEN  THIS  =  - 
1: GOSUB  560: XPOS=XPOS-l 
IF  JOy=ll  AND  XPaS<>4  T-HEN  THIS  = 
i:GGSUB  560: XP0S=XP0S+1 
POKE  77,0:6OSUB  860: IF  PUZZLE*=G 
OALt  THEN  720 
GOTO  410 
SOUND  0,  100,  ICK  10:   TEHP S  =  PU Z Z LE«  t 

HERt+THIS,HERE+THIS):PUZZLE$iHER 
E, HERE) =TEMP* 

PUZZLE* (HERE + THIS, HERE+THIS)=" «" 

: SOUND  0, 0, 0, 0: RETURN 

GRAPHICS  2+16: SETCOLOR  0,0,0: FOB 

IT  ION  0,5:  PRINT  #6s"yDU  RAN  OUT 

Of      TIME!":FOR  1=0  TO  254  STEP  2 
590  POKE  708, 255-1 : SOUND  0,I,10,10:N 

EXT  I : SOUND  0,0.0.0 
600  GRAPHICS  2+16: SETCOLOR  0,0.10 
610  POSITION  7,1:  PRINT  #6  ;  "  GH^H:  '  :  P 

nSITION  3,3:PRINT  #6;"1)T0  CONTI 

N  L=  E  " 
620  POSITION  2,5:PRINT 

T  OVER" 
630  OPEN  #1  ,  4,  0,  "K:  •' 
640  GET  ttl,AC;IF  hC<>49  AND  ACO50  T 

HEN  640 
650  CLOSE  #1:IF  AC=49  THEN  TIME=0:GD 

SUB  380: GOSUB  860: GOSUB  870: POKE 
18,0:  POKE  19,0:POh:.E  20,0:  GOTO  4 

10 
660  RUN 
670  T1=PEE.K  (  IS)  :  T2  = 

20) : GRAPHICS 


470 

480 

490 

500 

510 

520 

53  0 

540 

550 

56  0 

570 

580 

#6; 


DTD  STAR 


=  PEEK  <  19)  : T3  =  PEEK 

^+16: SETCOLOR  0.0, 


PRINT  «6; "DO  YOU 
OPEN  #1 , 4, 0,  "K:  " 
AC< >89  AND  AC<>7S 


l^A 


AC=S9  THEN  GRAPHICS 


1=0     TO  254  STEP  2: POKE  703 


680  POSITION  0,6; 
NT  TO  QUIT?": 
690  GET  #1 , AC: IF 

HEN  690 
700  CLOSE  #1 : IF 

0:  END 

710  GOSUB  8S0:BOSUB  B60:GOSUB  a70:PO 
KE  20, T3: POKE  19, T2: POKE  18,T1:G 
OTD  410 
720  FOR  1  =  1  TO  100: POKE  7  12, PEEK  (537 

70 )  : NE  X  T  I 
730  GRAPHICS  2+ 1 6 : SETCOLOR  0,0,0:PDS 
ITION  4,5:PRINT  #6;"Y0U  DID  IT-' 
"sFOR 
,  I 
740  SOUND  0,255-1 , 10, 10: NEXT 
750  GRAPHICS  2+ 1 6 : PDS I T I  ON  3 

LOR  0,1,10:PRINT  «6;"PRESS 
BER" :  POSITION  4,  6: PR  I  NT  #6;" 
RY  AGAIN" 
760  IF  STRIG(0)=1   THEN  760 
770  RUN 

780  GRAPHICS  2+ 1 6 : T 1 =PEEK ( 1 3 ) : 12 
K ( 19) : T3=PEEK (20) : POSITION  4 
PRINT  #6; "PAUSE  ACTIVE" 
790  POSITION  3,11:PRINT  #6 

RIGGER" 
300  IF  STR16(0>=0  THEN  800 
810  IF  STR16(0)=1  THEN  810 


I 


SETCO 

TRIG 
"TO  T 


=  PEE 
1  0: 


'PRESS 


J  CDftlPUTER  HDU3E,  mC. 


MILFORD,  MICHIGAN 


^'^^ 


EDUCATIONAL 

~  Toddler  Tutor  * 
Primary  Math 
Tutor  * 

•  Math  Tutor* 
English  Invaders 
Games  * 
Gotcha  Math 
Games  * 

POTPOURRI 

•  Basic  Tools  f 

•  Sketch  &  Paint  * 
Multi-Level 
Marketing  Manager 
(Direct  Selling)  t 


ft, 


/ 


ARCADE  STYLE  GAMES 

•  Supercuda  * 
Pegasus  Odyssey  * 
Ape  Craze  * 
Escape  MCP  * 
•  •  Maelstrom  * 
Firing  Line  * 
Pakacuda  %— 


OTHER  GAMES 

•  Street  Maze  ^ 

•  Caves  of  Annod  v 
»  Dragons  & 

Treasure  » 
•  Cribbage  Partner  f 


0 


« 


On  Shelves  Everywhere  - 

Ask  For  Comin*Data 

Dealer  Inquiries  Welcome. 

t  Commodore  64 
V  VIC  20 
•Both 


CDITIPUTER  HDUSE,  inC." 


320  Summit  Avenue 
Milford,  Michigan  48042 
/         .  (313)685-0113 

Arcade  Style  Games  are  High  Res  Full  Machine  Code. 
Commodore  64  and  VIC  20  are  Registered  Trademarks  of  Commodore  Business  Machines,  Inc.,- 


820 

830 
S40 

8  50 
S60 


870 

880 

890 

900 
910 

920 
930 


IF 

BOS 

POK 

:  GO 

END 

FDR 

T  *i 

:  RE 

FDR 

NT 

RET 

GRfl 

COL 

LOR 

PDK 

:  PR 

PD3 

ITI 

FDR 

#6; 

PRI 

POS 

ITi 

POS 

OSI 

URN 


STRIGi0)=0  THEN  B20 

UB  B30:GOSUB  S60:BO:.UB  870 

E  18, Tl: POKE  19, T2: POKE  20, T3 

TO  410 


ELSE  IF  K- 
SOUND  (150, 


7  THEN 
110,0): 


700  EL 
:  GOTO 


1  = 
6;  P 
TUR 

1  = 
#6; 
URN 
PHI 
OR 

E  7 
INT 

ON 

1  = 
■■  \  -C 
NT 
ITI 
ON 
ITI 
TIO 


0  TD  3: POSITION  2, I +4: PRIM 
UZ ZLE*  (  I  *4+l  ,  I  t4+4 )  :  NEXT  I 
N 

0  TO  3:P0SITiaN  I4,I+4:PRI 

GOAL*  (  I  *fl  +  i ,  I  *4  +  4)  : NEXT  I: 


CS  2 
1,5, 

10.6 
56,  C 
«6; 
ON  2 
14,3 
4  to 
4  SP 
tt6;  " 
ON  2 
14,3 
ON  1 
N  14 


+  1 
4: 

:  S 
HB 
"h 

3  ■— " 

:  P 
7 
AC 
\  -C 
,  B 
:  P 
,  9 
',  9 


6: 
SE 
ET 
AS 

e;-; 

:  P 

RI 
P 

ES 

4 

:  P 

RI 
P 
P 


SETCOLOR  0,i,4:5ET 
TCOLOR  2,8,8:3ETC0 
COLOR  4,0,e 
E/256: POSITION  5,2 
puzzle" 

RINT  #6;" ":POS 

NT  #6;  " " 

OSIT ION  1 , I : PRINT 
:i" : POSITION  13,1: 


SPACES] D 
RINT  #6; 
NT  tt6;  '■  ■ 
RINT  #6; 
RINT  #6; 


NEXT     1 
---■-■'■"  :  POS 


rm^3E"  :  P 
FTiEC"  :  RET 


HEX    PUZZLE 


1234 
5678 
9ABC 
DEF 


PUZZLE 


3476 
129E 
CDAB 
8F5 


GOAL 


TIME    0:6 


"Mosaic  Puzzle,"  Atari  version. 


Program  4:  Mosafc  Puzzle  - 

by  Rick  Rothstein 

190  CALL  HAGNIFY<4);:  R 

DIM  TILE ( 16) , TEMP ( 1 

)=16  ::  FR=153 
200  CALL  CLEAR  : :  CALL 
CALL  CHARSET  : :  CA 

0"  ,  71  ,  RPT*  (  "0"  ,  12)  S( 
210  DISPLAY  AT(1,9>:RPT 

DISPLAY  AT(2,9):"0P 
220  DISPLAY  AT(3,9):RPT 

DISPLAY  AT ( 10, 4) : "P 
: :  DI SPLAY  AT ( 1 1 , 4 

HHH" 
230  DISPLAY  AT<13,6>s"l 

•PUZZLE"   : :   DISPLAY 

P;  '■2*«##«#LETTER«PU 
240  WASTE=RND  : :  CALL  K 

IF  ST=0  THEN  240 
250  IF  K=49  THEN  1=0  EL 


#####«NUMBER 
AT ( 16, 6) BEE 
ZZLE" 
EY (0, K, ST) : : 

SE  IF  K=50  T 


260 

270 

280 
290 

300 
310 
320 

330 

340 
350 

360 

370 

380 
390 

400 


■  Tl  Version 

ANDOMIZE     :; 

410 

6)::      TEMP<16 

420 

SCREEN  C 1  1  )  :  : 

430 

LL     CHAR (35," 

"FF0000FF") 

*  (  "  G  "  ,  1  2  >  5  : 

TION«#MENU" 

440 

*  (  "  H  <•  .  1  2  )  :  : 

RESS«#«#FOR" 

) : "HHHHH#»«» 

450 


460 


:  CALL  SCREEN(4) : : 
RESTORE  710  ELSE  RE 


HEN  I=t 
SE  CALL 
240 

CALL  CLEAR  : 
IF  1=0  THEN 
STORE  790 

FOR  1=80  TO  136  STEP  4  ::   READ 
A*,B*  ::   CALL  CHAR  C  I  ,  "  FFFF  "  !,A*& 
■'FFFFFFFF"ScBt&"FFFF">  :  :  NEXT  I 
::  CALL  CHAR ( 1 40 , RPT* (  " 0  "  , 64 )  ) 
CALL  CHAR (71 , "00000000000000003 
0303030303030300000FrFF" ) 
CALL  CHAR (74, "00003F3F303030300 
0  00FCFC0C0C0C0C303030303F3F000  0 
0C0C0C0CFCFC" ,78,  RPT* ( "0C"  ,8) &"0 
0000000FFFF" ) 

RESTORE  870  : :   FOR  1=38  TO  47  j 
:  READ  At  ::  CALL  CHARCI,A*):: 
NEXT  I 

CALL  COLOR (5, 15, 2,6, 15, 2) : :  CAL 
L  HCHAR (2, 7, 71 , 20) : :  DISPLAY  AT 
(3,5)  :  "GJ"!<RPT*  <  "  I  "  ,  1  6  )  &  "  KG  " 
FOR  1=4  TO  16  STEP  4  ::  DISPLAY 
AT  (  I  ,  1  )  :  RPT*  <  "*««#GH"SjRPT*  (  "G" 
,  16)  «c"NG###«"  ,4)  :  :  NEXT  I 


"GL"ScRPT«  (  "0"  , 
HCHAR (21,7,71, 


DISPLAY  AT (20, 5) : 
16)&"MG"  5s  CALL 
20) 

GOSUB  890  ::  FOR  1=1  TO  15  ::   T 
ILE( I )=I   : :   NEXT  I 

FDR  J  =  l  TO  15  ::   R= 1  +  I  NT  ( RND »  ( 1 
6-J));:   TEMP ( J) =TILE (R) : :   TILE( 


NEXT  J 
TO  14  : :   FOR  J=l 
TEMP(I) >TEMP(I+J 


R) =TILE (  16-J)  :  : 
N=0  ; :  FOR  1=1 
TO  15-1  ::   IF 
)THEN  N=N+1 

NEXT  J  ::  NEXT  I  ::   IF  N/20INT 
(N/2)THEN  TEMP (16)=TEMP(15) : :   T 
EMP(15)=TEMP< 14)  :  :   TEMP ( 1 4 ) =TEMP 
(  16)  :  s  TEMP  (  1  6  )  =  16 


FOR  1=1  TO 
) : :  NEXT  I 
FOR  1=22  TD 
J=62  TO  164 


16 


TILE  ( 
:  N=0  : :  S 
124  STEP  3 
STEP  34  : : 


CALL  LOCATE (ttTILECN) , 
XT  J  : :  NEXT  I 
MOVE*=""  ::  TOTAL=0  :: 
AT  (24,  1 )  : CHR* (32  +  6*DIR 
)«+#,-(.+/:  #0#»##«##"a< 
»N0)5:  CALL  SOUND(1S0, 
GOTO  430 

CALL  SOUND( 150, 1 10, 0) 
WASTE=RND  ::   IF  K=73  Q 

K=10S  OR  K=110  THEN  4 
CALL  KEY ( 1 , KK, ST) : :  IF 
EN  670  ELSE  CALL  JOYST 

IF  ABS (X) +ABS (Y) =a  OR 
EN  450 

IF  X/4= (-1 ) - ( 1-DIR) THE 
E  IF  X/4=(-l)''(2-DIR)  T 
LSE  IF  Y/4=(~l)-"  (2-DIR 

ELSE  IF  Y/4=(-l)^:i-D 
90 
CALL  KEY (0, K, ST) : ;   IF 

430  ELSE  IF  K=45  THEN 

IF  K=a3-H0RZ  OR  K=115 
N  510 
IF  K=68+H0RZ  OR  K=100+ 

550  ELSE  IF  K=88-VERT 


I ) =TEMP ( I 

P=16 

4  : :  FOR 

N=N+1  : : 
I  ,- J  )  :  :  NE 

DISPLAY 
) &"#«### ( 
CHR* (39-7 
666, 0} : : 


R  K=78  OR 
50 

KK=18  TH 

(  1 , X, Y)  :  : 

X+Y=0  TH 

N  510  ELS 
HEN  550  E 
)THEN  630 
IR)THEN  5 

ST=0  THEN 

670  ELSE 

-HORZ  THE 

HORZ  THEN 
OR  K=120 
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n 

filKEIIIMXyH 

m  KEEP  sEAKCHm  m 
BEnmKAsm 

Kidnapped  in  revenge  and  locked  in  hatred  some- 
.where  deep  beneath  your  castle,  is  your  princess. 

Gwendolyn. 

The  prosperity  of  your  kingdom,  the  end  of  a  bitter 
feud,  your  very  future  depend  on  finding  her. 

You  swear  that  no  obstacle  can  stop  you.  But  the  high- 
resolution,  3-D  graphics,  animation  and  sound  effects 
make  the  obstacles  that  await  you  more  formidable  than 
you  can  imagine. 

And  with  over  ninety  different  screens  and  two  full 
sides  of  play,  those  obstacles  and  the  decisions  you  must 
make  can  appear  endless.  In  fact,  you  may  have  to  endure 
hours  of  searching  to  rescue  Gwendolyn. 

But  for  her,  you  would  endure  anything,  wouldn't  you? 

Gwendofyn-a  non-violent,  intermediate  graphic  adventure  game,  written 
by  Marc  Russell  Benioff,  Atari  40K  Disk  $27.95,  Artworx  Software  Co.,  Inc., 
150  N.  Main  St.,  Fairport,  N.Y.  14450.  For  a  free  catalog  of  Artworx 
Software  for  the  Atari,  Apple,  V!C-20  &  Commodore  &4  computers,  write 
or  call  800-828-6573. 


IB 

These  are  just 

ttiree  of  over 

ninety  exciting 

screens. 


Aiari.Apple,VIC-20&  Cornmottoreft^ 
ate  te^iileted  Iradentafbs 


So  you  can  play. 


TI-99/4A  Notes 

Rick  Rothstein 

The  TI/99-4A  version  of  "Mosaic  Puzzle" 
requires  Extended  BASIC.  In  this  version, 
you  have  the  option  of  requesting  either  let- 
ters (A-O)  or  numbers  (1-15)  within  a  4-by-4 
frame.  When  you  have  entered  your  choice, 
the  game  board  with  its  lettered  or  numbered 
blocks  appears  in  a  scrambled  order.  The 
object  of  the  game  is  to  slide  the  blocks  about, 
one  at  a  hme,  to  bring  them  to  one  of  several 
preselected  patterns.  Some  patterns  that  you 
can  try  to  duplicate  are  given  in  the  table. 

Move  the  lettered  or  numbered  blocks 
around  the  game  board  with  a  joystick  or  the 
keyboard  (E,  S,  D,  and  X  keys).  You  actually 
have  a  choice  of  moving  either  the  free  space 
(hole)  or  the  labeled  blocks.  The  game  is  ini- 
tially set  to  move  the  free  space,  but  by 
pressing  I  (note  the  appearance  of  the  left- 
right  arrow  symbol  in  the  lower-left  corner 
of  the  screen),  you  can  move  the  labeled 
blocks. 

Each  move  that  you  make  is  tallied,  and 
the  total  number  of  moves  is  given  at  the 
bottom  of  the  screen.  Moves  are  normally 
accompanied  by  a  sliding  noise  (notice  the 
note  symbol  at  the  lower-right  corner  of  the 
screen).  If  this  noise  becomes  annoying,  press 
N  and  the  noise  will  cease  (the  note  will  also 
disappear). 

At  certain  times  during  the  game,  you 
may  wish  to  retrace  your  previous  moves. 
Press  -  (minus  sign)  or  hit  the  fire  button  to 
step  back  through  each  preceding  move. 


With  this  option,  a  maximum  of  250  moves 
can  be  recalled. 

Once  you've  achieved  the  desired  pre- 
selected pattern  from  its  scrambled  be- 
ginnings, you  can  restore  the  original  game 
board  pattern  by  pressing  FCTN  (REDO) 
and  challenge  yourself  or  others  to  beat  your 
tally. 

Other  options  available  to  you  during 
the  game  are: 


Keystroke 
FCTN  (BACK) 

FCTN  (BEGIN) 
FCTN  (ERASE) 


Description 
Returns  to  the  letter  or 
number  option  menu 
Starts  a  new  game 
Ends  the  program 


Possible  Patterns  For  Puzzle,  Tl  Version 

12      3      4 

1      5      9      13 

7      8      9      10 

5      6      7      8 

2      6      10    14 

6      1      2      11 

9      10    11    12 

3      7      11    15 

5      4      3      12 

13    14    15 

4      8      12 

15    14    13 

Horizontal 

Vertical 

Spiral 

12      3     4 

12    2      1     15 

A    B     C     D 

12    13    14    5 

7     9      10  4 

E     F     G    H 

11           15    6 

11    5      6     8 

I      J      K    L 

10    9      8      7 

14    13  3 

M    N    O 

Peripheral 

Adds  To  Thirty 

Horizontal 

A     E     I      M 

G    H    I      J 

A     B     C     D 

B     F     J      N 

F     A     B     K 

L     M    N    E 

C     G     K    O 

E     D    C     L 

K           OF 

DHL 

O    N     M 

J      I      H    G 

Vertical 

Spiral 

Peripheral 

FOG 

ELF 

BIND 

JAMB 

HELM 

DOCK 

JACK 

NIGH 

Words(l) 

Words(2) 

-VERT  THEN  59 
T  OR  K=10H-VE 

470  IF  K=6  THEN  C 
26):;  BOSUB  8 
E  IF  K=7  THEN 

480  IF  K=15  THEN 
)  :  :  GOTO  200 
CALL  HCHARC24 
0  ELSE  IF  ST= 

490  IF  K=78  OR  K= 
:  FR=153+ND«3 
<24, 30, 39-7«N 

500  IF  K=73  OR  K= 
DRZ  : :  VERT=1 
R  : :  CALL  HCH 
:  GOTO  420  EL 

510  IF  SP=i  OR  BP 

3  THEN  410  EL 

POSITrDN<»TI 

CALL  SOUND (40 

520  IF  MINUS=0  TH 
ELSE  MINUS=0 
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0  ELSE  IF  K=67+VER  530  FOR  I=CaL  TO  COL+34  STEP  2  s:  C 

RT  THEN  630  ALL  LOCATE <#T 1 LE ( SP ), ROW , 1 ): ;  N 

ALL  HCHAR (24, 4, 32,  EXT  I 

90  ::  GOTO  380  ELS  540  TI LE ( SP+1 ) =T ILE ( SP ) : :  TILECSP)= 

700  It,  ::  CALL  SOUND  (- 1  ,  FR  ,  30 ):  :  GO 

CALL  DELSPRITE(ALL  TD  690 

ELSE  IF  K=14  THEN  550  IF  SP=4  OR  SP=8  OR  SP=12  OR  SP= 

,4,32,26)::  GOTO  34  16  THEN  410  ELSE  SP=SP+1  ::  CAL 

-i  THEN  420  L  POS I T I  ON ( #T I LE  ( SP )  , ROW , COL )  i  ; 

110  THEN  NO=l-NO  :  CALL  SOUND ( 4000 , FR, 1 4 JNO ) 

0000  j:  call  HCHAR  560  IF  MINUS=0  THEN  nOVE*= " R " &MOVE« 

0)::  GOTO  420  ELSE  MINUS=0 

105  THEN  H0RZ=15-H  570  FOR  I=COL  TO  COL-34  STEP  -2  :: 

9-VERT  ::  DIR=1-DI  CALL  LOCATE ( #T  ILE ( SP)  , ROW,  I ):  ; 

AR (24, 3, 32+6»DIR) :  NEXT  I 

SE  410  580  TILE (SP-1 )=TILE (SP) : :  TILE(SP>= 

=5  OR  SP=9  DR  SP=1  16  :;  CALL  SOUND (- 1 , FR , 30 ): :  60 

SE  SP=SP-1  ::  CALL  TD  690 

LECSP) ,ROW,COL) : :  590  IF  SP>12  THEN  410  ELSE  SP=SP+4 

00,FR,14«NO)  ::  CALL  POS I T I  ON ( #T I LE ( SP )  , ROW , 

EN  MOVE«="L"&MGVEt  COL):;  CALL  SOUND ( 4000 , FR, 1 4*NO 

) 


YOU'RE  IN  TROUBLE! 


The  word's  out  on  Parallax.  FAST.  You  better 
be  fast,  really  fast  to  beat  those  evil  Silurians. 
Watch  out!  Wave  after  screaming  wave  of 
gravity  force  fields  can  tear  you  apart.  Quick! 
Aim  your  missiles.  Fire!  Fire  again!  You  must 
destroy  those  oscillating  gravitonic  genera- 
tors or  else!  Oh  no...  the  Silurian  orbital 
launchers  are  now  slamming  multiple  war- 
heads at  you  from  all  sides  at  once.  Dont 
panic!  You're  fast. .  .you  have  to  be...  to  meet 
all  the  high-speed  challenges  of  Parallax, 
the  most  kinetic  game  going! 


10  DIFFERENT  FAST^ACTION 
SCREENS + MULTI-BONUS  SCREENS 

2-PLAYER  OPTION 

lOOJo  MACHINE  LANGUAGE 

16K  PLUS*JOYSTICK 

DISK  OR  CASSETTE 

From  the  makers  of  Tiion  (in  3-D}  and  Space 

Ace,  ffl-Rated  Game  of  1982^  S34.95.  See  your 

dealer  and  play  the  game  or  order  direct. 


o    L 


374  WildimodAve..  Piedmonl.  CA  946t1 

PHONE  OROBm:(4J5IB93-W90VISA/IVIC 

Pieaseadd  SI. 50  postage  and  handling. 

Calif,  residents  add  6.5%  sales  tax. 

•COMPUTER  DEALER.  Jan..  1983 

Atari  is  a  registered  Irademarlr  ofAiari  Inc. 

Commodore  64  is  a  registered  trademark  ot 

Commodore  Business  Machines.  Inc. 

c  1983  ijy  London  Software 


DESIGNED  BY  GREG  YOUNG.  FOR  ALL  ATARI  COMPUTERS  AND  THE  COAAMODORE  64. 


600 


610 


620 


630 


640 


650 


660 


670 


680 


690 


700 


710 


720 


730 


740 


8FC, 
750 


760 


770 


780 


790 


800 


810 


'D"S<MOVE«   020 


830 


STEP  2 
I , COL) 


C 
N 


:  TILE(SP>= 
FR, 30) : :  BO 


IF  MINUS=0  THEN  MOVE*= 

ELSE  MINUS=0 
FOR  I=ROW  TO  ROW-34  STEP  -2  :: 
CftLL  LOCATE<#TILE{SP) , I,COL) : : 
NEXT  I 

TILE(SP-4)=TILE tSP) : ;  TILE(SP)= 
16  ::  CALL  SOUND <- 1 , FR , 30 ): :  GO 
TO  690 

IF  SP<5  THEN  410  ELSE  SP=SP-4  : 
:  CALL  POSITION(#TILE CSP) ,ROW, C 
DL)::  CALL  SOUND  £  4000 , FR ,  1 4 tNO ) 
IF  MINUS  =  0  THEN  MDVE*=  "  U  "  SsMOVE* 

ELSE     MII\tUS  =  0 
FOR     I=RQW     TO     ROW+34 
ALL     LOCATE C#TILE <SP) 
EXT     I 

TILE{5P+4)=TILE(SP) : 
16  s :  CALL  SOUND (-1 
TO  690 

IF  MOVE«=""  THEN  410  ELSE  MINUS 
=1  ::  K=ASC (MOVE*) : :  MOVE«=SEG* 
(MOVE*, 2, 250) : :  TOT AL=TOT AL-2 
IF  K=S2  THEN  510  ELSE  IF  K=76  T 
HEN  550  ELSE  IF  K=S5  THEN  590  E 
LSE  IF  K=6a  THEN  630 
TOTAL=TOTAL+l  ::  DISPLAY  AT(24, 
19) SIZE (4) BEEP: TOTAL  ::  MOVEt=S 
E6* (MOVE*, 1 , 250) : :   BOTO  420 
CALL  DELSPRITE (ALL) : :  CALL  CLEA 
R  :  :  END 

DATA  FEFEFEFEFEFEFEFEFEFEFEFE,7 
F7F7F7F7F7F7F7F7F7F7F7F, FBF0F3F 
FFFFFFEFCFaFlF0F0, 1 F0FCFCFBF 1 F3 
F7FFFFF0F0F 

DATA  FaF0F3FFFFFEFEFFFFF3F0FB, 1 
F0FCFCFBF1F1F8FCFCF0F1F, FFFFFEF 
CF8FlF0F0FFFFFFFF,aF0F0F4FCFCF0 
F0FCFCFCFCF 

DATA  F0F0F3F3F0F0FFFFFFF3F0Fa, 1 
F1FFFFF3F1F8FCFCFBF1F3F, FCF8F1F 
3F0F0F1F3F3F1FSFC, 1F1FFFFF3F1FSF 
CFCF8F1F3F 

DATA  F0F0F3FFFFFFFFFEFEFEFEFE, 0 
F0FCFaF9FlF3F3F7F7F7F7F,FCFBF9F 
9FCF8F1F3F3F1F 
,  3FlF9F9F3FlFaFCFCFaFlF3F 
DATA  FCF8F1F3F3F1F8FCFFFFF8F8. 3 
F1F8FCFCF8F0F0FCF8F1F3F, CFCECCC 
CCCCCCCCCCCCCCECF, 0F0763F3F3F3F 
3F3F363070F 

DATA  F3F3F3F3F3F3F3F3F3F3F3F3, C 
FCFCFCFCFCFCFCFCFCFCFCF, CECCCCC 
FCFCFCFCFCECCCCCC,0703F3F3E3C78 
F1F3F7F0303 

DATA  CECCCCCFCFCFCFCFCFCCCCCE,  0 
703F3F3E3a7a7E3F3F30307,CFCFCFC 
FCECCCCCCCFCFCFCF,E3C3a31333730 
303F3F3F3F3 

DATA  CCCCCCCCCCCCCFCFCFCCCCCE,0 
707FFFF0F07E3F3F3E3070F 
DATA  FEFCFaFlE3E7E0E0E7E7E7E7, 7 
F3F1FBFC7E70707E7E7E7E7, E0E0E7E 
7E7E0E0E7E7E7E0E0, 1F0FC7E7C70F0F 
C7E7C70F1F 

DATA  FaF0E3E7E7E7E7E7E7E3F0F8,0 
F07E7FFFFFFFFFFFFE7070F, E0E0E7E 
7E7E7E7E7E7E7E0E0,3F1FBFC7E7E7E 
7E7C7aFlF3F 

DATA  E0E0E7E7E7E0E0E7E7E7E0E0,  0 
707FFFFFF1F1FFFFFFF0707, E0E0E7E 
7E7E0E0E7E7E7E7E7,0707FFFFFF1F1 
FFFFFFFFFFF 
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840 
850 

860 

870 

880 
890 


DATA 

F07E 

7E7E 

E7E7 

DATA 

F1F7 

FFFF 

E7E7 

DATA 

78F1 

7E7E 

FFFF 

DATA 

7C78 

0E4E 

2707 

DATA 

F0FC 

DATA 

aF8F 

4447 

7C 

DATA 

438, 

44 

FOR 

RITE 

+  4*1 

RN 


FaF0E 
7FFFFF 
0E0E7E 
E7E7E7 

F8F8F 
F7F7F7 
FFFFFE 
C70F1F 

E7E7E 
F3F7FF 
7E7E7E 
FF0707 

E7E3E 
707276 
6E6E7E 
B7C7E7 

FaF0E 
7E7E7E 

3060F 
86, 004 
C, 0044 


3E7E7E7E7E7E7E3F0FB,0 
Fe7a7E7E70707, E7E7E7E 
7E7E7E7,E7E7E7E7E70707 

EFEFEFEFEFEFEFEFBFS, 1 
F7F7F7F7F1F1F,FFFFFFF 
7E3F0F8,E7E7E7E7E7E7E7 

7E6E4E0E0E0E6E7E7E7, C 
FFF7F3FlFaFC7, E7E7E7E 
7E7E0E0,FFFFFFFFFFFFFF 

1E0E4E6E7E7E7E7E7E7, E 
7E7E7E7E7E7E7,E7E3E1E 
7E7E7E7, E7E7E7E7E7  6767 


3E7E7E7E7E7E7E3F0F3, 1 
7E7E7E7C70F1F 
F0000FF060C, 0E090e086 
46C54444444,007C44444 
444444281 ,007040784040 


00446454S44C44, 00444444444 
007 8447 84 4447B, 00784444  7848 

1=1  TO  16  STEP  2  ::  CALL  SP 
(*I,76+4«I,16,193,l,#I+i.a0 
,11,193,1)::  NEXT  I  :;  RETU 


COMPUTE! 

The  Resource, 


AT  LAST...  AN    INTERACTIVE 


COMPUTER/VCR  INTERFACE 
FOR  THE  HOME! 


PROMETHEUS  1 

INTERACTIVE  COMPUTEIWCR  INTERFACE 


NOW,  FOH  THE  FIRST  TIME,  YOU  CAN 
HAVE  A  COMPLETELV  INTERACTIVE  COM- 
PUTERnriDEO  SVSTEM  AT  HOME  FOR 
LESS  THAN  $1,500.  THE  PROMETHEUS  1" 
INTERFACE  CONNECTS  YOUR  COM- 
MODORE 64  OR  VIC  20  COMPUTER  TO 
YOUR  CONSUMER  VCR,  GIVINO  YOU  A 
WHOLE  HEW  RAHQE  OF  ENTERTAINMENT 
AND  EDUCATIONAL  POSSIBILITIES  NEVER 
BEFORE  AVAILABLE  IN  THIS  PRICE  RANGE. 
SEND  FOR  OUR  FREE  LITERATURE  AND  OUR 
CATALOG  OF  ENTER- 
TAINMENT/EDUCA- 
TIONAL INTERACTIVE 
COURSEWARE,  OR 
SEND  CHECK  OR 
MONEY  ORDER  (PLUS 
$4.00  POSTAQE  AND    I 
HANDUNO)  FOR  THE 
PROMETHEUS  1" 
INTERFACE.) 


Wa.  SI.  Rn. 
■dd  tH  uin  iw 


P.O.  BOX  19S97 

SEATTLE.  WA  98109 

OH  CALL: 

(206}  !82-363e 


INCLUDE  YOUR  COMPUTER 
WARRANTY  NUMBER 
AND  RECEIVE  A  FREE 
PROMETHEUS  1~  POSTERt 
AUOW  6-a  WEEKS  FOR 
DELIVERY. 
ORDER  NOW  FOR 
CHRISTMAS. 
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Frogger  hops  to  IBM!  Sierra  Gfn-Line  brought 
this  popular  coin-op  game  to  the  Apple,  Atari 
and  Com  64.  Now  we're  bringing  the  helpless 
eritter  home  to  IBM  PC  owners! 
■Frogger  is  available  for  $34.95  from  your  local 
-^ealer  :0r  "directly  from  Sierra  On-line,  Inc., 
*^ra  On-line  Building,  Coarsegold,  CA  93614 
118376858.  VISA,  Mastercard,  Check,  COD 
accepted.  Add  one  dollar  for  shipping. 


designate  trademarks  of  Sega  Enterpnses,  Inc. 

©  1981  Sega  Eriterprises.  Inc. 
/ISION  is  8  trademark  of  Sierra  On-Line,  Inc.' 
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Questions  Beginners  Asl( 


Tom  R.  Halfhill,  Features  Editor 


Are  you  thinking  about  buying  a  computer  for  the  first 
time,  but  don't  know  anything  about  computers?  Or 
maybe  you  just  purchased  a  computer  and  are  still  a  bit 
baffled.  Each  month  in  this  column,  COMPUTE!  zvill 
answer  some  questions  commonly  asked  by  beginners. 


Ql'm  looking  around  for  my  first  personal 
computer,  and  am  wondering  if  I  should 
get  an  8-bit  or  16-bit  computer.  I  don't  really  un- 
derstand the  difference,  except  I  was  told  by  a 
salesman  that  16-bit  computers  are  faster,  have 
more  memory,  and  w^ill  eventually  replace  8-bit 
computers.  Is  this  true?  Are  8-bit  computers 
becoming  obsolete?  Would  I  be  better  off  with  a 
16-bit  computer?  What  is  the  real  difference, 
anyway? 

A    These  questions  come  up  fairly  often,  so 
let's  deal  with  them  in  some  detail. 

First,  it's  not  true  that  8-bit  computers  are 
becoming  obsolete.  Most  of  the  computers  being 
sold  today  are  8-bit  computers,  especially  the 
under-$1000  home  computers.  Although  it  is  true 
that  16-bit  computers  will  likely  become  in- 
creasingly common,  8-bit  machines  (especially  in 
the  low  price  range)  will  be  around  for  a  good 
while. 

Nor  is  it  true  that  16-bit  computers  are  neces- 
sarily faster  or  contain  more  memory. 

The  difference  between  8-  and  16-bit  com- 
puters lies  in  their  Central  Processing  Units.  The 
CPU  is  the  central  "brain"  of  a  computer.  It  fetches 
instructions  written  by  programmers,  performs 
arithmetic  to  execute  the  instructions,  and  stores 
the  results  of  its  calculations  in  memory.  The  CPU 
controls  or  oversees  all  the  operations  performed 
by  the  computer.  Without  a  CPU,  a  computer 
would  be  a  brainless  collection  of  memory  chips, 
support  chips,  and  wires. 

In  very  large  mainframe  com-puicxs,  the  CPU 
might  be  a  unit  the  size  of  a  refrigerator,  made  up 
of  dozens  of  circuit  boards.  Microcomputers  (in- 
cluding personal  computers)  have  a  microprocessor 
CPU  -  a  CPU  that  fits  on  a  single  silicon  chip  smaller 
than  apenny.  Microprocessors  work  strictly  with 
binary  numbers  (I's  and  O's).  All  instructions 
and  numbers  required  for  calculations  must  first 
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be  converted  to  groups  of  binary  numbers  before 
the  microprocessor  CPU  can  handle  them. 

Some  microprocessors  are  designed  to  handle 
groups  of  binary  numbers  only  four  digits  long. 
That  is,  all  numbers  and  instructions  must  be 
broken  up  into  groups  of  four  I's  and  O's,  such  as 
1101  or  1011.  This  would  be  called  a  4-bit  micro- 
processor (a  bit  is  a  binary  digit  -  a  1  or  a  0).  Port- 
able calculators  use  these  4-bit  chips. 

Other  microprocessors  are  more  powerful 
and  can  handle  numbers  and  instructions  in 
groups  of  eight  I's  and  O's.  These  are  8-bit  micro- 
processors. A  16-bit  microprocessor  handles  16 
bits  at  a  time,  a  32-bit  microprocessor  handles  32 
bits,  and  so  on. 

Generally  speaking,  the  larger  these  groupings 
(called  word  size),  the  more  powerful  the  computer. 
Computers  which  handle  numbers  internally  in 
larger  chunks  of  bits  can  work  faster  and  more 
efficiently.  Also,  they  generally  have  more  mem- 
ory because  they  are  designed  to  run  larger  pro- 
grams and  therefore  need  more  memory. 

But  keep  in  mind  that  these  are  general  rules, 
and,  as  always,  there  are  exceptions.  Several  other 
factors  also  determine  the  speed  of  a  computer 
and  the  amount  of  memory  it  contains. 

For  instance,  the  only  16-bit  home  computer 
now  on  the  market  is  the  Texas  Instruments  TI-99/ 
4A.  Its  maximum  memory  expansion  is  48K,  which 
is  no  more  (and  in  some  cases  less)  than  the 
maximum  memory  available  in  such  8-bit  com- 
puters as  the  Commodore  64,  Apple  Il/IIe,  Atari, 
Radio  Shack  TRS-80,  Timex/Sinclair,  etc.  Also, 
most  of  these  8-bit  computers  can  run  BASIC  pro- 
grams somewhat  faster  than  the  TI-99/4A. 

In  one  benchmark  test  we  heard  about,  a 
small  8-bit  Timex/Sinclair  1000  actually  outran  a 
larger  and  much  more  expensive  16-bit  IBM  Per- 
sonal Computer.  Yet,  a  business  person  who 
needs  the  powerful  features  of  an  IBM  PC  would 
not  want  to  choose  the  T/S  1000  on  the  basis  of 
speed  alone. 

That's  why  you  shouldn't  base  a  buying  deci- 
sion solely  on  the  question  of  8-bit  versus  16-bit. 
Too  many  other  factors  are  important.  Instead, 
carefully  evaluate  your  own  needs,  and  then  shop 
for  a  computer  and  software  combination  that 
serves  them  well.  © 


"Popular  Computing  says 
The  Home  Accouniani 
docs  just  aboul  everything 
you'd  ask  of  a  personal 
flnance  package."* 


"Yon  mean  you  can  use 
The  Home  Accountanl 
for  business, 
tooH" 


"The  Home  Accountant 
evea  fla^  transactions  for  tax  time. 

And  that's  a  big  time-saver 

because  1  can  transfer  information 

■0  The  Tax  Advantage'"  program 

and  easily  figure  out  what  I  owe." 


"My  company  has 

5  checking  accounts. 

6  business  credit  cards 

and  3  money  market 

funds  to  keep  track  of. 

The  Home  Accountant 

makes  it  easy." 


"Absolutely. 
Vouldn't  want  to  run 
my  consulting  firm 
without  it." 


"The  Home  Accountant 

Is  great  for 

realistic  budgeting." 

"I'm  so  glad  you  brought 

It  home.  1  never  thought 

that  creating  a  budget 

and  managing  money 

could  be  so  easy. 


wAmi 
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You  can  create  trend  analysis 
graphs  for  each  budget 

category,  so  you  can  make 
ual  comparisons  of  where 
you  stand  financially." 

"And  yoti  can  do  It  In 
foil-scale  color  graphics." 


"Sofialk  Magazine 
says  It's  the  most 

thorough  and 

powerful  program 

of  its  kind."? 


*PcipularCampu[ing.  Nuvt?mbt:r.  19H2 
1  Apple  Sirflalk.  April.  1982 


Everyone's  talking  about  The  Home  Accountant. 


Ls  it  because  it's  the  #1  bestselling 
home  finance  package  in  the  world?  Or 
because  it's  extremely  thorough  and 
powerful  and  easy  to  use?  Or  (because 
it's  great  for  home  and  business  use? 
Or  because  it  ha.s  up  to  200  budget 
categories  and  handles  up  to  5 
checking  accounts? 

Yes.  [Jut  there  are  a  lot  more  reasons 
why  people  buy  The  Home  Accountant. 
And  why  you  will,  too. 

Because  The  Home  Accountant  can 
literally  .save  you  hours  of  time.  And 
take  the  headache  out  of  handling  your 
finances.  Wliether  it's  setting  up  a  budget, 
cataloging  your  expenses,  balancing 
your  checkbooks  or  handling  your 
credit  cards  and  money  market  funds. 
For  personal  or  business  use. 


The  Home  Accountant  will  even 
print  net  worth  and  financial  state- 
ments. Not  to  mention  being  a  lifesaver 
at  tax  time.  Especially  when  you're  able 
to  transfer  information  onto  Continen- 
tal's The  Tax  Advantage™  program  and 
figure  out  what  you  owe.  Quickly. 

In  short,  The  Home  Accountant  is  the 
mo.st  effective  software  program  there 
is  for  managing  your  money.  And  man- 
aging it  easily. 

.Stop  by  your  Continental  Software 
dealer  today  and  pick  up  The  Home 
Accountant.  You'll  see  what  everyone's 
talking  about. 

The  Home  Accountanl  is  available 
for  Apple  11/Ile,  IBM  PC/XT,  Atari 
400/800/1200X1.,  Osborne?  TRS-80 
Models  1II/4,  Commodore  64,  Texas 


Instruments  Professional,  Zenith 
2-100/110,  Compaq  and  KayPro  compu- 
ters. Actual  budget  capacities  will  vary 
with  each  computer. 

For  your  free  48  page  booklet, 
"Tips  For  Buying  Software,"  please 
write  Continental  Software,  11223 
South  Hindry  Avenue,  Los  Angeles, 
CA  90045,  213/417-8031, 
213/417-3003. 


Continental 

Software 

A  Di\'i.'iion  of  Arrays,  Inc. 
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On  The^ad  With  Fred  D'Ignazio 


There's  A  Robot 
In  My  Room 


If  \Vs  Tuesday,  I  Must  Be  In 
Benton  Harbor 

Last  mtinth  1  asked  you  to  lace  up  your  racing 
shoes  and  sprint  with  me  on  my  whirlwind  tour 
of  computer  and  robot  centers  around  the  United 
States.  I  visited  the  West  Coast  Computer  Faire  in 
San  Francisco,  then  the  Florida  Instructional 
Computing  Conference  in  Tampa.  After  that  I 
flew  up  to  New  York  to  see  a  preview  of  the  new 
educational  software  being  created  at  the  Chil- 
dren's Computer  Workshop  (CCW).  I  spent  a  day 
in  Benton  Harbor,  Michigan,  teaching  the  HERO 
1  robot,  and  another  day  in  Chicago  at  ROBOTS 
VII,  the  world's  largest  robotics  conference. 

This  month  I'd  like  you  to  come  with  me  to 
England.  The  trip  to  England  will  be  hke  a  visit 
into  the  future  when  we  will  be  surrounded  by 
intelligent,  friendly  machines.  We'll  see  the  kind 
of  effect  it  has  on  an  average  person  of  the  present 
who  is  still  used  to  dealing 
with  people. 


A  Scene  Out  Of  Dr.  Who 

After  returning  from  Chicago,  I  spent  a  couple  of 
days  at  home  in  Roanoke,  Virginia.  Then  I  climbed 
aboard  a  TWA  jet  and  flew  across  the  Atlantic  to 
London,  England.  I  went  to  London  to  teach  a 
three-week  course  on  "Robotics  Literacy"  at  the 
Organization  Reconstruction  Travail  (ORT),  an 
international  technical- 
training  institute  whose 
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world  headquarters  is  in  London.  I  also  helped 
with  the  course  materials  by  arranging  to  have  a 
HERO  robot  flown  over  from  the  United  States 
and  I  carried  a  Tasman  Turtle  robot  with  me  on 
the  airplane. 

There  were  15  students  in  the  Robotics  Liter- 
acy course.  The  students  came  from  countries  all 
over  the  world,  including  India,  France,  Israel, 
the  United  States,  Italy,  and  the  United  Kingdom. 
The  students  were  all  adults.  They  were  directors 
of  university  engineering  schools,  vocational 
schools,  and  teacher  training  schools.  They  had 
come  to  London  to  learn  how  to  set  up  a  robotics 
course  in  their  own  countries.  They  returned  to 
their  countries  with  a  ten-pound  notebook  full  of 
course  materials,  another  50  pounds  of  books, 
brochures,  and  manuals,  a  computer,  a  robot 
arm,  and  lots  of  "hands-on"  experience. 

How  High  The  Tech 

I  anticipated  that  a  course  on  robotics  would  be 
"high  tech,"  but  I  did  not  dream  how  high  the 
tech  would  be.  The  classroom  was  like  a  scene 
out  of  science  fiction's  Dr.  Who  program.  We  had 
twenty  BBC  (Model  B)  computers  networked  to- 
gether on  the  Econet  Network.  The  computers  sat 
on  polished  mahogany  tables  lining  the  walls  of 
the  classroom.  Next  to  each  computer  was  a  Smart 
Arm  robot.  The  robots  were  plugged  into  the  com- 
puters and  could  be  programmed  using  the  Arm 
Controller  keypads. 

At  one  point  the  course  manager  had  all  the 
arms  going  at  the  same  time.  The  arms  waved, 
swooped,  picked  up  pencils  and  half-empty  coffee 
cups. 

Also  next  to  the  tables  was  a  robotics  interface 
kit.  The  kit  came  in  a  box  that  looked  like  a  steel 
briefcase.  When  you  opened  the  box,  you  saw  an 
array  of  wires  and  metal  parts.  The  kit  was  de- 
veloped by  the  Moshinsky  Institute  in  Israel.  It 
contained  sensors  and  motors  that  could  be  con- 
nected to  the  computers  and  to  the  Smart  Arm 
robots.  It  was  like  a  robotic  Erector  set.  With  the 


kit,  you  could  take  the  Smart  Arm,  give  it  eyes 
and  ears,  and  incorporate  it  into  a  miniature  fac- 
tory workstation.  Two  Smart  Arms  could  work 
together,  sensing  each  other's  movements  via 
infrared,  electrical,  and  optical  sensors. 

The  kit  sounds  sophisticated,  but  it  was  as- 
sembled by  students  at  the  institute  out  of  spare 
parts  scavenged  from  the  institute's  supply  room. 

At  the  front  of  the  room  was  an  enormous 
television  set  and  a  BBC  computer  as  the  network 
controller.  The  teacher  could  conduct  an  experi- 
ment or  give  a  demonstration  simultaneously  on 
the  master  computer  and  on  the  20  student  com- 
puters and  robots. 

Also,  whenever  a  student  wanted  to  ask  a 
question  or  show  off  something  he  was  proud  of, 
the  instructor  could  copy  the  student's  computer 
screen  onto  any  other  student's  screen  or  onto 
the  big  TV  screen  at  the  front  of  the  class. 

At  the  back  of  the  room  was  a  huge  multi- 
projector  slide  system  mounted  on  a  six-foot  plat- 
form. During  the  course,  we  got  to  see  several 
videotapes  and  slide  shows  on  different  robot 
applications. 

Also  at  the  back  was  a  hulking,  hydraulically 
powered  robot  arm.  The  robot  was  used  in  major 
demonstrations  and  became  a  star  when  TV  and 
newspaper  reporters  arrived. 

Running  around  the  floor  were  lots  of  litfle 
robots,  like  robot  gremlins.  A  robot  "buggv" 
zipped  across  the  floor,  following  a  twisting, 
turning  piece  of  white  tape  with  its  photoelectric 
sensor. 

The  robot  turtle  was  on  the  floor,  talking, 
beeping,  blinking  its  little  LED  "eyes,"  and  trying 
to  find  its  way  out  of  a  maze  made  of  cardboard 
walls. 

And  HERO  was  there  too,  waving  his  arm, 
and  rolling  over  the  cables  and  wires  that  criss- 
crossed the  floor. 

An  English  HERO 

When  1  first  arrived  in  England,  I  hoped  to  receive 
a  HERO  robot  shipped  direcfly  from  Benton  Har- 
bor, the  world  headquarters  of  Heath  Company, 
the  robot's  manufacturer.  Unfortunately,  Heath 
was  swamped  by  orders  for  the  HERO  and  was 
way  behind  meeting  shipments.  A  spare  robot 
couldn't  be  found. 

Luckily  for  me  and  my  students,  we  found 

a  HERO  robot  in  England.  Zenith  Data 

Systems,  a  Heath-affiliated  company 

located  in  Gloucester,  England,  near 

the  west  coast,  offered  to  loan  us  their 

machine  in  return  for  some  training  on 

the  HERO. 

1  journeyed  to  Gloucester  by  train  on 
my  second  day  in  England.  1  met  the 
English  HERO  and  found  that  he  had  been 

October  1983    COMPUTE!     109 


mJA 

Tji 

Si 

^m 

7^ 

53 

^tm 

*s 

F/r 

[§jk 

jji 

2S 

1  §]  1 

^?j 

mi 

77^ 

11 

"^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^1 

-^^^^^^^^^^^^^^^H 

Ih 

Scholastic.  You  know  the  name.  You  know  the 
quality.  We've  been  making  learning  fun  for  over  60 
years. 

Scholastic,  the  leading  name  in  educational 
books  and  magazines,  is  now  the  leading  name  in 
educational  software.  Now  we  make  Wizware"", 
microcomputer  software  that  stimulates  young  minds ... 
enhances  creativity  and  abstract  reasoning... 
strengthens  language  and  math  skills. 

With  titles  like  Square  Pairs'",  a  matching  game 
of  imagination  and  memory.  Turtle  Tracks™,  an  easy-to- 
learn  programming  language  with  hi-intensity  graph- 
ics. Microzine™,  four  creative  and  open-ended  pro- 
grams in  one  package.  And  much  more  fun  learning, 
in  formats  compatible  with 
Apple®,  Atari^,  TI-99/4A, 
VIC-20f  Commodore  64f 
and  IBM""  PC. 

When  you  buy 
WizwareTyou're  buying 
creative  learning  tools 
for  your  children. 
Because  you're  buy- 
ing Scholastic. 

Think  about  it. 
We  do. 

^^Scholastic 


Wizware 


'Gtaphjcs  created  wilh  P^ngvin  Software's  Graphics  Msgiciaf).  Apple  is  a  registerBd  trademark  of  Apple  Compiaer.  ItK.  Atsri  is  a  registef^d  tr&ctem&rk  o(  Atari  DivisiOfi,  Warner  ComrnunicaUoas.  Inc.  ViC-20  snd  64  ai^ 
registered  tfs0ei^srk$  of  Comrrxxiofe  Electroriics  (Jd.  !BM is  a regtsterud  trademark  of  tr^terrjaltonat  Business  Wac/vnes  Corp. 


fitted  with  an  English  power  supply  and  a  deeper 
voice  than  the  HERO  I'd  met  in  Benton  Harbor. 
I  returned  to  London.  Two  days  later  HERO 
arrived  in  a  box  big  enough  to  encase  a  circus 
gorilla.  His  wrist  was  bent,  his  head  was  on 
crooked,  and  his  photoelectric  sensor  that  moni- 
tored the  number  of  times  his  wheel  turned 
around  was  disconnected.  But  these  were  minor 
problems.  After  a  little  sprudng  up,  he  worked 
perfectly. 

The  Master  Of  Ceremonies 

HERO  got  to  be  our  course's  Master  of  Cere- 
monies. It  was  his  job  to  say  a  few  words  to  inspire 
the  students  and  get  the  course  started. 

The  only  hitch  was  that  to  turn  HERO  into  a 
congenial  Master  of  Ceremonies,  I  had  to  program 
him.  And  I  had  never  programmed  a  HERO  be- 
fore. (The  mucking  around  1  did  in  Benton  Harbor 
was  definitely  not  programming.  Take  a  look  at 
last  month's  "On  the  Road"  column  to  see  what 
happened  the  first  time  HERO  and  1  were  alone 
together.) 

Without  proper  programming,  all  HERO  was 
capable  of  was  a  few  robot  calisthenics.  Of  course, 
HERO  could  also  say  "Ready"  (it  sounded  more 
like  "RED-DY!").  But  that  meant  HERO  was  ready 
to  be  programmed,  not  ready  to  do  tricks. 

I  spent  the  entire  weekend  before  the  opening 
ceremonies  programming  HERO.  I  had  to  enter 
my  entire  program  as  two-digit  hexadecimal  com- 
mands typed  into  the  keyboard  on  HERO's  head. 
To  make  HERO's  motors  move,  I  had  to  tell 
HERO'S  computer  which  of  six  motors  to  turn  on, 
what  motor  position  to  start  from,  and  how  far 
the  motor  should  turn. 

In  order  to  get  HERO  to  talk,  1  had  to  think 
up  HERO's  speech  then  break  it  into  hundreds  of 
^>s        phonemes  -  the  sounds  that  are  the 
^„5^N  -—     building  blocks  of  spoken  words. 
^^3bT-^\  Then  I  had  to  code  the  phonemes 
/W.*^       into  HERO'S  "Robot  Language" 
and  enter  more  two-digit  codes 
into  HERO's  onboard  memory. 
After  all  the  hours  of  work, 
I  didn't  want  to  lose  anything, 
so  1  hitched  HERO  to  a  tape  re- 
corder, and  1  saved  this  pro- 
gram on  eight  tape  cassettes. 
Then,  late  Sunday  night,  I 
turned  HERO's  power  off.  As 


a  result,  he  forgot  eveiy thing  1  had  taught  him. 
This  was  okay,  1  thought,  since  I  had  copies  of 
the  program  on  the  eight  tapes. 

HERO  Sat  There 

On  Monday  morning,  right  before  HERO  made 
his  grand  entrance  into  the  classroom,  I  popped  a 
cassette  into  the  recorder  and  tried  to  load  the 
speech  program  back  into  his  onboard  memory. 

HERO  said  "RED-DY!"  to  signal  me  that  the 
program  was  finished  loading.  I  tried  to  run  the 
program,  but  HERO  just  sat  there.  I  looked  at  the 
locations  in  HERO's  memory  to  make  sure  the 
program  was  there. 

They  weren't  there!  I  was  horrified  to  learn 
that  the  front-end  of  the  program  had,  overnight, 
turned  into  computer  mush. 

I  tried  a  new  tape.  More  mush. 

Another  tape.  And  another.  And  another. 

All  eight  tapes  had  incomplete  copies  of  my 
program.  I  consulted  the  time  on  HERO's  clock. 
HERO  was  to  make  his  grand  entrance  in  just 
fifteen  minutes. 

Luckily  I  had  copied  down  all  my  commands 
on  a  scrap  of  paper.  I  found  the  paper  and  retyped 
the  missing  commands  into  HERO's  head. 

"RED-DY!"  HERO  said.  I  grinned.  This  time 
he  was  really  ready. 

I  picked  HERO  up  and  carried  him  to  the 
classroom  door.  I  peeked  into  the  room.  Everyone 
was  assembled.  The  director  of  the  course  was  on 
the  speaker's  platform  at  the  front  of  the  room. 

The  director  nodded  his  head.  It  was  time.  I 
pressed  HERO's  A  button,  his  DO  button,  and 
keyed  in  the  four-digit  starting  address  of  the 
program. 

HERO  took  off.  He  marched  into  the  class- 
room, spun  around  three  times,  and  waved  the 
WELCOME!!  sign  he  held  in  his  gripper  "hand." 

HERO  stopped  spinning.  "Attention,"  he 
said.  ("Attention,  please"  in  French.)  "Shekket." 
("Be  quiet"  in  Hebrew.) 

Everyone  was  amazed  that  an  American  robot 
could  talk  in  Frencli        and  Hebrew.  There  were 
gasps  of  surprise.     Y^L        The  room  quickly  grew 

silent. 
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"Welcome  to  the  ORT  Robotics  Literacy 
Course/'  HERO  said.  "I  am  HERO,  the  robot 
from  America.  I  hope  you  have  fun.  Ha!  Ha!  Ha! 
Bye,  bye." 

HERO  spun  around  once  more,  waved  his 
sign,  then  marched  toward  the  door.  The  audience 
began  clapping. 

But  HERO  was  not  destined  to  make  a  trium- 
phant exit  from  the  classroom.  In  fact,  he  never 
even  made  it  to  the  door.  On  his  way,  he  crashed 
headfirst  into  a  chair. 

Poor  HERO  didn't  know  he  hadn't  made  it 
through  the  door.  He  thought  he  was  out  in  the 
hallway.  His  "Master  of  Ceremonies"  program 
finished  executing.  "RED-DY!"  he  said. 

"Listen,"  said  one  of  the  instructors.  "The 
robot  knows  its  master's  name.  It's  saying 
'Freddie.'  " 

Everyone  began  laughing. 

I  picked  HERO  up.  1  felt  like  an  embarrassed 
parent.  "It  wasn't  his  fault,"  I  stammered.  "It 
was  my  programming...." 

I  lurched  out  of  the  room  with  HERO  in  my 
arms. 

"RED-DY!"  said  HERO. 

A  Briefcase  And 
A  Sewing  Machine 

I  brought  two  computers  from  the  United  States 
to  help  me  teach  the  Robotics  Literacy  course.  I 
had  a  briefcase-sized  Epson  HX-20  computer  with 
me  to  record  business  expenses  and  to  do  course 
and  calendar  planning  and  memos.  I  brought 
along  a  sewing  machine-sized  Compaq  computer 
to  write  up  my  course  lectures  and  to  create  several 
graphs,  figures,  tables,  and  small  data  bases  from 
the  research  material  I  had  gathered  for  the 
course. 

I  used  the  computers  to  create  lectures  on  the 
history  of  robots,  the  future  of  robots,  the  auto- 
mated factory,  artificial  intelligence,  the  Tasman 
Turtle,  the  HERO  robot,  robots  in  the  home,  exotic 
(outer  space,  undersea,  and  legged)  robots,  CAD/ 
CAM  (Computer-Aided  Design/Computer-Aided 
Manufacturing),  industrial  robots,  robot  anatomy, 
and  the  impact  of  robots  on  jobs,  work,  and 
people. 

I  also  brought  two  robots,  as  I  mentioned  - 
HERO  the  robot  and  the  Tasman  Turtle.  The  turtle 
ran  on  an  Apple  computer  loaned  to  me  by  Apple 
Computer/U.K. 

The  turtle,  HERO,  and  the  Compaq  computer 
had  to  be  converted  to  British  current  and  voltage 
(a  stepdown  from  220  volts  to  HO,  and  a  change 
in  the  current  from  60  to  50  Hz).  The  little  Epson 
computer  was  okay  since  it  ran  on  rechargeable 
batteries.  If  I'd  had  to  recharge  it,  I  would  have 
had  a  problem,  but  during  my  entire  three-week 
course,  the  batteries  never  ran  down. 

114    COMPUn!    October  1963 


There's  A  Robot  In  My  Bedroom 

I  was  the  only  full-time  guest  instructor  for  the 
course  so  I  was  always  extremely  busy.  Often  I 
would  teach  and  work  12  hours  a  day. 

I  had  to  work  constantly,  and  I  needed  my 
computers  and  robots  near  me  to  do  my  work.  It 
would  have  been  a  great  inconvenience  to  lug 
them  back  and  forth  from  ORT  to  a  hotel  room 
every  day.  But  I  would  need  them  during  the  day 
at  ORT  and  in  the  evening  back  at  the  hotel.  I  felt 
almost  like  a  bionic  man.  I  had  to  have  my  com- 
puters and  robots  around  me,  or  I  couldn't  func- 
tion. 

The  director  of  the  Robotics  Literacy  course 
came  up  with  a  solution:  I  could  live  and  work  at 
ORT  in  one  of  the  two  upstairs  suites,  down  the 
hall  from  the  course  classroom.  My  office  would 
be  my  bedroom,  and  vice  versa. 

Hey!  That's  great!  I  thought.  I'm  always 
talking  about  how  people  should  get  intimate 
with  their  computers  and  robots.  Now  here  was 
the  chance  for  me  to  see  how  intimate  my 
machines  and  I  could  get. 

I  was  looking  forward  to  this  arrangement.  I 
would  be  all  alone  at  night  in  the  ORT  building, 
but  my  robots  and  computers  would  keep  me 
company.  When  I  went  to  bed  at  night,  my  com- 
puters and  robots  would  surround  me  like  tiny 
sentinels.  In  the  morning  I  could  leap  out  of  bed, 
turn  on  the  computers  and  robots,  and  get  to  work 
immediately.  I  wouldn't  have  to  waste  time  on 
nonessentials  like  getting  dressed,  brushing  my 
teeth,  or  taking  a  shower.  (I  couldn't  take  a  shower 
anyway  since  the  ORT  shower  was  broken.) 

But  I  still  had  one  problem:  who  would  wake 
me  up  each  morning  at  dawn  so  I  could  get  right 
to  work?  I  didn't  have  a  travel  clock  with  me,  and 
I  couldn't  get  a  wake-up  call  from  the  hotel  desk. 
In  fact,  I  had  no  phone  at  all.  I  was  isolated  from 
the  world.  To  make  outgoing  calls  I  had  to  throw 
on  some  clothes  and  run  across  the  street  to  the 
Finchley  Road  tube  (subway)  station.  I  made  all 
my  business  and  personal  calls  at  the  station  in  a 
doorless  booth,  with  dozens  of  people  streaming 
by  and  trains  rumbling  by  underneath  sounding 
like  earthquakes. 

The  Robot  Alarm  Clock 

How  was  I  to  wake  up  each  morning  on  time? 

Then  I  remembered  that  HERO  had  a  built-in 
realtime  clock.  I  wrote  a  program  using  this  clock 
and  HERO'S  light  sensor.  The  light  sensor,  a 
photoelectrical  cell,  can  sense  up  to  256  levels  of 
luminance,  or  brightness.  I  made  a  stab  at  how 
bright  it  would  be  at  5:30  in  the  morning,  and  I 
created  a  little  wake-up  speech  for  HERO  to  launch 
into. 

That  night  I  turned  HERO  on,  plugged  him 
into  the  wall  current  so  his  battery  would  not  run 
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down  during  the  night,  and  started  his  "wake-up" 
program  running. 

I  tiptoed  toward  my  bed. 

Behind  me,  HERO  came  immediately  to  life 
and  startled  the  heck  out  of  me. 

"Good  morning,  Fred!"  he  said  cheerfully. 
"Time  to  wake  up!  Get  out  of  bed,  you  sleepyhead . 
It's  11  p.m." 

I  spun  around  angrily.  What  was  HERO  doing 
delivering  his  wake-up  message  at  eleven  o'clock 
at  night?  Was  he  crazy?  Was  my  program  full  of 
bugs? 

Then  I  realized  that  HERO  hadn't  mal- 
functioned and  that  my  program  was  working 
correctly.  I  had  erred  by  starting  the  program 
running  while  the  room  was  still  lit.  HERO  had 
mistaken  my  bedside  reading  light  for  the  early 
morning  sun. 

I  turned  out  the  bedside  lamp.  Phooey!  I 
thought.  If  I  want  to  read  in  bed,  I'll  have  to  do  it 
under  the  covers  with  a  flashlight. 

When  the  lamp  went  out,  the  room  became 
as  black  as  the  bottom  of  a  well  at  midnight.  I 
stumbled  my  way  past  two  computers  and  a  turtle 
robot  to  get  to  HERO  on  the  far  side  of  the  room. 
I  felt  the  keyboard  carefully  and  pressed  the  keys 
to  restart  HERO's  wake-up  program.  Then  I  made 
my  way  back  to  bed,  trying  carefully  not  to  step 
on  any  of  my  mechanical  friends  in  my  bare  feet. 
(Both  computers  were  on  the  floor,  along  with 
the  turtle.  I  like  programming  on  the  floor  where 
I  can  spread  out  my  work.) 

I  hopped  into  bed  and  fell  immediately  to 
sleep. 

"Good  morning,  Fred!"  HERO  called.  I  sat 
up,  shocked.  It  wasn't  morning.  The  room  was 
still  pitch  black. 

"Time  to  wake  up!  Get  out  of  bed,  you 
sleepyhead,"  HERO  continued.  'It's  11:45  p.m." 

What  set  him  off  this  time?  1  wondered.  Just 
then  a  car  went  by  on  the  street  beneath  my  win- 
dow. The  car  headlights  shone  into  my  room. 
Then  1  reaUzed  what  had  happened.  Headlights 
from  a  passing  car  had  triggered  HERO's  wake-up 
message.  I  had  to  decrease  his  sensitivity  to  light. 

I  was  beginning  to  get  slightly  paranoid  (from 
lack  of  sleep).  I  was  worried  that  HERO  would 
wake  me  up  if  a  tiny  firefly  flew  into  my  bedroom. 
This  kind  of  alarm  clock  I  could  do  without. 

I  finished  retuning  HERO's  program,  turned 
out  the  lights,  started  the  program  running,  and 
climbed  back  into  bed.  For  a  while  1  lay  in  bed 
gritting  my  teeth,  just  waiting  for  the  starlight  or 
some  distant  neon  sign  to  set  HERO  off  and  give 
me  that  infernal,  cheerful  "Good  Morning,  Fred." 
But  nothing  happened,  and  I  finally  fell  asleep. 

Only  A  Supernova 

The  next  morning  I  was  awakened  by  someone 
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hammering  on  my  door.  "Fred,  are  you  in  there? 
It's  Steve,  Are  we  going  to  breakfast,  or  not?" 

It  was  my  friend  Steve  Lubin. 

"What  time  is  it?"  I  asked. 

"Eight  thirty,"  Steve  replied.  "You  ought  to 
be  up  now." 

Eight  thirty!  1  had  overslept! 

I  looked  over  at  HERO.  He  hadn't  been  stolen. 
He  was  still  there,  looking  peaceful,  contented, 
and  robotic.  His  red  "power"  light  was  on.  I 
checked  his  display.  The  program  was  still 
working. 

Then  why  hadn't  he  awakened  me? 

As  1  pulled  on  my  pants,  slipped  into  a  shirt, 
and  tied  my  shoes,  it  came  to  me.  This  time 
HERO'S  light  sensor  was  set  too  low.  The  morning 
sun  was  not  enough.  HERO  probably  wouldn't 
wake  me  until  the  sun  went  supernova. 

1  finished  getting  dressed  and  went  out  to 
breakfast  with  Steve.  As  1  ate  a  mushy  egg  on  a 
bagel,  I  thought  about  my  experiment  to  turn  a 
robot  into  an  alarm  clock. 

My  experiment  hadn't  been  too  successful, 
but  I  resolved  to  keep  trving. 

The  next  night,  HERO  woke  me  up  at  1  a.m. 
(a  truck  headlight)  and  at  4:30  a.m.  (dawn  came 
sooner  than  I  realized). 

But  the  next  night  after  that,  I  finally  got  all 
the  bugs  out.  HERO  woke  me  up  at  5:19.  That 
was  close  enough  to  5:30. 1  was  satisfied.  My  robot 
alarm  clock  was  working. 

You  Can't  Tickle  A  Robot's  Back 

My  experiment  in  turning  a  robot  into  an  alarm 
clock  was  ultimately  a  success.  But  my  experiment 
in  robot  and  computer  intimacy  was  a  dismal 
failure. 

Each  night  after  my  human  colleagues  at 
ORT  abandoned  me  to  return  to  their  homes,  I 
became  desperately  lonely.  I  was  surrounded  by 
friendly  computers  and  robots,  but  I  was  still 


There  is  a  road. 


Man)  caiictT  patit'iits  lu-ud 
IransjXJrtatinn  to  and  from 
trc-atnieius.  Thais  why  Ihu* 
Anu'rican  Cancer  Society 
ha.s  (ormeil  groups  of  \t)lun- 
teer.s  across  the;  United 
States  wtio  give  a  few  hours 
of  their  time  each  month  to 
dri\ethem.Theroadto 
recovery  can  be  a  long  and 
difficult  one.  but  it  can  be 
that  much  easier  when 
there  are  friends  who  can 
help  along  the  way. 


3 !  .American  Cancer  Sicieiy 


This  Publication 
is  available  in 
Microform. 


University  Microfilms 
International 


Please  send  additional 

fnr 

information 

N:imp 

Ini,titiiri(in 

Sln^t^t 

ritv 

SvMf 

Zip 

300  North  Zeeb  Road 

Dept.  P.R. 

Ann  Arbor,  Mi.  48106 


This  space  contributed  as  a  public  service. 


INTEC 

RAM  BOARDS 

Lifetime  Warranty 
ATARI 

32K  400/800 59.95 

48K  400   84.95 

64K  400    109.95 

16K  Vic    20 69.95 

PRINTERS 

EPSON  FX  80 529.95 

EPSON  FX  100 729.95 

PROWRITER  8510  AP   .  .   369.95 
GEMINI   10  X 294.95 

INTERFACES 

Microbits  fViPP  1100  Atari 79.95 

Grappler  +  Apple 124.95 

Cardco  .  .  .  VfC     20 -'64'...  59.95 

MODEMS 

MRP  1000  AtaiT  Direct-Conned  W/Term. 

Software  {Na   850  needed) 159.95 

Hayes  Smart  fylodem  300  Baud  209.95 
Rana   1000  Drive 349.95 

Ordering  Information: 

Vft  accept  M/C,  VISA,  Money  Orders,  and  Cashiet 
Checks.  Soffv  No  CO.Dis. 
SHIPPING:  Add  3%  UPS  (S3.00  IVIininium). 
APO/FPO  5%  ($5.00  Minimum).  International 
Ordets  1 0%  (S10.00  H/liniitium),  Credit  Cards  add 
3%.  Calllornia  Residents  add  6%  Sales  Tax. 

MICRO 
MERCHANT 

898  Via  Lata  Suite  'H' 

PO.  Box  1516  C 

Cotton,  CA  92324 

ORDERS  ONLY 

800-652-8391 

Customer  Service 
714-824-5555 


lonely.  I  missed  my  wife  and  family,  and  I  craved 
human  companionship. 

At  first  I  tried  to  get  the  robots  to  simulate 
human  companionship.  I  programmed  the  turtle 
to  count  to  ten  and  say  things  like  "Stop  ...Go  ... 
Left ...  Right."  And  I  taught  HERO  to  say  things 
like  "That's  a  cute  pair  of  pajamas  you  have  on, 
Fred."  But  this  wasn't  the  same  as  giving  my  son 
a  piggyback  ride  to  bed,  or  tickling  my  daughter's 
back,  or  reading  the  Sunday  comics  with  my  wife. 
Machines,  even  intelligent,  friendly  machines, 
could  supplement  human  companionship,  but 
they  couldn't  replace  it.  At  least  not  in  my  life. 

Pub  Crawling,  Crystal  Balis,  And 
Croissants 

The  Robotics  Literacy  course  was  a  wild  success.  I 
learned  more  about  robots  than  1  had  ever  cared 
to  learn.  I  learned  about  pneumatics,  hydraulics, 
infrared  sensors,  flexible  manufacturing  systems, 
robot  vision  systems,  stepper  motors,  servo 
motors,  the  whole  bit. 

And  1  taught  my  students  aU  the  things  I 
knew.  I  told  them  about  the  giant  industrial  robots 
I  had  seen  in  Chicago,  and  the  advanced  thinking, 
feeling,  sensing  robots  I  had  met  at  the  Robotics 
Institute  at  Carnegie-Mellon  University,  in 
Pittsburgh.  On  the  last  day  of  the  course,  I  gave 
my  final  lecture.  I  gazed  into  the  crystal  ball  and 
talked  about  the  future  of  robot-human  relations. 
I  talked  about  what  sort  of  shape  robots  might 
take  in  the  future,  and  the  kind  of  impact  they 
might  have  on  our  lives. 

Then  my  wife  came  over  to  England,  and  I 
bailed  out  of  the  course.  I  had  spent  three  weeks 
of  almost  nonstop  work,  surrounded  by  machines, 
and  I'd  had  enough. 

Before  my  wife  arrived,  in  the  evenings  as  a 
substitute  for  human  companionship,  1  used  to 
feast  on  chocolate  eclairs  and  croissants  at  local 
partsseries  (bakeries),  then  do  a  tour  of  the  London 
bars  and  wash  away  my  sorrows  with  warm,  dark 
English  beer.  They  call  this  sort  of  behavior  "pub 
crawling,"  and  it's  a  very  apt  phrase.  By  the  end 
of  an  evening  of  videogames,  whipped  cream, 
and  beer,  I  would  totter  back  to  my  bedroom  office, 
crawl  into  my  bed,  and  dream  strange  dreams.  In 
one  dream,  for  example,  1  was  pursued  by  my 
robots.  HERO  was  chasing  me,  holding  a  buttery 
croissant  in  his  gripper,  and  the  turtle  raced  after 
me  with  a  mug  of  beer  sloshing  around  on  his 
dome. 

By  the  time  Janet  arrived  in  London,  I'd  had 
enough  beer,  enough  sweets,  and  enough  robots. 

Robot  In  A  Garbage  Bag 

But  there  was  still  one  remaining  chore.  I  had  to 
return  HERO  to  his  home  in  Gloucester  and  teach 
the  Zenith  people  in  Gloucester  some  of  the  robot's 
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finer  points. 

To  get  HERO  back  to  Gloucester,  Janet  and  I 
rented  a  little  Ford  Escort.  We  slipped  a  green 
garbage  bag  over  HERO's  head  (so  nobody  would 
recognize  him)  and  let  him  ride  in  the  back  seat 
with  a  seatbelt  around  his  waist. 

After  only  five  minutes  of  practice  to  get  used 
to  driving  on  the  right  side  of  the  car  and  on  the 
left  side  of  the  road,  we  merged  into  mad,  con- 
gested London  traffic,  and  we  were  off. 

Driving  60  miles  an  hour  on  the  left-hand 
side  of  the  road  was  scary.  The  trip  to  Gloucester 
left  Janet  and  me  shaken.  But  I  didn't  get  a  single 
complaint  from  HERO.  In  fact,  he  tolerated  my 
driving  beautifully.  1  banged  his  head  against  the 
car  roof  several  times.  And  I  jostled  him  against 
the  front  seat  and  bounced  him  off  the  back  seat. 
He  never  complained.  Instead,  all  I  ever  heard 
(from  underneath  the  garbage  bag)  was  an  occa- 
sional, muffled  "RED-DY." 

You  can  find  out  more  about  HERO  by  writing: 

Douglas  Bonham 

Heath  Company 

Benton  Harbor,  Michigan  49022 

(Or  call:  616/982-3200) 


On  the  road  with  Fred  D'lgnazio  and  his  friends  at  the  ORT 

Robotics  Literacy  Course  in  London,  England. 

HERO  the' robot  came  from  America.  The  Tasman  Turtle 
came  from  Australia. 
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BliACH  HliAD 


SPRITE  MASTER™  is  not  jiisi  .motlu-r 
spiilc  (.-dill  n.  It's  the  finest  ut  i  1  U>  a\ailal>le 
ft>t"nuiliicoloispiitcaiiiniaiii)njndg.inie 
projjranirninsi.  U  will  liave  vou  making 
lull  Loloi  animateti  objtvTs  in  jusi  niiniites. 
People  iimiilnt;  biids  flying  or  tanks 
roIlinsareasnapw'ilhSpriteniastei.  U\\  ill 
aiitoinatically  ap[icnd  xoiir  sprites  lo 
other  progiains.  Its  easy  to  use  and  under- 
stand and  comes  with  a  fii  II 2  Hvige  instnic- 
lion  manual  and  samples  ol  animatal 
sprites  to  uei  vou  staiieti.  (Siij^^esttxl  retail 
price...  S35.95) 


SPR1TEMASTER-.  NEUTRAL  ZONE "  AND  BEACH-HEAD " 

ARE  /W'AIL'XBLE  .M  \'OUR  UXIAL  COMMODORE  DEALER 
ON  EITHER  DISK  OR  TAPE. 


GENERAL  QUARTERS!  BATTLE 
STATIONS}  As  chief  commander  ol 
land  and  sea  forces  in  the  Pacific,  \oiir 
mission  is  to  ohiain  a  quick  naval 
vition,  Mul  iinatie  enemy  teniloiy 
with  land  lorcL-s.  BEACH-HEAD '  is 
a  KX)''o  niachine  language  game  and 
ofieis  muiii-scTcx-n  action  with  high 
resi>lution.tlireedimen.sionalgraphicsw 
(SuggtMtHi  retail  piice...  SM.'^^t 


;iiTisi 


it'V 


NELTRAL  ZONE  "  lakes  vou  to  the  outer 
L\lgi.-s  of  the  galaxy,  to  ALPHA  IV,  a  long 
range  eari\' warning  suilionwhoseniission 
is  to  deteci  alien  ininaieis  Irom  other 
galaxies. 

NEUTRAL  ZONE"  is  theultimatein  high 
resolution,  last  atiion.  aicade  quality- 
gatTies,  It  iswiitien  in  UX>;t>  machine  lan- 
guage and  features sniixnh stiollingol  the 
360  degree  [lanorama.  The  realism  is 
unlx-lievable.  (Suggested  retail  price... 
S34.9S) 


ACCESS  SOFTWARE  INC 

925  EAST  900  SOUTH.  SALT  L-\KE  CITY.  UTAH  84105 
TELEPHONE  (SOD  532-1 134 


'ConmuHlmv 64  is .i  iivisu-riil  ir.Klt.in.irk nf Ctimnimlon-  Busimv-i  Nt.iilrirKN  Iric 


You  can  find  out  more  about  the  Tasman 
Turtle  by  writing: 

Bill  Glass 
Tasman  Turtle 
260  Beacon  Street 
Somcn'ille,  MA  02143 
(Or  call:  617/492-0660) 

You  can  find  out  more  about  the  Robotics 
Literacy  Course  by  writing  me: 

Fred  D'lgiiazio 

2117  Carter  Road,  SW 

Raa)wkc,  VA  24015 

In  coming  months  "on  the  road,"  Fred  will 
tell  about: 

•  An  educator  who  uses  computer  magic  shows  to 
teach  children  about  computers. 

•  A  London  company  that  makes  innovative  edu- 
cational software  for  children. 

•  The  British  government's  effort  to  put  computers 
and  robots  in  all  primary  and  secondary  schools 
in  the  United  Kingdom. 

•  The  new  British  educational  robots  that  will  soon 
be  "invading"  our  country. 

•A  look  at  the  w^ay  computers,  robots,  and  other 
high-technology  subjects  are  integrated  into  the 
British  school  curriculum  as  "disciplines"  children 
can  learn  to  become  ktunolcdge  workers  of  the 
future.  © 


C-64  VIC20  ATARI 


CHILD 

DEVELOPMENT 

SERIES 

(for  the  3.5K  VIC  and 
16K  ATARI) 

ADD/SUB— S16.95 

Displays  single  or  multiple 

digits  with  or  w/o  pictures, 

borrows,  carries,  scoring, 

and  audio/video  feedback. 

NUMER-8ECi— S16.95 

Number  recognition,  object 

counting,  object  grouping, 

and  number/size/shape 

discrimination. 

ALPHA-BECi— S16.95 

Tweniy-six  screens  with  let- 
ters/pictures/labels 'built' 
on  the  screen 
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Dealer  Inquires  Invited 

BOSTON  EDUCATIONAL  COMPUTING,  INC. 

iZ"x=^  78  Dartmouth  Street,  Boston,  MA  02116     ■ 
!'"5C7'    (617)536-5116     •  MA  res.  add  5%  tax 


Look  whait  IVe 
got  for  you 


a  ^39^5  Light  Pen 

with  switch  for 

COMMODORE  VIC  20/64 
ATARI  400/800 
APPLE  II 

Now  you  can  make  your  computer  come 
alive  and  free  yourself  of  many  keyboard 
strokes. 

Touch  my  light  pen  to  your  TV  screen  and 
draw  or  paint  multicolored  pictures  or  pick 
from  a  menu.  It's  that  easy! 

My  LP-ID  low-cost  light  pen  is  activated 
by  a  pushbutton  switch. 

My  LP-15  high  resolution,  high-speed  light 
pen  is  supersensitive  and  can  control  the 
cursor  6  inches  from  the  screen.  It  also 
has  a  push  switch  to  activate  the  signal. 

LP-10...  $39.95     LP-15...  $119.95 

Interface  card  required  for  Apple  II  with 
LP-10  &  LP-15  .  .  .  $99.95 

AH  Light  Pens  are  sold  complete  with 
Demo  Cassettes  &  Instructions. 

A  wide  selection  of  software  is  available. 
30  day  money-back  guarantee 

FREE  Paint-N-Sketch  I 
Program  for  Atari 

Buy  any  of  my  Atari  Light  Pens  and  get 
this  new  program  on  disk  free. 
Paint-N-Sketch  I  will  help  you  develop 
your  computer  artistic  skills.  It's  the 
natural  way  to  draw  pictures  on  the 
screen,  in  colors  too.  You  and  your 
family  will  master  it  in  no  time  at  all. 
Paint-N-Sketch  I  is  a  regular  $29.95 
value.  Order  your  Light  Pen  now  and 
get  Paint-N-Sketch  I  free. 

Coming  soon-  Paint-N-Sketch  I  for  Commodore  64 


Order  Toll  Free  800-526-2514 

in  New  Jersey  (201)  227-7720 

TECH-SKETCH 


INC. 


Tech-Skeldi  Inc.  iis  a  subsidiary  ol  Ampower  Instnjnnent  Cofnpany,  Inc. 

26  Just  Road  •Fairfield,  N.J.  07006 

Dealers  and  Distributor  inquiries  invited.  Commotlore,  Atari,  Apple  are  Reg.  Tm's. 


Spelling  Quiz 


Edward  Perrtn 


Learning  to  spell  is  simplified  by  this  program.  It  lets 
you  create  locekly  lists  of  up  to  20  words  each,  save  the 
lists  to  tape  or  disk,  and  then  retrieve  the  lists  for  practice 
sessions.  For  Atari  and  VIC. 


"Spelling  Quiz"  allows  you  or  your  child  to  enter 
weekly  spelling  words  into  the  computer  and 
save  them  on  tape  or  disk.  All  the  words  for  an 
entire  year  can  be  saved  at  once  or  each  week  can 
be  saved  separately  as  the  school  year  progresses. 

The  program  allows  you  to  enter  up  to  20 
words  at  a  time.  Most  weekly  spelling  assignments 
are  no  more  than  20  words.  The  program  prompts 
are  self-explanatory,  but  it  would  be  helpful  to 
read  through  the  following  instructions. 

Load  in  the  program  with  the  BASIC  cartridge 
inserted.  The  loading  time  for  tape  is  about  four 
minutes. 

Type  in  RUN,  and  after  the  title  page  you 
will  be  asked  if  you  want  to  Create  or  Retrieve  a 
list  of  words  to  work  on.  You  will  also  be  asked  if 
you  are  using  a  Disk  or  Tape. 

Creating  Word  Lists 

To  create  a  list,  simply  type  in  up  to  20  words,  no 
more  than  20  letters  each  and  with  no  leading  or 
trailing  spaces,  one  at  a  time,  and  hit  the  RETURN 
key.  Be  sure  each  word  is  spelled  correctly  before 
hitting  RETURN.  If  you  enter  fewer  than  20  words, 
type  in  an  *  following  the  last  input.  After  the  last 
word  or  *  you  will  be  asked  to  type  in  some  sort 
of  identifier  for  that  particular  Hst.  Use  "Chapter 
4"  or  "List  189,"  for  example.  You  must  use  some 
type  of  identifier  that  your  child  will  understand. 
The  identifier  is  used  to  make  sure  your  child  has 
retrieved  the  correct  list. 

Disk  users  will  be  asked  to  enter  a  filename. 
Only  the  filename  is  necessary;  the  program  will 
supply  the  "Dl:".  Be  sure  to  make  the  name 


unique  and  meaningful. 

Tape  users  will  need  a  blank  tape  or  a  tape 
which  has  been  used  to  save  other  word  lists.  Be 
sure  to  note  the  tape  counter  number  on  a  sheet 
of  paper  and  store  the  paper  with  the  word  tape. 

If  you  already  have  words  stored,  just  follow 
the  prompts  to  LOAD  the  words. 

Check  the  list  and  the  identifier  to  be  sure 
that  this  is  the  list  you  wanted  to  use.  If  not,  you 
have  the  option  to  LOAD  a  new  list  or  create  a 
new  one  as  needed. 

Once  the  words  are  LOADed  in  with  the 
create  or  retrieve  option,  your  child  is  ready  to 
use  the  program.  You  now  have  the  option  to 
either  spell  a  Certain  number  of  words  correctly, 
spell  an  unlimited  number  of  words  correcdy,  or 
End. 

If  you  choose  the  C  option,  you  will  be  graded, 
and  the  program  will  terminate  when  the  number 
of  words  spelled  correctly  equals  the  number  you 
entered  at  the  prompt.  If  you  choose  the  unlimited 
option  (by  pressing  RETURN),  you  can  spell  only 
10,000  words  before  the  program  terminates.  It  is 
easy  to  change  the  10,000  to  another  upper  limit. 
Change  the  number  in  the  last  line  of  the  program 
to  stop  the  program  automatically  at  a  preset 
number. 

The  Quiz  Begins 

When  you  have  made  all  of  the  choices,  the  game 
is  ready  to  play.  The  screen  will  show  the  number 
of  the  word  being  scrambled,  the  score  (how  many 
words  you  have  spelled  correctly),  a  scrambled 
word,  and  the  attempt  number.  At  the  bottom  of 
the  screen  is  a  GRAPHICS  0  window  where  you 
will  type  your  answers.  The  word  number  on  top 
will  help  if  you  cannot  figure  out  the  word.  The 
program  is  supposed  to  check  spelling  competence 
rather  than  ability  to  unscramble  words,  so  there 
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is  no  penalty  for  not  unscrambling  correctly.  Use 
this  option  as  you  wish. 

Your  child  will  then  have  three  tries  to  spell 
the  word  correctly.  If  correct,  the  screen  will  re- 
spond with  an  encouraging  CORRECT  and  a 
happy  sound.  After  three  tries,  the  program  will 
give  the  correct  spelling  and  set  up  a  different 
screen  to  allow  the  child  to  practice  the  misspelled 
word. 

Practice  Screen 

The  practice  screen  will  not  allow  misspellings.  It 
does  allow  the  child  to  exit  when  he  or  she  wants 
to  by  pressing  the  *.  In  this  mode,  be  sure  to  press 
the  space  bar  after  each  word  and  not  the  RE- 
TURN. Pressing  RETURN  would  cause  the  com- 
puter to  register  an  error  in  the  spelling. 

After  the  number  of  correct  spellings  equals 
the  number  put  in  at  the  beginning,  or  if  your 
child  enters  *  instead  of  spelling  a  word  during 
the  main  run,  the  quiz  will  end  and  the  child  will 
be  graded  on  his  or  her  performance.  If  you  think 
the  grading  is  too  strict,  change  the  limits  in  the 
grading  subroutine  in  lines  9000-9400. 

After  the  grading,  the  player  can  go  back  and 
retrieve  or  create  and  save  a  new  file  or  use  the 
same  words  that  are  already  in  the  computer's 
memory.  He  or  she  also  has  the  option  to  end  at 
this  time.  If  the  player  continues,  the  whole  cycle 
repeats. 


Program  1:  spelling  Quiz  For  Atari 


Spelling  Quiz  For  The  VIC 

More  Sugiyomo,  Programming  Assistant 

In  Spelling  Quiz  for  the  VIC  (Program  2),  the 
words  can  be  only  14  letters  long;  however, 
you  are  still  allowed  a  maximum  of  20  words. 
Remember,  though,  that  memory  is  tight  in 
an  unexpanded  VIC,  so  too  many  long  words 
may  cause  an  out-of-memory  error.  The  per- 
centage calculated  at  the  end  of  the  quiz  re- 
flects only  the  last  20  questions,  not  all  of  the 
questions  asked  during  the  session. 

The  VIC  version  of  Spelling  Quiz  is  easily 
converted  to  other  computers;  however, 
certain  changes  must  be  made.  The  cursor 
control  characters  (that  is,  those  to  clear  the 
screen  or  to  change  the  cursor's  color)  must 
be  adapted  to  your  computer.  Three  different 
POKE  commands  are  used  in  this  program. 
The  first,  to  location  36879,  controls  the 
screen  and  border  colors.  The  second  POKE 
command,  using  location  214,  changes  the 
vertical  position  of  the  cursor.  The  last,  in- 
volving location  204,  turns  the  cursor  on  and 
off.  When  204  contains  a  zero,  the  cursor  is 
on;  otherwise,  the  cursor  is  off. 


2  REM 
10  DIM 

*  (2 

,  J* 

0) , 

DIM 

*  <2 
NDI 
ORD 
DIM 
0 

BOS 
GOS 
PRl 

TO 
RE 
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20 


30 

40 
54 
55 


A*  (20)  , B*  <20)  , C* (20)  , DS (20)  , E 
0) ,F*(20) ,E*<20) , H*<20) , I*(20) 
(20)  , K* (20)  ,L$ (20)  , M* (20)  , N*  (2 
0* (20) 

P*  (20)  ,  I3«  (20)  ,  R*  (20)  ,  S«  C20)  ,  T 
0) , Ut (20) , ARRAY ( 20 ) , Z « ( 20 ) , STA 
NBS  (20)  . ANS*  (  1 )  , WORD* (520)  ,  INW 
$ ( 128) 

WEL*(3B) ,DK*(15),ZZ*{1):TIME= 

UB  3000 
UB  13000 

NT  "HOW  MANY  WORDS  DO  YOU  WISH 

SPELL-C3  SPACESJCDRRECTLY  BEFO 

ENDING  THIS  DRILL?{3  SPACES:>Ba 


NTER     e     TO     ENf>     PROGRAM 


56  TRAP  56: INPUT  RIGHT: IF  RI6HT=0  TH 
EN  4000 

57  TRAP  OFF: SCDRE=0: fiTT=0 
5B  GOSUB  5200:TRAP  OFF 

59  W1=0: W2  =  0: W3  =  0: W4  =  0: W5  =  0: W6  =  0:  W7  = 
0:W8=0:W9=0;W10=0:W11=0:W12=0:W13 
=0:W14=0:W15=0:W16=0:W17=0:W18=0: 
W19=0: W20=0 

60  IF  SCORE=RIBHT  THEN  1000 
65  NUM=1 : W=INT (20*RND ( 1 ) +1 ) 

70  GOSUB  7000:  IF  A$="-!:20  SPACES>"  THE 
N  NUM=-1:GDSUB  7000:GOTO  65 

80  GRAPHICS  2:P0!<;e  70B,0:FOR  AR=i  TO 
20; ARRAY (AR) =-1 :NEXT  AR:PRINT  " 
<:bELL>  ";■' INPUT  't'     TO  END  QUIZ" 

90 


?     #6; "SCORE" ; " 
, 0: 7  #6; " tt " ; W ; 


1  10 

112 
1  15 
120 

125 

130 

135 
137 

140 

141 


142 


143 


144 
145 
147 

150 

1000 

1010 
1020 


•  ;  SC 

ON 

THE 


POSITION  11, 

ORE: POSITION 

YOUR  LIST" 
FOR  L=l  TO  20:IF  A*tL,L)=" 
N  L  =  L-1  : A*  =  A* ( 1 . L)  : GOTO  115 
NEXT  L:IF  L=21  THEN  L=20 
FDR  LTR=1  TO  L 

ARR=INT (L*RND (0) +1 > : IF  ARRAY(ARR 
)=1  THEN  120 
P=ARR-1 

POSITION  P,7:?  #6 ; A* ( LTR , LTR ) : AR 
RAY (ARR) =1 : NEXT  LTR:POKE  708,200 
TRY  =  0 

TRY  =  TRY+1  :  ATT  =  ATT-f-l  :  POSITION  0,9 
:7  #6; "ATTEMPT  #  " ; ATT 
INPUT  Z*:IF  Z*="*"  THEN  ATT=ATT- 
1 s NUM=-1 : GOSUB  7000:6OTO  1000 
IF  Z«=A*  THEN  SCaRE=SCORE+l : FOR 
N=100  TO  10  STEP  ~1:S0UND  0,N,10 
,10:NEXT  N:S0UND  0,0,0,0 
IF  Z«=A*  THEN  POSITION  12,6:?  #6 
;  "  iiiUjiiigtB"  :  FDR  N=l  TO  300;  NEXT 
N: GOTO  60 

IF  TRY=3  THEN  FOR  N=l  TO  100:SOU 
ND  0,20,4, 10:NEXT  N:SOUND  0,0,0, 
0: GOTO  2000 
POSITION  0,2:7  #6;  "  JgEirm— "  ;  P  0  S 

FDR  N=l  TO  100:SOUND  0,11,4,10:N 
EXT  NiSOUND  0,0,0,0 

POSITION  0,2:?  «6;"<:a  SPACESJ":P 
OSITIDN  0,3:?  #6;"C11  SPACES> " 
GOTO  137 

GRAPHICS  18:PRINT  #6;"    your  sc 

ore  i  E^  "  ;  SCORE 

PRINT  *6:PRINT  #6; "time  to  quit 
■f  or  now  " 

?  #6:?  #6:7  #h;"iZ     SPACESDCONGR 
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SOFTWARE  MOVIES 
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MAXIMUS,  Inc.  is  excited  to  present  two  new  educa- 
tional software  movies  for  kids  of  all  ages  .  .  .  and 
more  are  on  the  way! 

STORYLINE™  makes  bedtime,  or  anytime,  a  warpi 
and  friendly  funtime.  Clover  the  Clown  is  your 
tourguide  for  two  fairytales:  The  Ugly  Duckling  and 
Rumpelstiltskin.  Through  computer  magic  you 
become  a  part  of  each  story! 

SAFETYLINE^"  combines  fun  with  important  lessons 
about  safety.  Max  the  Cat  shows  you  how  to  cross  the 
street  safely  going  to  school  and  what  to  do  when  lost 
at  the  zoo. 


Both  software  movies  have  interactive  games  that 
reinforce  the  fun  and  learning.  Both  have  real  human 
voices;  you  don't  need  a  voice  synthesizer! 

Features  of  the  software  include: 

•  Sophisticated  Face  Animation 

•  Lip-Synchronized  Voices 

•  Original  Musical  Scores 

•  Superior  Full-Color  Graphics 

•  Optional  Joystick  Control 

•  Machine  Language  Programs 

Relax  and  enjoy  yourself.  Let  Max,  Clover,  and  their 
colorful  friends  guide  you  through  a  new  world  of  fun 
and  learning.  You'll  be  amazed  at  how  real  they  are! 


STORYLINE™  and  SAFETYLINE  are  currently  available  for  any  Atari  computer 
with  48K.  Each  software  movie  comes  in  either  CASSETTE  ONLY  ($29.95)  or 
CASSETTE/DISK  (S34.95)  versions.  Order  by  mail  or  phone.  Visa  and  Mastercard 
"^  welcome.  Include  S2.50  postage  and  handling;  Virginia  residents  add  4%  sales  tax. 

Dealer  inquiries  invited.  Write  for  our  free  catalog.  MAXIMUS,  Inc.,  6723  Whittier 
Avenue,  McLean,  Virginia  22101. 


ORDER  TOLL-FREE  1-800-368-2152 
MAXIMUS  ...Where  Excellence  is  the  Standard 

©  MAXIMUS.  Inc.  1983.  Atari  is  a  registered  trademark  ot  Atari,  Inc.  Commodore  64  is  a  registered  tfademerk  ot  Commodore  Business  Machines,  lt>e. 


>^v'^;»3::^S^^SS;?:^;«Sgl 


I  c  rli;ajff>^>*,ii  sv  «iSt:'»**'f,'i*<'i.  .■.->i«i«*j,i*i«»  *!«:_  A~^a:j 


ATULATIDNS 
1.030     ?    #6;  "E 

6: ?    #6; " 


OUrz     HXI.i-     REPERT  ! 


1040  GDSUB  5000:SOUND  0 , 0 , 0, 0 : SOUND 

1,0,0,0:BOTO  9000 
2000     POSITION  0,5:?  #6 ;  A* : POS I T I  ON  0 

,4:7  #6;  "E3IE33^"  :  NUM  =  -1  :  GOSUB 

7000 
2010  FDR  N=l  TD  1000 
2020  NEXT  IM:GOSUB  B000 
2030  GOTO  60 


3000  GRAPHICS  ia:P0SITION  0,4 

i3   s PACES TaaMHMZn?     rnnf»: 


?  #  6  ;  ■■ 
SOUND 
?  #6;  " 


3005  GOSUB  5000:SOUND  1,0,0,0 

0, 0, 0, 0: RETURN 
4000  GRAPHICS  ISiPQSITION  0,2 

VERY  GOOD  WORK.  .  .  " 
4010  POSITION  0,6:?  #6; "see  you  agai 

n  later" 
4020  POSITION  4,10:?  86; 


4030  GQ3UB  5000: GOTO  7030 

5000  FDR  N=l  TD  200 

5010  SOUND  0, RND (0)  *200,  10,  2 

5030  NEXT  N 

5040  RETURN 

5  100  FDR  N=l  TD  100: SOUND  0,N,10.10: 
NEXT  N:SaUND  0 , 0 , 0 , 0 : RETURN 

5200  FDR  N=255  TO  200  STEP  -1: SOUND 
0, N, 10, 10: NEXT  N:FDR  N=225  TO  1 
50  STEP  -i:SQUND  0 . N ,  1  0 ,  1 0 : NE X T 
N 

5210  FOR  N=175  TO  100  STEP  -1:S0UND 
0, N, 10, 10: NEXT  N:FDR  N=150  TO  5 
0  STEP  -l:SOUND  0 , N , 1 0 , 1 0 : NE XT 
N:30UND  0 , 0 , 0 , 0 : RETURN ' 

7000  IF  W=l  THEN  B*  =  WORD* (  1  , 20 )  : A*  =  B 
*:Wl=Wl+NUt1 

7001  IF  W=2  THEN  C*=WaRDS ( 2 1 , 40 ) : A*= 
C*: W2=W2+NUM 

7002  IF  W=3  THEN  D«=WDRD* ( 4 1 , 60 ) : A*= 
D*:W3=W3+NUM 

7003  IF  W=4  THEN  E«=WaRD* ( 6 1 , 80 ) : A*= 
E«: W4=W4+NUM 

7004  IF  W=5  THEN  F«  =  WQRD*  ( 8 1  ,  1 00 )  :  A* 
=F*: W5=WS+NUM 

7005  IF  W  =  6  THEN  G*  =  WORDS  (  1 0 1  ,  1 2 1  >  :  A 
*=B«: W6=W6+NUM 

7006  IF  W  =  7  THEN  H4  =  W0RD*  (  1  2 1 ,  1 40 )  : A 
*=H*: W7=W7+NUM 

7007  IF  W  =  8  THEN  I  t  =  WORD* (  1 4 1  ,  1 60 )  :  A 
*=I$: W8=W8+NUM 

7008  IF  W=9  THEN  J *=WORD* ( 1 6 1 , 1 80 ) : A 
*  =  J*:  WS'  =  W"?  +  NUM 

7009  IF  W=10  THEN  Kt=WORD* < 1 81 , 200 ) : 
A*=K*:W10=W10+NUM 

7010  IF  W=ll  THEN  Lt=WORD* <201 , 220) : 
At=L*:Wll=Wll+NUM 

7011  IF  W=12  THEN  M«=WORD* ( 22 1 , 240 > : 
A$=M*: W12=W12+NUM 

7012  IF  W=13  THEN  N*=WORD* ( 24 1 , 260 ) : 
A4=N4 : W13=W13+NUM 

7013  IF  W=14  THEN  Dt =WORD* < 26 1 , 280 > : 
A$=0*:W14=W14+NUM 

7014  IF  W=1S  THEN  P*=WDRD5 ( 28 1 , 300 ) : 
A*=P$: W15=W15+NUM 

7015  IF  W=16  THEN  QS=WORD* ( 30 1 , 320 ) : 
A«=D*:W16=W16+NUM 

7016  IF  W=17  THEN  R*=WORD* < 32 1 , 340 ) : 
A«=R$: Wl 7=W1 7+NUM 

7017  IF  W=18  THEN  5*=W0RD« < 34 1 , 360 ) : 
A*=S*:WlS=Wia+NUM 

i:?4     COMPUTE!     October  1963 


7018 

7019 

7020 
7030 
B000 

8005 

8007 

8010 

3100 
3150 
8200 
8300 
8350 
8355 

8360 

8370 
8400 

84  5  0 
8500 
8600 
9000 


IF  W=19  THEN  T»=WORD* (361 , 330) : 

A«=T4: W19=W19+NUM 

IF  W=20  THEN  U«=WaRD* < 381 , 400 ) : 

A*  =  U*:  W2  0  =  W20  +  NUri 

RETURN 

END 

GRAPHICS  ia:PDKE  708,100;?  #6;" 

l-H-l-T^-'^^JJJJliJ.TJff.lj;"  :  POS  I  T  I  ON 

0,1:?  #6; A* 

POSITION  0,2:?  #  6  ;  "  EmiMJHafc  p  a  c 

ebar. . . " 

POSITION  0,3;?  #6:   "  [TT7¥inr».^  ^  rj  d  ^  - 


?  #t>;  "  or     type  «  to 

CDUNTER=0 

K:  " 


="«"  THEN  GOTO  60 
="   "  THEN  L=0:6DSU 

<>A$<L,L)   THEN  GOS 

8000 
THEN  L=0 

ER+1:PRINT  #6;CHR* 
40000 
9  THEN  GOTO  60 


POSITION  0,4: 
ret  urn " : L  =  0 ; 
OPEN  #1,4.0, " 
L  =  L+I 

GET  #1,CHAR 
CLOSE  #1 
IF  CHRt(CHAR) 
IF  CHR«(CHAR) 
B  8400 

IF  CHRSCCHAR) 
UB  12000:GOTQ 
IF  L=LEN(A*> 
C0UNTER=COUNT 
(CHAR) ; : TRAP 
IF  CDUNTER>13 
GOTO  8100 
RETURN 

POKE  752, 1 :PR 
T  OF  HOW  MANY 
AS  SPELLED  CD 


INT  "HERE  IS  A  LIS 

TIMES  EACH  WORD  W 

RRECTLY  THIS  TIME. 


9010 
9050 
9100 

9150 


9200 
9250 


9260 


9270 


9230 

9300 
9310 


9320 


9  3  30 


9340 


NUM=0:FOR  W= 1  TD  20:GDSUB  7000: 

NEXT  M 

FOR  N=100  TO  240:SDUND  0,N,10,1 

0:NEXT  N:SOUND  0,0,0,0 

?  Wl;"   ";B*:?  W2;"   ";C*:?  W3;" 

";D*:?  W4;"   "lE*:?  WS;"   ";F*:? 

W6; "   ";G*:?  W7;"  ";H*:?  W8;"  "; 

I*:?  W9; "  ";JS:?  W10;"  " ; K* 

?  Wll;"   ";L*:?  W12;"";M«:?  W13 

;"   "sN*:?  W14;"   ";04:?  W15;"   "; 

P«:?  W16;"   ";Q*:?  W17;"  ";R*:? 

W18;  "   "  ;  St:  -^  W19;  "   "  ;  T* 

7  W20; "   " ; U* 

POKE     752, 1 : POSITION     25,3:PRINT 

"taaaMSEIB"  :  POSITION     20,  5:  print 

AiT:FOR     N=l      TO     200:SOUND     0,255, 

10, 3: NEXT     N 

POSITION     25,  7:  PR  I  NT      "  [i?i]  :]:!:<•■*  t"  :  P 

OSITION  28,9:PRINT  SCOREiFOR  N= 

1  TD  200:SOUND  0 , 200 , 1 0 , 8 : NE X T 

N 

TRAP  9400: PER=INT ( (SCORE/ATT) # 1 

00):POSITION     25,11:PRINT     "l-Jalrlria 

□u"  :  POSITION  28,  13:  PRINT  PER;  "7. 

FOR  N=l  TO  200:SOUND  0,100,10,6 

:NEXT  N 

POSITION  25,15:?  "M:T:T>TJ1" 

IF  PER>=95  THEN  POSITION  27,17: 

?  "■!■":  PD5I  TIDN  25,21:?  "  \33SMM 

IF  PER>  =  88  Ai'JD  PER<95  THEN  POSI 
TION  27,17:?  "  BjM"  : POS I T I  ON  25, 

21:?  "  L>i=*:vmri,inTimMi" 

IF  PER>  =  78  AND  PEROS  THEN  POSI 
TION  27,17:?  "  K^l"  :  POS I T I  ON  25, 
21:?  "  K'T-Mllll" 
IF  PER>=70  AND  PER<7B  THEN  POSI 


i^^  t, 


<-/ 


4 

^:'-v^; 

\* 


\ 


SLIP  INTO 

SOIVIETHING 

RBO-CHARGED 

like  the  road-scorching 

speedster  In  RALLY  SPEEDWAY 

—  the  game  that  turns  your 

ATARI  into  a  full-blown,  four- 

-     '  wheeled  demon!  Take  on  our 

demanding  course,  or  use  the 

unique  Construct-A-Track  option  to 

design  your  own.  Push  yourself  to  the 

limit  for  a  better  lap  time,  or  get  a 

friend  in  on  the  action  for  a  one-on-one 

duel  to  the  finish  line  —  it's  vour  choice! 


li  your  deafer  doftsnt  have  Rally  Speedvft'ay  In 
siocK.  pnone  1-800323-7172  with  your  Oraer.  or 
vyj!t6''u9  at  Adveritu'e  Iniernalional,  P.O.  Bo»-  343S- 
Bongv^God  FL  32750  for  your  FREE  caialoq. 

r     DEALER  ORDERS  WELCOME 


y^^i^       f  N  t  f  H  N  A  r  I  O  N  A  Ly^ 


OF  SCOTT  AOAMS.  IMi 


TION  .27,  17:  ? 
21  ;  ? 


POSITION  25, 


9350     IF     PER<70     THEN     POSITION     27,17:?       10520 
"B:^"  :  POSITION     25,21:?     "fe*iUtVJ| 

10525 
10530 


10540 
1  1000 


1  1005 


11010 


9360  SOUND  0,0.0,0:POKE  752.0:6OTO  5 

4 
9400  PER=0:PDSITION  -28, 13: PRINT  PER: 

POSITION  25,11:PRINT  "[33331111": 

GOTO  9280 
10000  WEL$="i?M^»J[.]:i^i.^^il.M;[i1;]«.'^iT  J 

■^■j=imminrmtuk*'^"  :  pr t nt  "cclear:-" 

:FaR  N=l  TO  37jPRINT  WEL*(N,N) 
;:NEXT     N : T I ME=T I ME+ 1 

10010  DFF=40000: P=0: 7  :?  "DO  YOU  WAN 
T  TO  S^EATE  OR  [RETRIEVE  THE  FI 
LE"  ; 

10011  O*="<:20     SPACES:":FaR     N=  1      TO     520 

STEP  20: WORD* (N, N+1 9) =0*: NEXT 

N  11020 

10012  ?  :?  :?  "ONCE  YOU  CREATE  A  FIL  11025 
E  IT  WILL  BEiS  SPACES} STORED  0  11030 
N  TAPE  OR  DISK  SO  YOU  CAN  11035 
t5  SPACESMNPUT  THE  WORDS  FROM  11040 

11045 

10013  ?  "THE  TAPE  OR  DISK  INSTEAD  OF   11060 

TYPINGf3  SPACES}THE  SAME  WOR 
DS  IN  EVERY  T I  HE  YOU  PLAY."      11067 

10014  ?  :?  :?  "TYPE  IN  E  OR  E  AND  HI  11068 
T  l:l^ilJ:]:  NOWf  " 

10015  TRAP  10014; INPUT  ANS* 
10017  TRAP  10017:?  "ARE  YOU  USING  DA 

PE  OR  EI SK":  INPUT  22«:IF  ZZ«(1 
,1)<>"T"  AND  ZZ*(1,1)<>"D"  THE 
N  10017 

10020  IF  ANS«<>"C"  THEN  60T0  11000 

10100  -"  "TYPE  IN  WORDS  N0W":N=1 

10105  ?  :?  : 


F1LENAME<:7  SPACES:  (  W  I  THOUT  'D: 
' )   OF  THE  FILE  TO  " ; 
IF  ANS*="R"  THEN  PRINT  "LOAD": 
GOTO  10530 
PRINT  "CREATE" 

TRAP  10500: INPUT  DK* : DK* < 4 ) =DK 
*: DK*  (  1  , 3 )  =  "D1 :  " 
RETURN 

IF  ZZ*="D"  THEN  GOSUB  10500: N= 
1:TRAP  40000:OPEN  #2,4,0,DK*:G 
QTO  11025 

?  "TO  LOAD  WORDS  THAT  ARE  STOR 
ED  ON  TAPE  BE  SURE  TO  POSITION 
THE  TAPE  AT  THEC3  SPACES>CDRR 
ECT  COUNTER  «  YOU  NEED." 
?  "WHEN  BUZZER  BOUNDS,  PRESS  E 
l^*IJ-i;  AND  WAIT  FOR  THE  WORDS 
TO  BE  LOADED  INTO   THE  COMPUTE 

r\  >  .  ■ 

N=1:0PEN  #2,4,0,"C:" 

FOR  X=l  TO  4 

TRAP  11040: INPUT  #2,INW0RD* 

WORD*  <N, N+1 19) =INWORD«: N  =  N+120 

NEXT  X 

CLOSE  *2 

FOR  N=l  TO  400  STEP  20:PRINT  I 

NT  (N/20)  +1;"   "  ; WORD*  (N, N+19) 

NEXT  N 

PRINT  " i9     SPACES^" 

20) 


; WORD*  <401 , 4 


11070  ? 


1  1  075 
1  1080 
12000 


BE  3URE:  ERCH  WORD  IS 


PEI_l_EI>  CORRECTLY  BEFORE  VOU 


[lS^^ETURN<14    aCEHiaJ" 
10110     FOR     N=l     TO     400     STEP     20:  INPUT     I 

NWORD* 
10120  IF  N>399  THEN  WORD* ( 40 1 , 520 ) = " 

":GOTO  10200 
10125  IF  INWORD*="«"  THEN  WORD*(N,52 

0)="  ":GOTO  10150 
10130  WORD* (N, N+19> =INWORD* 
10140  NEXT  N 
10150  ?  "TYPE  IN  CHAPTER  tt  OR  LIST  # 

ETC.  .  .  " 
10160  INPUT   INWORD* : WORD* <401 , 420) =1 

NWORD* 
10200  FOR  N=l  TO  420  STEP  20:PRINT  W 

ORD* (N, N+1 9) : NEXT  N 

10202  IF  ZZ*="D"  THEN  GOSUB  10500:TR 
ftp  40000: OPEN  #2, 8, 0, DK*: GOTO 
10209 

10203  ?  "POSITION  THE  TAPE  AND  TAKE 
NOTE  OF C4  SPACES:THE  COUNTER  N 
UMBER.":?  :?  "PRESS  THE  PLAY  A 
ND  RECORD  BUTTONS." 

10204  7  :?  "WHEN  THE  BUZZER  SOUNDS, 

PRESS  i-r^j-jii-Tr" 

10205  N=l 

10206  TRAP  10207:LPRINT 

10207  OPEN  #2,8,0, "C:" 

10209  N=1:FDR  X=l  TO  4 

10210  PRINT  #2; WORD* (N, N+1 19) : N=N+12 
0 

10220  NEXT  XsCLQSE  #2 

10300  GOTO  13000 

10500  PRINT  "YOU  MUST  NOW  ENTER  THE 

126     COMPUTEI     October  1983 


12005 

12010 

12020 

12030 
12040 
12050 

13000 
13005 


13010 
1301  1 


13012 


13013 


13014 

13015 
13016 


X5      THIS      THE     GROUP     OF     HORDS 


■  PRCESIIMnHTED     CY^NI 


";: INPUT  ANS«:IF  ANS*="N"  THEN 

GOTO  10000 
GOTO  13019 
END 

FOR  N=i  TO  100:SOUND  0,20,4,10 
:NEXT  N:SDUND  0,0,0,0 

GRAPHICS     18:7     #6;  "  gT7TI»d<I.TJ:-    "; 
CHR*(CHAR);"     fcj  IT  K-*i  r-=M  " 
POSITION     0,1:7     #6 ; " wr on g . . . TR Y 

AGAIN" 
POSITION  4,3:7  tt6;"THE  WORD  IS 


PDSI 
PDSI 
L  =  0: 
RN 
WEL* 

NT  W 
TRAP 
C  KE 
A  =  0 
PRIN 
?  :  7 
USE 

IN 
TTO 
?  :  ? 
1ST 
LD  L 
0  EN 
?  :  ? 

THE 
RD6R 
SSIO 
INPU 
TO  1 
IF  A 
IF  T 


TION  0,4:?  #6; A* 

TION  6,5:7  4*6  ;"  READ  Y?7?  " 

FOR  N=l  TO  400:NEXT  N:RETU 


=  "[IIlE3Kl 

:FOR     N= 
EL* (N, N) ; : NEXT 

130 10:7  ;?  "HI 
Y  WHEN  READY" ; : 
THEN  END 
T  "  tCLEARXBELL 

: ?  : ?  ;?  "DO  Y 
THE  LIST  OF  WDR 
THE  COMPUTER  OR 
LOAD  IN  A  NEW  L 

:?  "TYPE  IN  C 

OR  HIT  (aamscTo 

1ST.":?  :?  :?  " 
D" 

:?  "OF  COURSE. 

FIRST  TIME   TH 
AM  DURING  THIS< 
N  YOU  MUST  HIT 
T  ANS*: IF  ANS*= 
0000 

NS*="E"  THEN  GO 
IME=0  THEN  ?  "i 


OU  MUST  MRKE  R  BIG 


1     TO     35: PR I 
N: NUM=1 
T     THE     HaEE 
INPUT     A: IF 

J " : TRAP  OFF 
DU  WANT  TO 
DS   ALREADY 

DO  YOU  WAN 
1ST" 
FDR  A  NEW  L 

USE   THE  0 
TYPE  IN  [=  T 

IF  THIS  IS 
ROUGH  THE  P 
7  SPACESJSE 
C!  !  !  " 
"N"  THEN  GO 

TO  4000 

3  BELL>":BO 


TO     13018 

135 

13017 

60T0     13019 

13018 

?     :?     :?     "THIS     IS     YOUR     f^JrI=liMi*i 

140 

rSTa    THROUGH     THEt3     SPACES  J  PROBRA 

145 

M.      YOU     MUST     LOAD     IN     OR     CREATE 

A     NEW     LIST     NOW!":eOTO     13011 

150 

13019 

PRINT     "-CCLEARJ" 

155 

13020 

?     :?     :?     "IF     YOU     WANT     TO     PRACTI 
CE     FOR     A     CERTAIN     NUMBER    OF     TIM 

ES    TYPE     IN     E    AND     HIT 

160 

{:5    SPACES}  (il^iirrlT.  " 

13025 

?     :?     :?     "IF     YOU    WANT     TO     PRACTI 

CE     UNTIL     YOU     GET     TIRED     JUST     HI 

165 

T     1:1=4*11:1;  -  " 

170 

13030 

?     :?     :?     "IF     YOU    WANT     TO    QUIT, 
TYPE     IN    [=.  " 

175 

13050 

INPUT     ANS*:IF     ANS*="C"     THEN     GO 

TO     55 

180 

13060 

IF     ANS«="E"     THEN     GOTO     4000 

13070 

RI6HT=10000: GOTO     57 

Program  2: 

185 

spelling  Quiz  For  VIC  (Microsoft  BASIC) 

190 

5    REM 

SPELLING    QUIZ 

195 

10    DIMA%(14),W%(20),W$(20):TT=0 

15    P0KE36879,93;PRINT"{CLR}{2    D0WN)|RED1 

200 

{4  spaces) SPELLING  QUIZ [2  D0WN}":G0T03 
15 

print"{clr} {2  downIhow  many  words  do  y 
ou  wish  to  spell" : print "correctly  befo 

RE" 

PRINT "ENDING?" : PRINT" [DOWN] [WHT} RETURN 

IrEDI  to  end?  ";:GOSUE380 

RI=VAL(IN$) :IFIN$=""THEN120 

SC=0 : AT=0 : FORI=1TO20 : W% ( I ) =0 : NEXT 

IFSC=RITHEN110 

W=INT{20*RND{1)+1) :A$=W?(W) :IFA5=""THE 

N45 

FORAR=1TO14:A%CAR)=0:NEXT:PRINT"[CLR} 

{4  DOWN} UNSCRAMBLE: {BLU} " :L=LEN(A? ) : FO 

RLT^ITOL 

AR=INTCL*RND(1)+1) :IFA%(AR)THEN55 

PRINTMID$(A$,AR,1); : Al (AR)=1 : NEXT:TR=0 

POKE214 , 20 : PRINT : PRINT" I  RED] PRESS 

[WHT] RETURN [RED}  TO  END" 

PRINT " { HOME } CORRECT [ WHT } " SCTAB (13)" 

[ red} WORD [WHT }"W 

TR=TR+1:PRINT"ATTEMPT"AT+1" [4  DOWN}" 

POKE214,3+TR*3:PRINT:PRINT" [DOWN] [WHTJ 

TRY#"TR: PRINT" [RED]?  "; :GOSUB380 : IFIN$ 

=""THEN110 

AT=AT+1 : IFIN?  <  >ASTHEN95 
90  CR$=LEFT$("R"+CR$,20) : PRINT" [ DOWN] CORR 

ECT! " :FORN=1TO500:NEXT:W%(W)=W%CW)+1 :S 

C=SC+1 :GOTO40 
95  IFTR=3THEK115 
100  CR$=LEFT?("W"+CR?,20) 

PRINT" [DOWN] WRONG,  TRY  AGAIN. [UP] ": FO 
RN=1TO700:NEXT: PRINT" [17  SPACES]' 
070 

PRINT"[CLR![2  DOWN] [2  SPACES] YOUR 
RE  IS(WHT}"SC:PRINTSPC(6) "[red] 
[2  D0WN}WELL  DONE" :GOSUB370:GOTO155 
PRINT "[down) ANSWER [WHT]  " : PRINTA? :FOR 
N=1TO1000:NEXT:GOTO125 
PRINT" {CLR}[ DOWN] GOOD  WORK":END 
PRINT" [CLR] [DOWN] [red} TRY  TYPING  THE 
[ SPACE } WORD  i WHT ] " : PRINTA$ : PRINT " [ RED ] 
[D0WN}PRESS  [WHT] RETURN [red]  TO  END": 
L=l 
130  PRINT"  [LEFT)"; :POKE204,0 


20 


25 

30 

35 
40 
45 

50 


55 
60 
65 

70 

75 
80 


85 


105 


110 


115 

120 
125 


;GOT 


SCO 


205 


210 
215 


220 
225 
230 
235 
240 

245 

250 

255 

260 
265 

270 

275 

280 

285 

290 

295 
300 


305 

310 


GETC$ : IFC$=CHR? ( 13 ) THENPOKE204 , 1 : GOTO 

40 

IFC$<>MID${A$,L,1)THEN13  5 

POKE204,1:IFL=LEN{A$)THENL=0:C$=C$+" 

[SPACE] " 

L=L+1 : PRINTC? ; : GOTOl 30 

PRINT" [CLR] [down] HERE  IS  A  LIST  OF  HO 

W  MANY  TIMES  EACH  WORD [2  SPACES] WAS  S 

PELLED  CORRECTLY:" 

FORI=1TO20 : PRINT " [ WHT } " I " [ RED ) [ LEFT ] " 

W%CI)W${I) :IFI=9THENGOSUB370: PRINT" 

[CLR] [down]" 

IFI<20ANDW$ ( I+l }=" "THENI=21 

NEXT:GOSUB370 

PRINT" [ CLR } { DOWN } ATTEMPTS [ WHT } " AT : PRl 

NT " { RED } [ DOWN }  CORRECT [ WHT } " SC : L=LEN ( 

CR$ ) : IFL=0THEN3 1 5 

C=0:FORI=1TOL:C=C-CMID$(CR$,I,1)="R") 

: NEXT :PE=INTCC/L* 100) : PRINT "[RED] 

[down]  percent! WHT }"pe"( left} %" 

CR$=" " : F0RG=1T05 : READDA, G? , C? : IFPE<DA 

THENNEXT 

DATA90 , A, EXCELLENT , 80 , B , VERY  GOOD, 70 , 

C,GOOD,60,D,HMMM, ,F, STUDY 

RESTORE: PRINT" [RED] E DOWN] GRADE [ WHT) 

[RVS]  "G?"  {0FF)[RED)"C$"l":G0T0315 

TT=1:P=0: PRINT "[CLR] [3  DOWN }[ PUR } PRES 

S: [DOWN]";PRINT"[WHT}c[RED)  TO  CREATE 

[ DOWN } " ; PRINT " [ PUR] 0R[ DOWN ) 

PRINT" [ WHT ]R[ RED)  TO  RETRIEVE  A  FILE 

[ DOWN ) " : FORI =1 TO20 : W? { I ) = " " : NEXT : GOSU 

B375 

IFAN5<>"C"THEN280 

PRINT "[CLR) [DOWN] ENTER  UP  TO  20  WORDS 

[2  SPACES] ONE  BY  ONE  AND  PRESS 

[2  SPACES) [WHT) RETURN [red}" 

PRINT" [DOWN] LIMIT  EACH  WORD  TO  14  LET 

TERS. 

PRINT" [DOWN] PRESS  [ WHT] RETURN [ RED }  WH 

EN  YOU  ARE  FINISHED. 

PRINT" [2  DOWN) BE  SURE  YOU  SPELL  THE  W 

ORDS  CORRECTLY" 

PRINT" [DOWN] [WHT) ENTER  YOUR  WORDS 

[DOWN] [red] " :FORN=1TO20 

PRINT" [ WHT) "N"[rED]?  "; :GOSUB380 : IFIN 

$=""THEN250 

W$(N)=IN$:NEXT 

PRINT" [DOWN] ENTER  AN  IDENTIFIER" :PRIN 

T"[DOWN)?    "; 5GOSUB380:IFIN$=""THENIN$ 

II    ii 

W5 ( 0 ) =IN? : PRINT " { CLR } [ 2  DOWN ) " : F0RI=1 

TO20:IFW$(I)=""THEN270 

IFPOS ( 0 ) +LEN ( W$ ( I ) ) >  20THENPRINT 

PRINTW5{I)", "; :NEXT 

PRINT: PRINT" [ WHT) "W$(0) : PRINT" [DOWN] 

[WHT] POSITION  THE  TAPE{ RED) " :GOSUB370 

PRINT" [CLR] " :OPEN2,1,1,W?{0) :FORI=0TO 

20:PRINT#2,W?Ci) :NEXT:PRINT#2 , W5 (0) ;C 

LOSE2:GOT0315 

PRINT" [DOWN)pOSITION  THE  TAPE":G0SUB3 

70:PRINT"[CLR} [2  DOWN)" 

0PEN2 ,1,0: INPUT#2 , W$ ( 0 ) : PRINT " [ D0WN)N 

AME  [BLU}"W?(0) "[RED} [DOWN}" 

FORI=1TO20 : INPUT*  2 , W? ( I ) : IFPOS ( 0 ) +LEN 

C  W$ ( I ) ) >  20THENPRINT 

PRINTW$ ( I ) "  "  ;  : NEXT : CL0SE2 

PRINT: PRINT" [down] [red] IS  THIS  THE  GR 

OUP  OF": PRINT "WORDS  YOU  WANTED" ; :GOSU 

B375 

IFAN$="N"THEN200 

GOT0345 
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315  GOSUB370:IFTT=0THEN200 

320  PRINT"{CLR} f2  DOWN} { PURJpreSS : [DOWN] " 

325  PRINT" {wHT) RETURN {RED J  TO  USE  THE";PR 

INT"  WORDS  ALREADY  IN  THE {2  SPACES 3  CO 

MPUTERfDOWN}" 
3  30  PRINT " [ PUR 3  OR I  DOWN 1 " : PRINT " { WHT ] N 

{red 3  TO  LOAD  A  LIST {2  DOWN} ": PRINT" 

{pur5or(down]":priht"{wht]e|red}  to  E 

nd{down]" 
335  gosub375:ifan$="n"then200 
340  ifan$="e"then120 

345  PRINT"{CLR]{2  DOWN 3 { PUR } PRESS :£ DOWN] " 

: PRINT "{ WHT] RETURN {red]  TO  PRACTICE": 

PRINT"  UNTIL  YOU  GET  TIRED {DOWN J" 
350  PRINT" £PUR]0R{D0WN3":PRINT"{WHT}C 

{RED]  TO  PRACTICE  A": PRINT"  CERTAIN  N 

UMBER  OF": PRINT"  TIMES {DOWN}" 
355  PRINT" {PUR} 0R{ DOWN] ": PRINT" {WHT]E 

[red]  to  QUIT{D0WN1":G0SUB375:IFAN5=" 

C"THEN20 
360  IFANS="E"THEN120 
365  RI=10000:GOTO35 
370  PRINT" {down) [2  SPACESjPRESS  {WHTJRETU 

RNfREDj"; 
375  PRINT"?  ",-  :GOSUB380:AN$=LEFT$(IN$,1): 

RETURN 
380  IN$="":ZL=0 
385  POKE204, 0: PRINT"* Cleft]"; 
390  GETZ$:IFZ$=""THEN390 
395  POKE204,1: PRINT"  [LEFT] " ; : IFZ$=CHR$ { 1 

3 ) THENPRINT : RETURN 
400  IF2$=CHR$ { 20 ) ANDZLTHENZL=ZL-1 : IN$=LEF 

T| { IN$ , ZL ) s  PRINTZ$ ; 
405  IF{(Z$>"/"ANDZ$<":")OR(Z$>"@"ANDZ$<"[ 

" ) )ANDZL<14THENPRINTZ$; : IN$=IN$+Z$ i ZL 

=ZL+1 
410  GOT0385  © 


TimeiucR^  ' 


ATTENTION 

C-64  PROGRAMMERS! 

II  you  have  a  professiona  quality  unique  computer 
program  ready  lo  go  lor  \t  o  Comrnodore  64,  we  would 
like  lo  discuss  with  you  th  =  possibility  of  publishing  your 
entertainment,  educational  or  home  small  business 
program  for  distribution  o  i  a  national  basis. 

Timeworks  is  a  national  p  jblisher  and  distnbutor  of 
Commodore  64  {&  other}  software  with  over  100  field 
Sales  Representatives  servicing  mass  merchants  and 
large  retail  chains  in  all  50  Stales  and  Canada.  Our 
products  are  sold  m  over  ioOO  retail  oullels.  computer 
stores  and  chain  stores.  (And  that  doesn't  even  include 
mailorder.) 

Timeworks  prides  itself  ori  quality  software  and  effective 
merchandising.  Our  programs  are  both  User  smart  and 
fulfill  a  specific  need.  Entertainment  software  always 
includes  that  special  element  to  capture  the  player  s 
interest.  Our  software  packaging  is  accepted  as  some  ol 
the  most  creative  in  the  industry  and  we  keep  our  overall 
product  quality  at  the  highest  level. 

There  is  a  great  demand  f  )r  Commodore  64  Software.  If 
you  feel  your  program  meets  our  standards,  well  pay 
you  generous  royalties  anij  fringe  benefits  for  accepted 
works.  Let  Timeworks  put  your  program  in  maior  stores 
across  the  country. 

For  more  information,  feel  free  to  contact  me  on  our 
Programmers"  Hot  Line,  or  write  to  Vic  Schiller.  Vice 
President.  Development   '.  ^ 


■^SS^H^Une^^^ 


TIfylEWORKS.  INC. 

405  Lake  Cook  Road    De  jrfield.  IL  60015 


INTERNATIONAL 


EPSON  FX-80  PRINTER 

•  Up  To  160  ops  •  Pinfeed  Platen 

•  Proportional  Spacing  •  Graphics  •  Elite  Pitch 

•  Centronics  Parallel  Interface  •  Internal  2  K  Ram 

NOWAVAILABLE  FOR  IMMEDIATE  DELIVERY! 


IDS480MICROPRISM 


OMEGA 
PRICE 


$ 


499 


Manufacturers 
Suggested 
Retail  Price 

699.00 


•  New  "MaiseyTM"  Print  Quality 
■  Dot  Matrix 


_^    CALL  TOLL  FREE! 
'^^        1.800-343-0873 

Call  Toll  Free  (orOrdering 
All  Others  call  (617i  229.6464 


CHARGE  IT! 


•Mass.  Resldenis  Add  5%  Sales  Tax 
•Prices  Do  Not  Include  Shipping  Charges 

UNADVERTISED  SPECIALS  •  AMDEK  •  APPLE  •  C-ITOH  •  GEMINI 


PRICES,  SPECIFICATIONS  AN O  AVAILABILITY  OF 
ADVERTISED  MERCHANDISE  SUBJECT  TO 
CHANGE  WITHOUT  NOTICE 


NEC  •  OKIDATA  •  TANDON 

OIMEGA  INTERNATIONAL 

334  R  CAMBRIDGE  STREET,  BURLINGTON,  MA.  01803 


of  The  HTindreds  of  Reasons 
You  Ought  To  Be  A  COMPUTE! 

Magazine  Subscriber: 


Prom  "The  Editor's  Feedback"  Card,  a  montlily  part  of  our  continiilng 
dialogue  witti  readers  of  COMPUTE!.  These  are  responses  to  the  question, 

"What  do  you  like  t)est  about  COMPUTE!  ?" 

l."The  coverage  of  educational  uses  of  computers  for  kids."  8. "Clear,  clean  layout, 
good  presentation..."  3."Educational  software  reviews...  Triends  of  The  Turtle'..."  4. 
"Written  so  a  newcomer  to  computers  can  understand..."  5. "Cover  to  cover,  and  all  in 
between..."  6."Revlews  of  software  and  hardware..."  7.  "Good  balance  of  application 
and  technical  articles..."  8."It  is  the  best  source  of  info  about  various  levels  of  VIC/ 
PET/CBM  machines  and  applications..."  9.  "The  large  nmnber  of  well-explained  pro- 
grams..." 10.  "I  like  programs  that  can  be  typed  into  a  computer,  run,  and  then  used 
right  away  (a  program  without  bugs!)..."  11. "That  it  is  organized  well,  and  covers  a 
broad  range  of  information  concerning  Atari.  Keep  it  up,  please!  I'm  learning..."  IS. 
"Table  of  Contents  listings  and  computer  guide  to  articles  is  a  great  idea.  Best 
magazine  for  personal  home  computer  users..."  13. "Best  I  have  fomnd  for  VIC  inxb..." 
14."Informative  articles:  'Secrets  of  Atari',  Game  programs,  especially  programs 
that  teach  the  reader  about  the  Atari..."  15."I  like  all  the  articles  and  programs  for  my 
computer,  the  PET.  I've  learned  and  found  out  things  about  it  that  I  never  even 
thought  existed.  Other  magazines  don't  have  too  much  material  for  the  PET  and,  for 
that  reason,  I  find  COMPUTE!  invaluable..."  16.  "The  up-to-date  hardware  reviews..." 
17.  "Educational  and  game  programs...  ready  to  type  In..."  18.  "Utihty  and  appUcations 
program  listings  very  helpful..."  19. "I'm  a  computer  beginner  and  COMPUTE!  didn't 
scare  me  away...  it  miade  me  more  interested  in  learning  more  about  computers..."  SO. 
"I  really  enjoy  (smce  I  am  one)  the  Beginner's  Page..."  81. "The  attention  it  gives  to 
Atari  and  the  easy-to-understand  language  it's  written  in..."  88.  It  is  concerned  with 
explaining  programs,  not  just  listing  them.  It  is  the  best  VIC  magazine  I  could  buy..." 
8S."The  new  Table  of  Contents 'Guide  to  Articles  and  Programs'  is  excellent,  particu- 
larly the  indication  of 'multiple  computer'  items. .."84,Broad  range  (sophistication) 
of  programs..."  85."It's  easy  to  understand  yet  pushes  you  to  a  'higher  level'..." 

Whether  you're  just  getting  started  with,  personal  computers,  or  very  advanced,  you'll  find 
useful,  helpful  information  in  every  issue  of  COMPUTE!  Magazine.  We  specialize  in  supporting 
the  Atari,  PET/CBM,  Commodore  VIC-20  and  64,  TI-99/4A,  and  Apple  computers.  Editorial 
coverage  is  expanding  to  include  the  Timex/Sinclair  and  the  Radio  Shack  Color  Com.puter. 

Every  issue  of  COMPUTE!  brings  you  user-friendly  articles,  applications  programs,  and 
utilities  you  can  type' right  into  your  com.puter  and  use.  To  subscribe  to  COMPUTE!,  or  to 
order  a  sample  issue,  use  the  attached  reply  card  or  call  our  toll-free  number.  COMPUTE!... 
We're  the  resource  for  thousands  and  thousands  of  home,  educational,  and  small  business 
computer  users.  Shouldn't  you  be  one  of  them? 

1  year,  twelve  issue  subscription:  $20.00  in  the  US. 


GaU  Toll  Free  in  the  US  800-334-0868 

In  NO  caU  919-275-9809 

COMPUTE!  Magazine  is  a  publication  of  COMPUTE!  Publications,  Inc. 
305  Edwardia  Drive,  P.O.  Box  5406,  Greensboro,  NC  27403 


FRIENDS  OF  THE  TURTLE 


Dovid  D  Thornburg,  Associate  Editor 


Ed  Emberley's 
Drawing  Procedures 


Part  of  the  appeal  of  turtle  graphics  is  that  it  allows 
complex  pictures  to  be  built  from  simple  building 
blocks.  This  feature  arises  from  the  fact  that  each 
shape  description  or  procedure  describes  the 
shape  itself,  independently  of  its  starting  point  or 
orientation.  For  example,  once  a  square  is  defined 
with  the  procedure: 

TO  SQUARE  :SIZE 

REPEAT  4  (FORWARD  :SIZE  RIGHT  90] 
END 

the  computer  can  use  this  procedure  to  create  a 
square  of  any  size  at  any  starting  location  and 
orientation. 

If  the  user  has  built  up  a  set  of  useful  geo- 
metric procedures,  these  can  be  combined  to  create 
more  complex  figures.  If  one  also  has  a  procedure 
for  drawing  triangles: 

TOTRI:SI2E 

REPEAT  3  [FORWARD  ;SIZE  RIGHT  120] 
END 

then  a  procedure  for  drawing  a  house  can  be 
created  from  a  combination  of  a  square  and  a 
triangle: 

TO  HOUSE  :SIZE 

SQUARE  rSIZE 

FORWARD  :SIZE  RIGHT  30 

TRI  :SIZE 
END 

This  procedure  can  be  used 
to  create  houses  of 
different  sizes 


t 


A 


Many  turtle  graphics  enthusiasts  create  libraries 
of  basic  figures  from  which  quite  interesting  pic- 
tures can  be  created. 

As  an  active  proponent  of  turtle  graphics  and 
procedural  problem-solving,  I  was  delighted  to 
find  Ed  Emberley's  independent  discoveries  along 
these  lines. 

Ed  Emberley  has  written  several  books  on 
illustration  for  children.  His  books  of  particular 
interest  to  readers  of  this  column  would  include: 
Ed  Emberley's  Drawing  Book  of  Animals,  Ed  Emberley's 
Drawing  Book,  Make  a  World,  Ed  Emberley's  Big 
Orange  Drazving  Book,  and  Ed  Emberley's  Big 
Purple  Drawing  Book  (all  published  by  Little,  Brown 
and  Co.). 

Mr.  Emberley's  illustration  technique  is  built 
on  the  idea  that,  just  as  words  are  created  from 
an  alphabet  of  letters,  pictures  can  be  created  from 
an  alphabet  of  shapes.  He  shows  how  to  create 
myriad  figures  using  circles,  rectangles,  arcs,  lines, 
triangles,  and  other  simple  pieces.  By  building 
the  figure  piece  by  piece,  the  young  artist  is  never 
overwhelmed  by  trying  to  deal  with  the  whole 
figure  at  once.  The  following  series  of  illustrations 
(courtesy  of  Mr.  Emberley)  shows  how  one  can 
create  a  clown's  head  almost  entirely  from  circles 
and  circle  parts. 

If  you  were  to  create  this  figure  using  turtle 
graphics  procedures,  you  would  need  only  pro- 
cedures for  a  circle,  an  arc,  a  rectangle,  and  the 
squiggles  for  the  hair. 

Ed  Emberley  does  not  normally  use  a  com- 
puter to  create  his  illustrations.  The  clown  figures 
shown  on  the  next  page  are  a  happy  exception  to 
that,  as  he  created  them  on  an  Apple  computer 
using  the  KoalaPad  touch  tablet  with  the  Micro 
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Illustrator  software.  I  am  encouraging  him  to  use 
Logo  also  to  see  how  he  likes  it. 

Just  as  Mr.  Emberley's  books  can  be  a  source 
of  inspiration  to  those  of  us  who  build  pictures 
using  turtle  graphics,  they  can  also  be  wonderful 
tools  for  teaching  procedural  problem-solving  - 
for  teaching  people  how  to  solve  larger  problems 
by  breaking  them  into  bite-sized  chunks.  For  this 
reason  I  encourage  the  use  of  his  drawing  books 
by  teachers  of  computer  programming.  Not  only 
are  the  children  learning  to  solve  problems  with 
procedures,  but  they  are  also  learning  how  to 
create  charming  illustrations  at  the  same  time. 

I  created  the  next  figure  myself  to  show  that 
almost  anyone  can  learn  to  make  pictures  in  this 
manner. 


For  those  of  us  who  have  been  in  the  field  a 
long  time,  the  discovery  of  Mr.  Emberley's  excel- 
lent contributions  is  refreshing.  Clearly,  he  is  a 
Friend  of  the  Turtle!  < 
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Learning  With  Computers 


JB,  Sheifon  and  Glenn  M,  Kleimon 


Computers  And  Teaching 
Children  To  Read 


Both  authors  of  this  report  have  long  been  interested  in 
teaching  children  to  read.  Kteiman,  previously  a  re- 
searcher at  the  National  Center  for  the  Study  of  Reading, 
attended  the  1983  International  Reading  Association 
Convention.  Shelton,  a  former  reading  tutor,  has  visited 
several  schools  where  the  IBM-sponsored  program  dis- 
cussed in  this  column  is  being  tested. 


International  Reading  Association 
Convention 

The  International  Reading  Association  (IRA)  is 
the  world's  largest  association  of  reading  teachers 
and  researchers.  Its  1983  convention,  held  May 
2-6  in  Anaheim,  California,  reflected  the  size  of 
the  organization.  The  program  booklet  required  58 
pages  to  list  all  the  workshops,  symposia,  insti- 
tutes, research  report  presentations,  special  inter- 
est group  meetings,  and  other  events.  Thousands 
of  teachers  and  researchers  attended,  and  almost 
250  companies  exhibited  their  products. 

Three  years  ago,  at  the  1980  convention,  there 
was  very  little  about  computers.  Only  a  handful 
of  presentations  focused  on  computers,  and  just  a 
few  companies  exhibited  computer-based  prod- 
ucts. Things  have  changed. 

Three  of  the  preconvention  institutes  focused 
upon  computers,  as  did  many  conference  presen- 
tations and  symposia.  A  special  interest  group 
has  been  formed  by  people  interested  in  using 
microcomputers  to  teach  reading.  The  exhibit 
area  included  booths  from  Apple,  Atari,  Commo- 
dore, IBM,  and  Radio  Shack.  Perhaps  most  signif- 
icant is  that  computer  software  was  included  in 
many  of  the  exhibit  booths,  even  from  some  of 
the  major  textbook  publishing  companies.  Scott 
Foresman,  Random  House,  Ginn,  Houghton 
Mifflin,  Scholastic,  MilUken,  Borg-Wamer  Educa- 
tional Systems,  Developmental  Learning  Mate- 
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rials,  Walt  Disney  Educational  Media,  Educational 
Activities,  Hartley,  FoUett  Library  Book  Company, 
American  Educational  Software,  Computer  Cur- 
riculum Corporation,  and  other  companies  had 
computer  materials  on  display. 

In  a  display  of  IRA  publications,  there  was  a 
new  book.  Computer  Applications  in  Reading,  by 
George  Mason,  Jay  Blanchard,  and  Danny  Daniel. 
This  book  is  a  valuable  resource  for  anyone  inter- 
ested in  computers  and  reading.  It  describes  col- 
lege and  university  centers  for  computer-based 
reading  programs,  school  applications  in  reading 
instruction,  computer  assessment  of  readability, 
sources  of  computer  semces  and  software,  re- 
search on  computers  in  reading,  and  background 
information  about  computers.  Much  of  the  book  is 
taken  up  by  annotated  bibliographies,  so  it  is  a 
good  starting  point  for  finding  out  about  computers 
and  reading  instruction.  It  is  available  from  IRA, 
800  Barksdale  Road,  Box  8139,  Newark,  DE  19714. 

A  new  journal,  Computers,  Reading  and  Lan- 
guage Arts,  was  also  being  promoted.  It  contains 
articles,  book  reviews,  software  reviews,  and 
news,  all  focusing  on  "the  day-to-day  use  of  com- 
puters in  teaching  basic  skills  in  subjects  like 
reading,  writing,  and  spelling."  For  more  in- 
formation about  this  journal,  contact  Modern 
Learning  Publishers,  Inc.,  6517  Liggert,  Oakland, 
CA  94611. 

At  the  IRA  convenHon,  there  was  clearly 
tremendous  interest  in  using  computers  to  teach 
reading.  There  were  discussions  of  the  potential 
of  computers  to  help  motivate  children,  to  provide 
drill  and  practice  in  phonics  and  word  recognition, 
to  administer  and  score  tests,  and  to  improve 
comprehension  skills.  Many  teachers,  adminis- 
trators, and  researchers  expressed  optimism  about 
the  possible  uses  of  computers. 

However,  there  was  far  more  said  about 
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KRELL'S  SAT* 
PREP  SERIES 

42  program  series.  Complete  cover- 
age of  all  SAT*  topics  including  The 
Test  of  Standard  Written  English.  All 
materials  presented  in  SAT'  format 
and  at  the  same  level  of  difficulty 
encountered  in  SAT*  Exams.  Scoring 
and  explanations  provided  instantly. 
Krell's  unique  logical  design  custom- 
izes this  multi-disk  set  for  each 
individual  user.  Beware  of  imitations! 

*299.95 
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CONNECTIONS 

Krell's  Connections  is  the  most  exciting 
development  in  educational  computing 
since  LOGO.  Conneclions  offers  ctiildren 
of  all  ages  a  new  world  of  entertainment 
and  inleltectual  challenge.  Parents  and 
educators  will  be  gratified  by  the  intriguing 
yet  serious  nature  of  Con/iecf/ons. 

Connections  is  accompanied  by  an  initial 
set  of  data  bases  (included  free  with  (he 
game  system)  that  deal  with  geography, 
chemistry,  mammals,  mathematics,  toots, 
and  everyday  objects.  Conneclions  helps 
users  to  build  their  own  data  bases  and  to 
utilize  the  data  bases  created  by  others  via 
the  Connections  User  Group  Exctiange 
Progtam.  48K.  «99.95 

Ne^'    ALEXANDER  THE  GREAT 

Available  at  last"!  Alexander  The  Great  is  (tie  ultimate  game  for 
developing  word  and  arithmetic  skills,  lar  better  than 
Scrabble™.  Alexanaer  The  Great  permits  equal  competi- 
tion between  players  at  different  skill  levels.  Complete  graphics 
and  range  of  options  make  Alexander  The  Great  the  best  and 
most  challenging,  educational  tool  ever  devised.  Available  lor 
all  microcomputers  in  board  version.  48K  *39.95 

ALSO  AVAILABLE  FROM  KRELL;  Botticelli,  Galileo,  Isaac  Newton  >  F.G.  Newton,  Pythagoras  and  The  Dragon,  Ttie  Language  of  Math,  Linear 
Equattons  Descartes"  Delight,  Odyssey  In  Time,  War  of  the  Samurai,  The  Black  Death,  Electoral  College  and  PrImary.Fight,  Adventures  In  Flesh, 
Compelency/Proliclency  Skills,  Galactic  MaBellan.  g^elby  Lyman  Chess  Tutorial  Series.jCAU  OR  WRITE  FOR  A  COMPLETE  CATALOG 


SOFTWARE  CORj 
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KRELL'S  LOGO 

The  M.LT.  authorized  version.  Comprehen- 
sive 4-disk  set  includes  two  copies  of 
LOGO  for  Apple  11'"  all  utility  programs  and 
Sprite  drivers,  all  M.I.T,  demonstration 
programs,  shape  editor,  music  editor.  21 
program  ,-l//rf'  in  /.()ji;o/«/j(/ Tutorial  Series, 
and  massive  documentation  including  full 
color  wall  chart.  THIS  IS  THE  GENUINE 
ARTICLE!  Unlike  the  version  marketed  by 
Apple  Corporation,  KRELUS  LOGO  offers 
the  full  package  of  M.I.T.  features  including 
the  ability  to  save  pictures. 

Spsctecyto/  Pffc  :■  ^89.95 

TOP  RATED  IN  INFOWORLD 

EXCELLENT  IN  ALL 

CATEGORIES! 

PLATO'S  CAVE 


,! 


Spectacular  game  for  aspiring  scientists  of  all  ages.  Players 
probe  Plaio's  Cave  with  light  beams  as  they  explore  the 
relation  between  iliusion  and  reality  and  itie  relation  between 
evidence  and  inference.  Graphic,  dynamic,  and  cfiallenging. 
witti  difficulty  levels  suitable  for  all,  48K.  M9.95 

Available  at  Selected  Dealers 


MY  RBSLdem^  30C  saies  lai 

Payrt^eni  in  tj  S 

i1(Hiar5  o'^ly 

PiKjfS  I'lgM^  nijjrter  cuiS'Cie  US 

DEALER  INQUIRIES 
INVITED 


The  ststs  ol  the  art  in  educitional  com, 


1320  Stony  Brook  Road,  Stony  BrooK,  New  York  11790 
'  Telephone  (516)  751-5139 
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APPLE,  ATARI,  COMMODORE,  IRM-PC,  RADIO  SHACK 


Ttaaemarks  ol  Apple  Comp  Corp ,  Alan  Corp .  Commodoie  Corp .  IBM.  Tandy  Cofp 


plans,  potentials,  and  desires  than  about  how 
computers  are  already  being  used.  The  presenta- 
tions, for  the  most  part,  focused  on  the  need  for 
teacher  training  and  the  process  of  implementing 
computers  in  schools,  and  selecting  and  evalu- 
ating software  -  the  beginning  steps  of  using  com- 
puters. Reading  educators  are  just  getting  started 
with  computers.  It  will  be  a  few  years  before 
presentations  at  IRA  can  discuss  what  actually 
happens  when  computers  are  used  in  teaching 
children  to  read. 


"Our  kindergartners,  four 

months  into  the  school  term, 

ore  writing  sentences.  They 

have  to  be  enjoying,  as  weli  as 

learning  from,  the  computers 

to  show  the  dedication  they  do." 


Writing  To  Read 

One  reading  program  already  being  used  was 
shown  at  the  IBM  exhibit  booth  and  at  a  separate 
display.  The  program  is  part  of  a  comprehensive 
reading  instruction  package  for  kindergarten  and 
first-grade  children.  Developed  by  Dr.  John  Henry 
Martin  and  called  "Writing  to  Read,"  this  ap- 
proach to  teaching  reading  is  being  tested  by 
schools  in  eight  states  and  in  Washington,  D.C., 
with  10,000  children  participating.  Wake  County, 
North  Carolina,  with  2,900  kindergarten  children 
in  34  schools,  is  the  largest  single  participant  in 
the  national  test.  The  program  runs  on  IBM  Per- 
sonal Computers,  and  testing  is  funded  by  IBM. 
Dr.  Martin's  company,  JHM  Corporation,  is 
supervising  the  program  and,  at  the  end  of  a  two- 
year  test  period.  Educational  Testing  Service  will 
conduct  an  evaluation. 

The  introduction  of  Writing  to  Read  into  the 
schools  was  threefold:  teachers  and  principals 
were  given  a  two-day  training  seminar  and  a 
system  management  manual;  parents  viewed  an 
orientation  film  and  experienced  a  hands-on  ses- 
sion; and  the  children  were  prepared  in  the  class- 
room for  the  computer  lab  procedures. 

The  Program  In  Action 

At  Briarcliff  Elementary  School  in  Cary,  North 
Carolina,  the  reading  lab  contains  four  IBM  Per- 
sonal Computers,  one  printer,  eight  electric  type- 
writers, and  ten  tape  recorders.  Each  child  spends 
one  hour  per  day  in  the  reading  lab.  The  computer 
segment  lasts  15  minutes.  The  remaining  time  is 
spent  in  work  center  activities  -  children  review 
their  words,  use  typewriters  to  write,  and  listen 
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to,  and  read,  stories. 

At  the  computer  stations,  the  children  work 
in  pairs,  using  IBM  Pei'sonal  Computers  with  syn- 
thesized voice  output  and  color  graphics.  Wearing 
headphones,  the  children  listen  and  respond  to 
the  synthesized  voice  and  graphics  display. 

The  computerized  lessons  are  designed  to 
teach  children  letter-sound  correspondences.  The 
lessons  use  a  "phonemic  alphabet"  which  repre- 
sents each  of  the  42  sounds  of  English  by  one 
symbol.  That  is,  this  approach  uses  a  special 
teaching  alphabet  that  makes  the  letter-sound 
correspondences  consistent.  For  example,  "cat" 
would  be  written  as  "Kat,"  and  "through"  as 
"throo."  The  children  are  introduced  to  all  42 
phonemes  by  working  with  30  words.  The  selected 
words  include  all  the  sounds  and  are  represented 
by  pictures  -  dog,  cat,  bed,  rabbit,  fish,  and  so 
on.  The  children  learn  the  30  words  in  ten  cycles, 
each  with  three  words. 

The  symbols  for  the  sounds  are  displayed 
around  the  perimeter  of  the  computer  screen 
(these  symbols  are  letters,  letter  pairs  such  as 
"th,"  and  letters  with  markings,  such  as  for  long 
and  short  vowels).  A  color  picture  appears  on  the 
computer  screen,  with  the  word  spelled  both 
phonetically  (rabit)  and  in  standard  English  (rab- 
bit). The  computer  (using  a  digitized  female 
voice)  intones:  "Say  rabbit."  There  is  a  pause  for 
the  children  to  say  the  word  aloud.  They  are  then 
instructed  in  the  phonemic  spelling,  sound  by 
sound.  The  voice  requests  an  "r"  and  waits  for 
the  correct  letter  on  the  keyboard  to  be  pressed. 
Incorrect  key  presses  are  simply  ignored.  When 
"r"  is  pressed,  the  phoneme  "r"  moves  from  its 
place  at  the  perimeter  of  the  screen  to  midscreen. 
The  voice  repeats,  "Say  rabbit,"  and  the  children 
again  recite  the  word.  This  sequence  continues 
until  the  whole  word  is  spelled  out.  The  procedure 
is  very  repetitive.  As  each  new  word  is  selected, 
the  computer  says  the  word,  asks  the  children  to 
repeat  it,  spells  the  word  aloud,  and  asks  the  chil- 
dren to  take  turns  spelling  it  several  times.  Since 
phonemic  spellings  are  emphasized,  the  children 
must  spell  "rabbit"  with  only  one  "h"  -  the  com- 
puter ignores  any  pressing  of  "h"  after  the  first 
one. 

After  the  learning  phase,  the  computer  work 
goes  on  to  a  "mastery  test."  Students  are  asked  to 
spell  the  words  they  have  just  learned.  If  they 
make  two  errors,  the  computer  takes  them  back 
to  the  learning  phase.  Following  success  on  the 
mastery  test,  there  is  a  "make  words"  phase,  in 
which  all  the  phonemes  the  children  have  learned 
so  far  are  reviewed  and  combined  into  new  words. 
There  are  also  some  game  activities,  such  as  one 
where  the  children  must  repeatedly  type  "mouse" 
quickly  enough  to  keep  a  mouse  pictured  on  the 
screen  moving  away  from  a  cat. 
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That's  an  easy  one:  HesWare™  educational  software.  .     ,       ■ 

The  children  with  the  most  answers  in  school  are  usually  the  children  who  enjoy  learning. 
HesW^re  helps  develop  your  child's  interest  in  learning  by  making  it  fun.  And  along  the  way,  develop 
familiarity  anci  proficiency  with  computers^a  skill  that  is  becoming  more  and  more  essential  to  success. 

HesV\fere  educational  software  combines  enjoyment  with  a  creative  learning  experience  Unlike 
video  games,  HesWare  educational  programs  involve  Vour  child— and  that  keeps  their  interest.  Whether 
It's  creating  colorful  and  artistic  pictures  with  Turtle  Graphics, 
making  up  funny  faces  with  Pacemaker™  or  helping  America's 
favorite  canine,  Benji,  save  kidnapped  scientists  (and  learn 
about  the  solar  system  in  the  process,)  or  any  of  the  programs 
in  our  education  library,  HesWare  gives  your  children  a  positive 
attitude  toward  learning  and  technology. 

It's  not  expensive  to  give  your  child  a  headstart  on  the 
future.  HesWare  programs  are  available  for  most  popular  home 
computers,  including  the  Commodore  VIC  20r  Commodore  64^ 
AtarifandlBM? 

HesWare  educational  software.  Just  one  of  the 
ways  HesWare  Is  expanding  the  computer  experience.  And  #f   ^M#  ^^ 
expanding  your  child's  horizons.  Look  for  them  at  your       nBSwwmB. 
favorite  software  retailer 


Human  Engineered  Software,  150  North  Hill  Drive,  Brisbane,  CA  94005 
800-227-5703  (in  California  800-632-7979)  Dept.  C20 


Pleases  the 

tough 
customeK 


HesVfeteandFacemakeraretfademarksof  Human  Engine«red  Software.  VIC  20  and  Commodare  61  are  trademarks 

S  ComSre  ISOTlcrLtdL  Atari  IS  a  res  tractemark  of  Atari,  Inc.  IBM  is  a  registered  ttadema.k  of  International  Business  Machines. 
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The  work-center  activities  complement  and 
supplement  the  computer  lessons.  At  the  work- 
journal  station,  the  children  use  workbooks  which 
provide  practice  with  the  three  basic  words  just 
learned,  present  additional  words  that  have  the 
same  phonemes,  and  leave  room  for  children  to 
write  new  words.  At  the  make-words  center,  the 
children  write  and  illustrate  words.  At  the  classics 
listening  center,  they  listen  to  stories  on  tape  and 
read  along  with  the  actual  books.  This  familiarizes 
them  with  standard  spelling.  At  the  typewriter 
station,  children  use  IBM  Selectric  typewriters  to 
write  the  words  they  have  learned,  combine  them 
into  sentences  and,  when  they  are  ready,  begin  to 
write  stories. 

Program  Effectiveness 

Writing  to  Read  has  many  similarities  to  other 
approaches  to  teaching  reading.  For  example,  it 
shares  the  use  of  a  phonetic  alphabet  with  ap- 
proaches using  the  International  Teaching  Al- 
phabet. The  emphasis  on  letter-sound  correspon- 
dences and  on  having  children  say  the  words  and 
sounds  repeatedly  reminds  us  of  such  structured 
phonics  approaches  as  the  DISTAR  method.  How- 
ever, the  overall  blend  of  computer  and  work- 
station activities  is  Dr.  Martin's  own  synthesis, 
reflecting  his  experience  as  a  teacher  and  school 
administrator  and  his  philosophy  of  education. 

Writing  to  Read  has  been  enthusiastically 
received  by  the  teachers  and  children  at  Briarcliff 
School.  The  principal,  Mary  Jane  McReynolds, 
noted:  "Our  kindergartners,  four  months  into  the 
school  term,  are  writing  sentences.  They  have  to 
be  enjoying,  as  well  as  learning  from,  the  com- 
puters to  show  the  dedication  they  do." 

Several  minor  problems,  such  as  the  mastery 
tests  being  too  rapid  and  the  headphones  not 
working  well,  have  been  remedied.  Kathleen  Burt, 
head  of  Briarcliff  School's  Kindergarten  program, 
reports:  "We're  more  than  pleased;  we  have  high 
hopes.  You  can't  separate  reading  and  writing, 
and  this  is  a  logical  approach  toward  teaching 
them  together.  It  combines  many  of  the  best 
teaching  methods  we  use  in  the  classroom  with 
the  technological  advantages  of  the  computer." 

The  Writing  to  Read  approach  is  an  eclectic 
one,  combining  phonics,  writing,  and  the  reading 
of  classical  children's  stories.  Some  educators 
would  object  to  certain  aspects,  such  as  using 
nonstandard  phonetic  spellings  and  having  chil- 
dren begin  learning  letter-sound  correspondences 
before  they  learn  "whole-word"  or  "sight"  recog- 
nition of  common  words.  These  are  classic  issues 
in  the  teaching  of  reading,  issues  that  have  been 
debated  for  many  years.  We  will  not  enter  into 
this  debate  here,  but  we  do  want  to  point  out  that 
the  computer  does  not  settle  any  of  these  issues. 
Computers  can  be  used  in  any  approach  to 
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teaching  reading.  But  computers  do  not  tell  us 
how  or  what  to  teach,  and  they  do  not  automati- 
cally solve  children's  reading  problems. 

Dr.  Martin  and  IBM  are  to  be  commended  for 
their  efforts  to  integrate  computers  into  a  complete 
approach  to  teaching  reading,  and  for  subjecting 
their  approach  to  large-scale  testing  and  evalua- 
tion. However,  they  are  using  the  computer  for 
only  one  purpose  -  to  teach  letter-sound  cor- 
respondences to  beginning  readers.  We  hope  to 
see  other  methods  of  teaching  reading  begin  to 
incorporate  computers,  and  to  see  computers 
used  to  help  children  develop  more  advanced 
reading  skills.  © 
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ANIMAX  COMPUTER 
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OTHER  ANIMAX  GAMES: 
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It^s  still  around  if 
you  know  where 
to  look. 

We  are  Kangaroo'^'  Inc., 
dedicated  to  just  plain  fun  for 
kids  3  to  8  years  old. 
Jeepers  Creatures^'*'  -  30  basic 
animals  with  interchangeable 
heads,  torsos,  and  legs  or  tails. 
Create  an  owiigator  or  an  octo- 
catfish  or  one  of  over  26,000 
funny  colorful  combinations  in 
this  goofy  collection  of  mixed 
up  animals. 

My  House-My  Home™  -  Let's 
move  into  the  house  on  Some- 
where Street.  It's  ready  for  fur- 
nishing and  family.  Oops,  you 
put  the  kitchen  sink  in  the 
bedroom  and  Aunt  Nellie's  bed 
in  the  kitchen.  That's  siliy. 

Jeepers  Creatures  and  My 
House-My  Home  have  no  win- 
ners or  losers,  no  right  or  wrong 
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answers,  no  high  scores  to  beat, 
just  hundreds  of  hours  of  crea- 
tive play. 

Give  your  child's  imagination 
a  boost  with  Kangaroo  games 
designed  for  Apple  and  Atari 
computers. 


Jeepers  Creatures  and  My  House-My 
Home  are  each  available  for  $34.95 
at  your  software  dealer  or  from 
Kangaroo,  Inc.,  332  South  Michigan 
Ave.  Suite  700,  Chicago,  IL  60G04,  (312) 
987-9050,  Visa,  MasterCard  and  personal 
checks  accepted. 


CkANQAROO^^        For  a  pocket  full  of  fun. 


1983  Kangaroo  tnc. 


'%^ 


What 


toiCist 


Apple  is  a  registered  trademark  oi  AppljSfcofnputers,  inc.    Atari  is  a  registefed  trademafK  of  Alan.  Enc.    Gtaphics  created  wilh  PenguirtJ|oftware's  Graphics  Magjcian, 


THE  WORLD  INSIDE  THE  COMPUTER 


Islands  Of  Learning 


Fred  D'Ignazio,  Associate  Editor 


I  am  afraid  that  homes 
and  schools  are  swiftly 
becoming  islands  of 
computer  learning.  I  am 
afraid  that  unless  some- 
thing is  done  to  coordi- 
nate this  learning,  the 
tremendous  educa- 
tional potential  of  per- 
sonal computers  might 
never  be  realized. 
I've  been  speaking  on  this  subject  at  several 
educational  conferences,  including  the  National 
Educational  Computing  Conference  in  Baltimore, 
the  Florida  Instructional  Computing  Conference 
in  Tampa,  and  the  Hollins  College  conference  on 
"Computers  in  the  Schools." 

In  Tampa,  my  speech  was  entitled  "Linking 
Computers  in  the  Classroom  and  the  Home." 
After  the  speech,  one  of  the  people  in  the  audience 
came  up  and  introduced  himself  as  Kenneth 
Komoski,  Educational  Director  of  the  Educational 
Products  Information  Exchange  (EPIE). 

Ken  and  I  sat  down  and  chatted.  We  dis- 
covered that  each  of  us  independently  had  decided 
that  the  critical  area  in  educational  computing 
was  neither  the  classroom  nor  the  home.  Instead 
it  was  the  cojuicction  or  the  gap  between  the  two. 

To  show  how  similar  our  thinking  was,  here's 
a  quote  from  one  of  Ken's  recent  articles: 

It's  important  for  parents  to  work  coopera- 
tively with  educators  and  community  leaders 
to  make  decisions  about  computers  and 
educational  software....  At  stake  is  not  only 
the  quality  of  computer  instruction  in  the 
schools,  but  also  the  full  educational  poten- 
tial of  microcomputers  for  your  child,  your 
family  and  your  community.  If  parents  and 
schools  do  not  work  together,  much  of  this 
potential  may  be  lost. 

Kenneth  Komoski,  Network  (3/83). 
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Ken  told  me  about  the  work  he  had  been 
doing.  He  mentioned  that  his  organization,  EPIE, 
had  recently  joined  forces  with  Consumers  Union 
to  evaluate  educational  computing  products. 
Evaluations  are  published  in  a  monthly  MICRO- 
gram.  (Subscriptions  to  MICROgram  are  available 
from  EPIE-Consumers  Union,  P.O.  Box  839, 
Watermill,  NY  11976.) 

Millions  Of  Programs 

Hundreds  of  new  educational  software  packages 
are  appearing  each  month.  Families  and  schools 
are  buying  these  packages  by  the  millions.  In  1982, 
1.4  miUion  educational  software  packages  were 
sold.  Experts  predict  that  4  million  packages  will 
be  sold  this  year. 

Families  are  buying  the  software  and  schools 
are  buying  the  software,  but  there  is  little  or  no 
coordination  between  the  two.  This  is  the  source 
of  Ken's  and  my  concern. 

The  Miracle  Machine 

This  lack  of  coordination  creates  a  real  problem. 
The  biggest  impact  of  computers  will  probably  be 
on  kids  using  computers  at  home.  Yet  families 
have  the  least  experience  in  setting  up  a  formal 
curriculum  of  instruction. 

Many  parents  buying  computers  are  hoping 
that  the  educational  programs  that  their  kids  use 
will  teach  the  kids  without  any  parental  guidance. 
Or  that  the  programs  at  least  won't  do  any  harm. 

But  are  these  parents  placing  too  much  faith 
in  the  computer? 

Ever  since  they  were  first  invented,  com- 
puters have  been  seen  as  a  miracle  solution  to  all 
sorts  of  problems.  But  people  have  learned  the 
hard  way  that  computers  do  nothing  on  their 
own.  If  computers  are  given  the  right  instructions, 
they  can  help.  But  people  still  do  most  of  the  work. 

The  same  is  true  for  computer  learning.  The 
computer  cannot  teach  a  child  on  its  own.  Parents 


New  From  Cardco 


Five  Slot  Expansion  Interface 

for  the  C-64 


The  CARDBOARD/5 
(CB/5)  is  an  enclosed 
five  slot,  fully  switch 
selectable,  expansion 
Interface  for  the 
Commodore  64'".  This 
quality  product  allows  the 
user  to  switch  select  any 
cartridge  slot  or 
combination  of  cartridge 
slots.  Twenty-two  color 
coded  light  emitting 
diodes  give  status 
indication.  Each  slot  has 
four  LEDs  and  two  toggle 
switches  for  indication 
and  control.  Two  master 
toggle  switches  allow  the 
user  to  manually  override 
any  situation. 

All  Cardco  products  are 
individually  tested  to 
insure  quality  and 
relfability. 


Some  of  the  features  of  the 
CARDBOARD/5  are: 

•  high  quality  glass/epoxy 
circuit  board 
gold  plated  contacts 
logic  lines  are  switched  by 
solid  state  IC  switches 
'  full  LED  status  Indication 
'  convenient  toggle  switches 


full  support  under  the 
board  to  prevent 
flexing 

•  kill  plastic  enclosure  to 
Insure  safety 

•  fused  to  protect  your 
computer 

'  convenient  reset  button 

•  CARDCO,  Inc.'s 
exclusive  Lifetime 
Guarantee 


See  a  complete  line  of  American 
made  Cardco  Products  at  a 
computer  store  near  you,  today. 


313Mattiewson  •  Wictiita.  Kansas  67214  •  (316)  267-6525 


Commodore  64'"  is  a  registered  trademark  of  Commodore  Business  Systems,  Inc. 


cardco,  inc. 


and  teachers  still  need  to  do  most  of  the  work. 
They  need  to  create  an  environment  and  a  curric- 
ulum fitted  to  the  needs  and  age  level  of  each 
child.  Then  the  computer  can  be  a  valuable 
assistant. 

The  Impact  Of  Computer  teaming 

We  have  another  problem.  Computer  learning  at 
home  is  likely  to  be  unguided  and  uncontrolled. 
Yet  unless  computer  learning  at  school  and  at 
home  is  better  coordinated,  the  impact  of  com- 
puter learning  will  be  much  greater  at  home. 

Look  at  the  ratio  of  kids  to  computers  at  home 
and  in  the  schools.  At  home  the  ratio  is  great;  at 
school  it  is  miserable.  This  is  not  a  nice  thing  to 
admit,  but  it's  true.  One  reader  recently  wrote 
me  that  at  her  school  the  ratio  was  400  kids  to 
only  one  computer.  "But,"  she  admitted,  "I  sup- 
pose that's  better  than  no  computers  at  all." 

At  home  the  ratio  is  much  smaller,  of  course. 
Either  it's  nonexistent,  because  the  family  doesn't 
want  or  can't  afford  a  computer,  or  it's  something 
like  two  or  three  kids  per  computer. 

And  when  you  think  about  how  much  expo- 
sure each  child  will  get  to  educational  software  at 
home,  the  situation  looks  even  worse. 

Software  prices  are  beginning  to  drop  rapidly. 
Quality  educational  software  will  soon  be  available 
at  affordable  prices  (from  $5  to  S30  a  package). 
Yet  at  school  the  software  must  run  on  the  same 
computer  that  is  in  demand  by  (perhaps)  hun- 
dreds of  schoolchildren.  This  makes  it  unlikely 
that  a  child  using  a  computer  at  school  will  be 
able  to  sample  and  fully  experience  the  full  range 
of  software  that  his  or  her  school  can  afford. 

At  home,  on  the  other  hand,  a  child's  family 
might  buy  two  or  three  dozen  packages,  and  the 
child  will  have  the  opportunity  to  fully  experience 
all  of  them. 

The  lesson  here  is  that  the  impact  of  computers 
will  be  much  greater  on  kids  learning  at  home. 

A  Riot  Of  Computer  Learning 

In  recent  columns,  I  have  discussed  educational 
computing  in  the  classroom  and  in  the  home.  In 
one  column,  I  wrote  about  the  "riot"  of  learning 
that  will  soon  be  taking  place  in  homes  that  have 
computers.  I  called  it  a  riot  because  computer 
learning  at  home  will  be  spontaneous,  uncon- 
trolled, and,  perhaps,  destructive. 

Parents  have  always  depended  on  teachers 
to  provide  formal  instruction  for  their  children, 
especially  in  basics  such  as  arithmetic,  writing, 
and  reading.  Now  there  are  dozens  of  math  drill 
programs,  typing  tutors,  spelling  instructors,  and 
reading  "games." 

Parents  are  buying  these  programs  and 
turning  the  computer  into  a  vehicle  to  teach  these 
skills  at  home.  But  in  most  cases  the  computer 
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"tutor"  will  not  have  a  parent  looking  over  its 
shoulder.  The  tutor  will  be  teaching  the  child,  but 
its  lessons  won't  be  integrated  into  a  balanced 
curriculum  especially  suited  for  the  child. 

And  this  is  just  the  beginning.  The  computer's 
effect  on  home  learning  w  ill  soon  increase  dramati- 
cally. At  the  end  of  the  next  twelve  months  there 
will  be  software  on  the  market  to  teach  every  con- 
ceivable subject  or  skill  to  kids  of  almost  every 
age.  There  will  be  geography  programs,  programs 
to  teach  chemistry,  astronomy,  art,  dancing, 
songwriting,  juggling,  current  events,  and  world 
religions. 

Parents  will  buy  this  software,  but  kids  will 
be  expected  to  use  it  on  their  own. 

Tlie  Cereai-Box  Strategy 

Schools  and  families  will  buy  millions  of  educa- 
tional programs.  Schools  will  buy  programs  only 
after  they  have  evaluated  the  programs'  pedagog- 
ical soundness  and  relevance  to  teachers'  existing 
curricula. 

How  will  parents  choose  among  the  hundreds 
of  educational  programs  on  the  market?  They  will 
buy  programs  the  way  they  buy  everything  else. 
They  will  choose  a  particular  package  because: 

•  Their  child  responds  to  an  ad  on  the  back  of  a 
box  of  cereal  by  crying,  "I  want  that  program. 
Mommy!"  And  how  can  the  mommy  refuse?  After 
all,  the  program  is  educational.  And  it's  a  lot  better 
than  getting  the  kid  the  laser  blaster  that  was  ad- 
vertised on  the  box  of  cereal  the  family  finished 
last  week. 

•  Software  will  soon  be  on  sale  at  special  software 
stores  and  at  almost  every  sales  oudet  imaginable, 
including  local  convenience  marts,  department 
stores,  bookstores,  drugstores,  beauty  salons, 
hardware  stores,  and  supermarkets.  It  will  be 
sold  alongside  how-to  manuals,  mass-market 
books,  and  other  inexpensive  consumer  items.  It 
will  become  as  cheap  and  as  convenient  to  buy  as 
a  detective  novel,  a  romance  novel,  or  a  carton  of 
milk. 

•  Software  will  soon  be  packaged  as  glossily  as 
cosmetics  and  rock  records.  Ads  on  TV,  on  the 
radio,  and  in  stores  will  make  buying  software  as 
appealing  as  buying  a  new  kind  of  lipstick,  deodor- 
ant, sports  car,  or  diet  soda.  It  will  look  like  an 
offer  that  can't  be  refused. 

•  Buying  software  will  help  people  keep  up  with 
their  neighbors  who  are  also  buying  software  for 
their  kids.  After  all,  a  responsible  parent  can't  sit 
still  and  watch  her  kids  slip  behind.  And  even  the 
President  of  the  United  States  admits  they're  not 
getting  the  education  they  need  at  school.  The 
only  way  to  get  the  kids  educated  is  to  give  them 
an  early  start  on  learning  at  home.  And  the  only 
way  that  can  be  managed  is  with  a  computer - 
and  lots  and  lots  of  software. 


YOUR  PROBLEM  IS  SOLVED! 

Now  you  can  relyonP>(Ce  forONE  STOP  thopplng  tor  all  your  Micro  Computer  needs.  Wehava  picked  out  the  BEST  2000  Programs, 
Boole*  and  Accessories— covering  all  the  major  brands  and  pjtthem  Into  ore  friendly  store.  And,  this  is  backed  up  by  THOUSANDS  of 
addltlonaNtemsweatockinourcentralwareliouse,  ready  for  overniglit  shipping  to  ourstofBS.  Magazines?  You  bet!  We  carry  almost  60 
different  Micro  Magazines  on  our  raeksl  Plan  to  visit  us  soon.  Can't  visit?  Then  you  can  order  from  our  gigantic  product  list- 
Just  write  for  your  ffl££, persona!  copy  TODAY! 


pace 


For;  VIC-20 


THE  VtC-20'  CONNECnOfl 

By  James  W.  Coffron.  Learn  the 
simple  t@chn»que3  for  potting  your 
VIC   lo  work  cootfoliino  entfttBal 
devices:  lights,  alarms  elc.  Sottcover. 
7"  X  9"  (ormat.  260  P»80»- 

4TQ5Kxx>i2a  t  r.as 

YOUR  FIRST  VIC-20"  PflO- 

.    ORAM  By  Rodney  Zaks  Wfite 

your  first  BASIC  program  in  one 

hourl  First  time  uaergulde,  ages  8 

7"  X  11^1 50  Pages. 


to  88!  Soil  cover. 
'  4T05-OOO1  2fl 


t    Q.S9 


COMPUTERS    FOR    KIDS: 
VIC-20'  Edition  By  Sally  Green- 
wood Larsen.  Tailored  toreven  the 
younQest  child,  il  has  full  instruct- 
ions on  writing  programs  lor  gra  phics, 
£alculfltionsand  more!  Special  section  oi 
tips  for  leachers/parents.  Sottcover.  1 1 ' 
X  S'/i"  formal.  70-oius  pages  iong. 
4108-000042  $    5.95 

HOW  TO  USE  THE  COMM- 
ORODRE'  VIC-20"  By  Jerry 
lAriiiia  and  Deborrah  Willis.  The 
bogir^ner's  text.  Includes  a  special 
Problem-Solving  section  for  any  diffi- 
culties you  might  encounter.  Sottcover 
SVi'Xe'A'.  124  Pages. 
4250O00134  t    3.95 

VIC-20'  PROGRAMMER'S  REFERENCE 
GUIDE  Corn modore.Compfete  BASIC  vo- 
cabulary guide,  machine  language  guida, 
tips,  tricks,  shcrt-culs  and  general  oper- 
ations. Gekings  lieside  your  VIO  SoltXJvef. 

Spiralbound.  290  Pages. 
4760-021948  tie.SS 

COMPUTEl's  FIRST  BOOK  OF  VIC"  A 

oomtiBlion  d  artfciee  frem  Compute  Magazkn 
4105-000007  Soft,  212  Pga.     tf2.BS 


THE  EASY  GUIDE  TO  YOUR 
.  ATARI*  400/800'  By  Joseph 
Kascmer.  Jargon-free  operating 
manual  Shows  the  easy  way  to  use 
your  Atari. .  .word  processing,  math. 
.  budgeting,  filing  and  morel  Ttie  aasisst 
way  to  start  using  your  computerl  Sottcover. 
SW  X  8V."  formal  160  Pages. 
47B5-000125  •    7.85 

SAStC  EXERCISES  l=OR  THE 
ATART  By  J.  P.  Ijmoitler  Laam 
true  style  and  subtleties  of  Atari 
BASIC  through  actual  ptBctioe.  Grad- 
uated exoftasea  in  math,  business,  opor 
^  ations  research.  garT^es  and  atatistica 
Each  exercise  contains  a  statement  and 
analysis  of  Ihe  problem,  a  sokjtion  with  How- 
chart  anda  program  with  detailed  explan- 
ation. Softcover.  7-  X  11 ".  251  Pages. 
4795-000101  »12.9S 

YOUR  FIRST  ATARI*  PflO- 

.    ORAM  By  Rodney  Zaka  Write 

your  firsl  BASIC  program  in  1  -houil 

For  first  lime  users,  ages  8  lo  86. 

See  how  simple  learning  to  write  a  pro- 

giam  can  be!  Sottcover.  T'X  1  r.  1 50  Pas 

4T95-00O1  30  g    *  Q. 
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HOW  TO  USE  THE  COMM- 

,      0DORE*«4'ByJerryWiilis4 
Deborrah  Willis  Allyou'lf  need  to 
v^j-     know  to  successfully  operate  your 
^^  C-64.  Good  tjoginning  text  and  irxriudes 
a  Problem-Solving  section  for  any  diffi- 
culties you  might  encounter.  Softcover. 

SVi"  X  S'/i~  format.  1 2-1  Pages. 
4290-000133  (    3.99 

"THE    COMMODORE*    64' 

BASIC  HAN  [}B0OK  By  Douglaa 
"^Hergert.  Need  to  check  or  clarify 
a  BASIC  keyword  or  function?  Do  i I 
'quicWy  wrth  this  dctionary'-styie  hand- 
book. Clear  descriptrons  and  examples 
of  the  BA's  vocabulary.  Fully  explained  in 
easy  lo  understand  Engilsh.  Sottcover,  6'A"  X 
8W  format.  1 70  Pages. 
470S-OOO11B  •   9.95 

I    I       ^,    ,11    THE  EASY  GUIDE  TO  YOUR 
'  V         COMMODORE*  way  Joseph 

Kascmer.  Jargon-free  companion 
',.  '  tells  you  how-to-do-itf  Word  pfocess- 
U  ing  math  calculations  .tjudgeting,  tiling 
p-  arid  mom'  Softcover.  S'A"  X  av.'.  1 60  Pss 
4795-000128  *    7.99 

'  32  BASIC  PnOORAMS  FOR 
''THE  COMMODORE  «*'  By 
^Tom  Rugg.  Phil  FeWman*  Gene 
■  Moore.  Written  by  experienced 
,  '^programmera.  eec^  o*  tt»  32  chacriers 
isfuily  documented  and  bug-free.  Can 
also  tie  easily  adapted  using  the  authors' 
suggestkjns.  And,  if  youVe  a  working  know- 
ledge of  BASIC,  you  '11  be  belter  able  !o  de- 
wsa  and  implement  your  owr  changes  Among 
some  of  the  prc)gram3:  Biorhylhm.  Check- 
book. Kaloick),  SpajWe.  Mam.  Vocab,  Curve. 
Decide.  Birthday  and  more!  Softcover.  5'A" 

X  B'A"  formal  350  Pages. 
4250000112  t19.9S 

4290-000180  Books  Disk         t2B,9e 

USINOTHE  COMMODORE* 

04' INTHE  HOME  By  William 
^Be  hrendt  S  hank  L  iubrach.  Begln- 
'  ner-expert,  kids-adults,  can  now 
''have  20  programs  that  include  home 
management  and  games  tt^t  wouki  cost 
'hundreds  of  dollars  if  bought  separately 
Hel^  leach  tjasic  programming  techniquee. 
Sample  runs  included.  Sollcover, 
4S9O-940O72  SIO-M 

COMMODORE*  84'  COMP- 
UTING By  Ian  Sinclair.  Both  an 
''intro  how-to  and  a  reference  man- 
'  ual.  Discusses  set  up.  operations 
'and  covers  special  features  such  as 
Sprite  graphics,  color  commands  and 
pr<>gramming  for  sound.  Illustrated  with 
BASIC  examples  Softcover. 
4890-192308  (12.99 

'SPRITE  GRAPHICS  FOR 
'THE  COMMODORE*  84-  By 
p.^'Saiiy  Larsen.  For  beginners,  an 
Intro  to  Sprite  graphics  on  the  Com- 
,  modore  63— the  documentation  that 
is  lacking  when  they  buy  Iheir  64.  Covers 
how  lo  use  Sprites  for  Ihe  practical  tools 
iheyara  and  include52S  ready-to-run  pro- 
grams Softcover.  »  .  _. 
4690-838138  915.99 


For:  Timex/Sinclair 


CONTROL  THINGS  WITH 

„     YOUR     TIMeX*/SINCLAIR* 

.    By  Robert  L.  Swarts.  Looking  tor 

,.    iowcoslwaysloexpandcapabiiities? 

-    Wtthafowinexpensiveoerta>«jrTS1000 

can  be  taught  to  control  lights,  alarms. 

"appliances  and  ntwre!  Sctoover.  SV  X  B'fi'. 

80  Pages  Average  protect  costs  under  $10! 

42S0-000127  *    6.95 

PRICES  &  AVAILABILITY 
SUBJECTTO  CHANGE 


,  OlMMODORE*  84'  USER^ 

QUI  DE  By  Tim  Onoako.  Bra  nd 


OLIVETTI®  JET  INK  PRINTER 


The  Olivetti  PR2300  Jet  Ink  Printer 
uses  a  single  jet  printing  head  to  direct 
carbon  pailicfes  onto  regular  paper 
in  a  7  X  7  dot  matrix.  The  desk  top  unit 
prints  a  full  96  ASCII  characters  with 
7  other  foreign  language  and  symtiol 
sets  orsoftware  that  are  selectable. 
If  prints  at  up  to  50  bi-directional  lines 
per  minute  for  a  full  80  columna  Unit 
offers  normal,  compressed,  double 
height,  double  width  and  bold  printing  with  either  single  ordouble-line 
underlining.  Standard  Centronics  or  RS232Clnterfface  required/avail- 
able. Call  or  write  us  for  information. 
5655-002300  Parallel  Printer(Reg.  560.00)  SALE  $529.99 


5655-012230  Replacement  Cartridge 


SI  0.95 


SPECIAL  DISK  SALE! 


5320-001 001   Elephani  Single-Sided.  Single  Densily.SV.".  Box/ 10  SI  7.99 

5320-001002  ElephanlSingle-Sided.DoubleDensity.S'.V,  Box/10  S21,99 

5320-001003  EiephanlDouble-Sided.  Double  Density.  5'/.",  Box/ 10  S25.99 

4540-461910  3-ri1Single-Sided,DoubleDensity,5"<",Box/10  S22.99 

4540-462210  3-tv1  Double-Sided.  Double  Density,  5V<",  Box/10  $31.99 


SAVE  UPTO20%ON  THESE  POPULAR  GAMES 


GAMES/VlC-20 


RECREATION  6  PAK  Commodofa  Casino- 
blackiacli;  Car  Chase:  Blue  fileanies  from 
Ouler  Space;  Slither-Super  Slithery  Bio- 
rhylhms  and  Space  Math.  e-Cassetles. 
4100-000106  (Reg.  59.95)  t47.BB 

ASTFOaUTZ  Creauve  Soltware  CoiortuI 
and  fast  arcade  •Defende<'-st>te  game  Cart. 
4200-000129  (Reg.  39.951  $31.85 

SIDEWINDER  Tionix.  Unlimited  firepower 
IS  your  only  advantage  as  you  protect  the 
Earth's  last  radar  tower'  Joystici</Datasetta 
5642-102004  Cass(Heg29.95)*23.95 
FAST  EDDIE  SiriuS-  New.  last  action  ver- 
son  of -Don  key  KorQ"lof  the  VIC".  Cartridge. 
♦770-022003  Cart  (Reg  39.95)  $31. B5 

TURMOIL  FSirius.  Fast-paced  aicade-styte 
game  lor  the  VtC.  Joystick  opilonal.  Cart. 
4770-022005  Cart  {Reg  39.95)  $31.95 
DEADLY  DUCK  Sinus  Dodge  the  bricks  as 
you  try  to  shool  down  Ihe  ftying  cratKl  Watch 
out  for  the  fireflies' Joysiickoptionai.Cart- 
4770-022004  Cart  IReg  3*-95)  $27.99 
SNAKE  BITE  SiriuS.  New  challenge  tor 
rTHze  lovers— sMher  your  way  alona  chomp 
ing  apptes— ixjt  vrtisch  out.  cause  you  grow 
biooer  and  you  can't  touch  Ihe  walls!  Cart. 
47fO-022031  Cart  (Reg  29  95)  $23.68 
RIVER  RESCUE  Thorne^MI  Fast  actkw, 
i^ht  to  left  scfotling  game  JoysSick-Can 
4325-022001   (fleg.  39.951  $31.99 

CHOPLIFTER  Creative  Software.  Ouick 
reaotkjn  helicopter  rescue  game.  Cartridge 
4200-000119  (Reg.  39.95)  $31.85 


GAMES/COMMODORE  64 


DCADIJ  NE  Commodora/lnlocom.  Keytjoaid/ 

Text  Murder  Mvaterv  Adventure!  Disk 
41CK>-Ofl4e2e  IJisk (Peg  49.95)  $39.99 
FROGGER  Sierra-On-Line.  Help  Frogger 
surviwelhe  perils  of  highway  and  Ihe  rush- 
ing river!  64  version  oft  he  popular  arcade 

game.  Disk. 
5783-254251    Disk(Reg34.96)  $27.99 
REPTON  Sinus.  High-speed,  graphically 

realistic  space  battle!  Disk 
4770-030003  Disk  (Beg  39,95)  $31.95 
FROGMAN  OEM  Maie-lype  game  for  1 
Of  2  players.  Gather  pearls  tjetore  ttw  stiarks 
attack!  Kill  sha  riss  and  win  more!  Cart  ridge. 
S648-0001  01  Cart,  (Reg.  32,95)  $26.39 
SPACE  RESCUE  HESWARE.  Benji  helps 
exercise  your  knowledge  of  astro  physics 
and  the  visible  solar  system.  Educational 

fun!  Disk.  64K  reqijired. 
4428-000110  Disk  {Reg  44.95)  $35.95 
CHOPLIFTER  Brodertiund  Quickrescue 
Ihe  B4  captured  citizans.  Fight  oft  enemy 
tanks,  planes  and  satellites  as  you  do! 
5098-00023 1    Disk  (Reg  44,95)  $35.95 


GAMES/ATARI  400/800 


CASTLE  WOLFENSTEIN  Muse.  You  must 
escape  from  the  Nazis  In  this  popular  ad- 
venture. Disk.  Requires  32K. 
55T4-392422  (Reg.  29.95)  $23.99 

2AXX0N"  Dalasofl.  Atan  version  o(  the 

fast  paced  arcade  action  game.  16K  Rea 
5206-323330  Cass.(RBg3B.95)$31 .99 
5206-323030  Disk  (Reg  39-95)  $31.99 


T^-fCyMiew  eflorl  that  is  the  only  source 
i^VvX  covering  all  3  versions  of  the  C-64, 
'^^'wlth  intoon  both  classroom  and  port- 
J!'  able  models.  Softcover. 
4690-000380  $14.BS 

THE  ELEMENTARY  64"  Oatamost.  Pro- 
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Help  From  Software  Publishers 

Can't  parents  depend  on  educational  publishers 
and  computer  companies  to  advise  them  in 
making  their  purchases? 

Not  likely.  Educational  publishers  and  com- 
puter companies  will  likely  have  little  or  no  interest 
in  coordinating  the  software  that  children  use  at 
home  and  the  software  they  use  in  school.  Nor 
will  they  be  concerned  with  how  their  software 
fits  into  a  child's  development  and  into  his  or  her 
learning  experiences. 

That's  why  the  average  home's  computer 
learning  environment  will  be  riotous.  Most  par- 
ents won' t  have  the  training  or  the  time  to  properly 
select  educational  software.  Nor  will  they  have 
the  skill  to  build  that  software  into  a  comprehen- 
sive "Home  Learning  Program"  for  their  children. 

Schools  have  this  training  and  skill,  but  they 
are  not  currently  part  of  the  home  software  selec- 
tion and  evaluation  process. 

Islands  Of  Learning 

I  see  two  islands  of  learning  that  will  soon  be 
created  by  computers.  One  island  will  be  the 
school,  the  other  the  home. 

In  the  school,  computer  learning  will  be  struc- 
tured, well  organized,  well  thought  out,  properly 
sequenced,  comprehensive,  and  pedagogically 
sound.  Unfortunately,  it  will  also  be  minimal, 
since  each  kid  will  have  an  absurdly  small  amount 
of  time  using  any  particular  package.  The  effect 
of  computer  learning  at  school  will  be  diluted  by 
the  huge  number  of  kids  trj'ing  to  share  a  few 
computers. 

In  the  home,  computer  learning  will  have  a 
great  impact,  because  kids  will  have  the  opportu- 
nity to  spend  a  great  amount  of  time  on  the  com- 
puter and  richly  experience  each  program.  Also, 
there  is  great  potential  for  home  learning  to  be 
exceptionally  creative,  open-ended,  informal, 
self-motivated,  and  self-guided. 

Unfortunately,  this  potential  probably  won't 
be  realized.  Children's  home  computer-learning 
will  be  blunted  by  a  lack  of  any  plan;  by  lack  of 
coordination  with  a  child's  physical,  emotional, 
social,  and  intellectual  development;  by  a  lack  of 
non-computer  learning  activities  that  support  the 
computer  instruction;  by  improper  sequencing  of 
materials  and  concepts;  and  by  the  gaps  in  learning 
caused  by  a  family's  arbitrary  purchase  of  software 
packages. 

Looking  Ahead 

If  present  trends  continue,  and  schools  and  homes 
become  islands  of  computer  learning,  what  will 
be  the  result?  What  will  be  the  effect  of  computer 
learning  on  our  children?  What  kind  of  kids  will 
we  be  turning  loose  in  the  public  schools?  How 
frustrated  will  computer-literate  kids  become 
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when  they  don't  find  the  same  computer  resources 
at  school  that  are  available  at  home?  Will  non- 
mainstream  kids  be  left  behind?  And,  if  so,  how 
will  they  ever  catch  up?  (They  won't  catch  up 
after  they  leave  school.  In  the  future,  the  average 
workplace  -  factory  or  office  -  will  be  even  more 
computerized  than  the  average  home.) 

If  present  trends  continue,  there  is  the  possi- 
bility that  the  effect  of  computer  learning  at  school 
will  be  minimal.  It  is  Ukely  that  the  effect  of  com- 
puter learning  at  home  will  be  profound,  yet  it 
may  also  be  profoundly  destructive.  It  is  also  pos- 
sible that  the  enormous  potential  of  computer 
learning  at  home  and  at  school  might  never  be 
realized. 

Can  we  permit  this?  Are  there  any  alternatives? 

Building  Bridges 

There  are  alternatives.  We  can  link  computing  at 
home  and  computing  at  school.  We  can  build 
bridges  between  these  islands  of  learning.  The 
bridges  will  permit  a  two-way  flow  of  expertise 
and  resources.  The  sharing  of  computers,  soft- 
ware, and  learning  strategies  can  make  it  possible 
to  realize  the  computer's  great  potential  as  a  learn- 
ing tool  for  children  and  their  entire  family. 

Ken  Komoski'splan  for  building  these  bridges 
is  similar  to  my  own.  Ken  (in  his  MlCROgraiii  and 
elsewhere)  stresses  "concrete  programs  and  poli- 
cies." I  emphasize  communication.  Both  elements 
are  important.  What  we  need,  at  minimum,  is: 

1.  Commujuty-widcTraiiihi;^.  Teachers,  par- 
ents, and  children  need  to  attend  common  training 
sessions  to  learn  how  to  use  computers  and  how 
to  evaluate,  select,  and  get  the  most  out  of  educa- 
tional software. 

2.  Community-wide  Access.  Parent-teacher 
organizations  should  set  up  computer  cooperatives 
to  evaluate  computer  software  and  hardware  sold 
by  local  vendors.  Discounts  (Ken's  idea)  should 
be  offered  to  parents  who  buy  the  computers  and 
software  recommended  by  the  cooperative.  Low- 
income  families  in  the  community  should  get 
special  deals:  computers  and  software  should  be 
available  for  families  to  lease,  lease-purchase,  buy 
at  a  discount,  or  check  out  from  a  co-op  library. 

3.  Communication.  The  co-op  should  hold 
regular  public  meetings  and  publish  a  monthly 
newsletter  to  make  all  the  parents  in  the  commu- 
nity aware  of  the  diverse  aspects  of  educational 
computing,  including: 

•  Past,  present,  and  planned  applications  of 
computers  in  the  school  (by  teacher,  subject, 
and  grade). 

•  Educational  applications  of  computers  in 
local  homes  (by  manufacturer,  name  of  soft- 
ware, subject,  age  of  children). 

•  Recommendation  of  the  best  new  educa- 


tional  software  and  hardware;  results  of 
evaluations  and  tests  performed  at  local 
schools  and  by  local  parents. 
•  Opportunities  for  Action:  Community  Com- 
puter Faires,  Computer  Flea  Markets  and 
Yard  Sales,  Parents'  Brag  Nights,  involvement 
in  software  and  hardware  evaluation  com- 
mittees, donation  of  used  hardware  and  soft- 
ware to  the  co-op  library,  etc. 

4.  Sharing.  The  co-op  needs  to  set  up  libraries 

of  hardware  and  software. 

Families  will  be  buying  much  more  hardware 
and  software  than  schools.  And  they  will  be  going 
through  it  much  faster.  The  co-op  should  get  families 
to  donate,  loan,  or  sell  (at  a  discount)  the  old  soft- 
ware and  hardware  that  their  kids  have  outgrown. 
This  strategy  will  create  an  enormous  reservoir  of 
materials  that  can  be  used  in  the  classroom  and 
by  families  who  otherwise  would  have  no  access 
to  them. 

In  addition,  this  strategy  will  create  a  Supply 
Depot  of  computer  parts,  including  disk  drives, 
cables,  monitors,  computer  circuit  cards,  wires, 
plugs,  and  connectors.  Since  computer  models 
change  so  rapidly,  this  Depot  could  become  an 


invaluable  resource  for  the  schools  and  the  com- 
munity at  large .  Having  backup  computer  supplies 
will  make  it  possible  to  keep  computers  up  and 
running  for  longer  periods  of  time.  It  will  make  it 
possible  to  put  more  students  on  the  computers 
and  allow  the  students  to  use  a  wider  variety  of 
software  packages. 

What  Do  You  Think? 

I  am  convinced  that  the  most  important  area  in 
educational  computing  will  be  what  is  done  to 
link  educational  computing  in  the  classroom  and 
in  the  home. 

What  do  i/ou  think? 

I  would  like  to  hear  your  ideas  about  this 
subject.  Is  it  important?  Will  it  become  more  im- 
portant in  the  future?  What  are  some  of  the  dan- 
gers if  nothing  is  done?  What  are  some  of  the 
strategies  we  can  adopt  to  link  computing  in  the 
classroom  and  the  home?  What  issues  haven't  I 
covered? 

Write  to  me  directly: 

Fred  D'Ignazio 

2U7  Carter  Road,  SW 

Roanoke,  VA  24015  © 


Unlock  Yottr  Creativity 

Commodore''64  Cobr  Sketch  F^ 

Whether  you're  six  or  sixty-six,  you  can  use  high  resolution  graphics 
and  color  to  DOODLE!  Draw  up  a  house  plan,  sketch  a  landscape, 
create  a  colorful  rnasterpiece  or  just  "doodle."  On-line  MENUS 
make  DOODLE  easy  to  use;  100%  machine  language  means 
instant  response.  With  your  Cornmodore  64  and  joystick  or 
WICO®  Trackball  you  can: 

•  DRAW  pictures,  and  PAINT  with  8  "brush"  sizes. 

•  ZOOM  in  to  draw  fine  detail. 

•  Instant  BOXES  and  straight  LINES  anywhere  on  your  screen. 

•  DUPLICATE,  Enlarge,  Stretch,  Squeeze  or  Rotate 
any  part  of  your  doodle. 

•  Instant  NEGATIVE  or  MIRROR  IMAGE  of  a  doodle. 

•  SAVE  your  doodle  on  a  disk.  LOAD  it  in  to 
doodle  some  more. 

•  PRINT  your  doodle  on  C'^A  QR 
many  popular  printers.  •jSJ 


For  information,  your  nearest  dealer,  or  lo  order  direct,  CALL  TOLL  FREE: 
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735  W.  Wisconsin  Ave.  |B 

Milwaukee,  WI  53233 
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Merging  BASIC  Programs 
From  Commodore  Disk 


Jim  Butterfield,  Associate  Editor 


It's  often  very  useful  to  be  able  to  merge  tzoo  programs. 
Here,  jun  Butterfield  steps  through  a  disk  merger  program 
tlmt  is  helpfid  also  in  understanding  hoiv  programs  are 
formatted  and  stored  on  disk.  For  all  Commodore 
machines. 


Programs  can  be  merged  using  a  curious  technique 
with  cassette  tape  -  see  "BASIC  Program  Merges: 
PET  And  VIC,"  COMPUTE!,  June  1982,  page  158.  We 
can  also  do  a  disk  merge  in  a  much  more  straight- 
forward manner. 

Disk  Advantages 

With  disk,  we  can  have  several  files  going  at  the 
same  time.  Thus,  we  can  read  two  separate  pro- 
grams and  write  out  the  new  combination  program 
as  a  single  activity. 

With  a  disk  unit,  we  can  read  in  programs  as  if 
they  were  sequential  files.  This  means  that  we  can 
manipulate  a  program  as  if  it  were  data;  for  that 
matter,  we  can  write  a  data  file  which  may  be  later 
used  as  a  program.  This  opens  the  door  to  sophisti- 
cated activities,  such  as  programs  that  analyze  other 
programs,  or  programs  that  write  programs. 

The  Merge  Program 

To  show  how  it's  done,  and  to  provide  a  useful 
capability,  we'll  walk  through  some  simple  pro- 
gramming which  will  merge  two  programs.  This 
MERGER  program  will  work  on  all  Commodore 
disk-based  systems:  VIG-20,  Commodore  64,  and 
PET/CBM.  It's  written  in  BASIC  to  enable  you  to 
see  how  everything  works. 

As  we  walk  through  the  program  lines,  we'll 
point  out  special  considerafions  that  we  need  to 
take  into  account  when  reading  and  writing  pro- 
gram files  (as  opposed  to  data  files). 

First,  we  identify  the  program: 
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100  PRINT  "PROGRAM  MERGER" 

Each  of  the  two  input  files  will  have  individual 
working  values.  For  example,  C$  is  the  line  of  code 
we  are  working  on;  N  is  the  line  number.  Let's  make 
room: 

110    DIM  A$(2),B$(2),C${2),N(2) 

Let's  open  the  error  channel  so  we  can  spot 
problems: 

120   OPEN   15,8,15 

Now  we'll  ask  for  the  name  of  the  first  program 
to  be  merged.  We'll  OPEN  the  file  as  a  program 
(note  the  ,P  for  Program),  then  we'll  check  for  prob- 
lems and  quit  if  we  see  trouble: 

130  INPUT  "PROGRAM  1";X$ 

140  OPEN  l,a,2,X$+",P,R" 

150  INPUT#15,E,E$,E1,E2 

160  IF  E  THEN  PRINT  E$:  CLOSE  15:  END 

One  extra  thing  to  do  here.  The  first  two  bytes  of  a 
program  file  contain  the  program's  start  address. 
We  will  assume  that  we  won't  need  this  information, 
since  VIC  and  64  programs  will  relocate  automat- 
ically, and  PET/CBM  programs  must  start  at  ad- 
dress 1025.  Finally,  we'll  grab  the  first  line  of  the 
program  by  calling  subroutine  420  (more  on  this 
when  we  reach  it). 

170    GET#1,A$,A$;    J=l :    GOSUB    420 

We're  ready  to  repeat  the  sequence  for  program 
two.  In  this  case,  we'll  allow  the  user  to  reply  "N" 
in  order  to  specify  that  no  program  two  exists.  In 
such  a  case,  we'll  merge  program  one  with  nothing, 
and  just  copy  program  one.  But  there's  a  bonus 
which  we'll  discuss  later. 

180  INPUT  "PROGRAM  2  (OR  'N')";X$ 
190  IF  X§="N"  THEN  N(2)=1E9:  GOTO240 


INSTA 
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Commodore  Dealer  nearest  you.  Insta-Series— you're  communicating  with  the  ftjture— IVIowI 


THE  INSTA-SERIES  iS  DISTRIBUTED  BY  MICROSCI  lyiARKEDNG,   DIVISIOlV  OF  STANDUN  CONTBOLS.  INC.  2158  HATHAWAY  STREET.  SANTA  ANA. 


CALIFORNIA  92705  TELBC  9ia-346^b739.  FOR  A  I7"x22"  COLOR  POSTER  OF  "INSTA",  SEND  SB  (CHECK  OR  MONEY  ORDER)  TO  MICRO-SCI  /MARKETING. 
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200  OPEN  2,8,3,X?+",P,R" 

210  INPUT#15,E,E$,E1,E2 

220  IF  E  THEN  PRINT  E$ :  CLOSE  15:  END 

230  GET#2,A$,A$:  J=2 :  GOSUB  420 

Now  we'll  ask  for  the  name  of  the  new,  merged 
file  that  we  are  about  to  create.  We  OPEN  with  ".. 
,P,W";  in  other  words,  program  file  in  write  mode. 

240  INPUT  "NEW  FILE";X$ 

250  OPEN  8,8,8, "0;"+X$+",P,W" 

260  INPUT#15,E,E?,E1,E2 

270  IF  E  THEN  PRINT  E$ :  CLOSE  15:  END 

You  may  recall  that  we  threw  away  the  start 
addresses  from  our  program  input  files.  Before  we 
start  to  write  our  output  file,  we  must  insert  a  start 
address  so  that  the  format  is  correct.  VIC  and  64 
won't  care,  but  PET/CBM  needs  an  address  of  1025, 
so  that's  what  we'll  supply  in  two  bytes: 

280  PRINT#8,CHR$(1);CHR5(4); 
290  REM  COMPARE  LINES  HERE 

The  above  REMarks  line  says  it  all.  We  have  a  line 
from  each  program.  The  line  numbers  are  held  in 
N(l)  and  N(2).  We  wish  to  take  the  lowest  line 
number;  if  they  are  the  same,  we'll  take  from  file 
two: 

300   x=2 

310    IF   N(1)<N(2)    THEN   X=l 

When  we  reach  the  end  of  a  file,  we  make  the 
line  number  impossibly  large.  If  both  line  numbers 
are  way  up  there,  we  are  finished  and  can  wrap  up 
our  output  file: 

320    N=N{X):IF    N>1E8    GOTO    380 

Now  we're  ready  to  print  the  BASIC  line  from  file  X 
(X  is  1  or  2).  We'll  need  to  know  the  format  in  more 
detail.  The  first  two  bytes  of  each  line  are  called  a 
"forward  link."  We  don't  need  to  work  them  out 
precisely:  provided  they  are  not  zero  bytes,  they 
will  be  rebuilt  when  the  program  is  loaded  into  the 
computer.  So  we  can  print  a  couple  of  CHR$(l)'s. 

The  next  two  bytes  are  the  line  number,  in 
binary.  We  happen  to  have  this  information  in 
bytes  A$(X)  and  B$(X)  -  we  obtained  this  in  the 
subroutine  at  420  -  and  we  can  just  print  them. 

The  line  of  BASIC  follows.  That's  in  C$(X); 
and  the  line  must  be  followed  by  a  binary  zero,  or 
CHR$(0),  to  terminate  it  properly.  So  the  whole 
line  goes: 

3  30    PRINT#8 , CHR5 ( 1 ) ; CHR$ ( 1 ) ; A$ (X ) ; B$ (X) ; C 
$(X);CHR${0); 

Now  we  want  to  replace  the  line  we've  just 
used.  We  could  read  from  file  X  with  a  call  to  420 
-  but  wait  a  moment.  If  both  line  numbers  are  the 
same,  we  want  to  replace  them  both.  That's  what 
a  merge  is  about:  one  line  overwriting  another 
when  the  numbers  match. 

340    FOR  J=l    TO    2 
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350  IF  N(J)=N  THEN  GOSUB  420 
360  NEXT  J 

We've  handled  the  line  in  question.  Let's  go  back 
and  do  some  more. 

370    GOTO    300 

If  we've  reached  the  end  -  no  more  input 
lines  -  we  terminate  the  output  file  with  two  zero 
bytes  (a  "null"  forward  hnk)  and  close  down. 

380  PRINT#8,CHR$(0)?CHR$(0); 

390  CLOSE  1:  CLOSE  2:  CLOSE  8:  CLOSE  15 

400  END 

410  REM  READ  LINE  OF  BASIC 

Here  comes  our  subroutine  to  read  from  file 
number  J  (J  may  be  1  or  2).  First,  we  grab  the  first 
two  bytes  (the  "forward  link").  We  don't  need 
these,  except  for  one  thing:  if  thev  are  both  zero 
bytes,  we  are  at  the  end  of  the  BASIC  program. 

Zero  bytes  arrive  in  an  odd  way.  You'd  think 
that  the  GET  statement  would  receive  the  equiva- 
lent of  CHRS(O),  a  single  character  containing 
zero  bits.  Nope.  Due  to  an  eccentricity  of  BASIC, 
they  arrive  as  a  "null  string";  no  bytes  at  all.  So 
that's  what  we  must  test  for: 

420    GET#J,A'5,B$ 

430    IF   A$=""    AND   B$=""    GOTO    540 

Now  we  go  for  the  line  number,  which  we 
read  into  A${J)  and  BS(]).  If  they  happen  to  be 
null  strings,  we  correct  them  to  CHR$(0).  Once 
we've  done  that,  we  can  calculate  the  value  of  the 
line  number  and  put  it  into  N(J): 

440  GET#J,A$(J),B?(J) 

450  IF  A${J)=""  THEN  A$ ( J )=CHR$ ( 0 ) 

460  IF  B5(J)=""  THEN  B? ( J )=CHR$ ( 0 ) 

470  N(J)=  ASC(A$(J))+  ASC(B$(J))*256 

We've  arrived  at  the  BASIC  line  text  itself. 
Let's  gather  it  into  a  string  called  CS(J).  As  we 
collect  the  bytes,  we  must  watch  for  the  zero  byte 
(or  null  string,  to  us)  that  flags  end-of-line: 

480    C?(J)="" 

490    GET#J,A$ 

500    IF   A$=""    GOTO    550 

510    C$(J)=C$(J)+A$ 

520    IF    ST=0    AND    LEN(C$ ( J ) ) <254    GOTO    490 

The  above  line  checks  for  anomalies.  If  ST  is  not 
zero,  we've  reached  the  end  of  file,  or  we're  having 
trouble  with  the  disk  interface.  Either  way,  we 
want  to  warn  the  user  or  quit.  And  if  CS(J)  is 
getting  too  long,  we  must  be  into  something  that 
isn't  really  a  BASIC  program,  in  either  case,  we'll 
drop  into  a  warning  statement: 

530    PRINT    "PROBLEM    FILE    ";J 

If  we  see  the  "forward  link"  of  two  zeros  that 
flags  end-of-BASIC,  we  set  the  line  number  to  a 
ridiculously  high  value: 

540    N(J)=1E9 
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•  ESH        -  ergonomic  screen  handler 

•  ISM        -  index  sequential  file  manager 

•  LOS         -  loadable  operating  system 
and  high  level  application  programs  such  as 

•  SMTEXT-  advanced  text  processor. 
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Ask  your  dealer  saou!  Ton  Sofrwarsi 
or  send  jn  me  coupon  for  fuaner  aetata 
Sof^WARE  IMC      ^^^  ordering  information 

Vs*  c^^^^         Qitility  fou  can  attorcf 

1555  Third  Avenue.  Walnut  Creek.  CA  94596 

PLEASE  SEND  ME  MORE  INFORMATION  ON  TOTL  SOFTWARE 

Name: 


Address: 


Zip. 


. .  With  a  wing  load  of  Quality  Software 
for  the  Commodore  64" and  vie  20' 

Once  you've  compared  our  programs,  their  features  and 
prices,  you'll  agree  there's  no  competition  in  sight.  You'll  also 

discover  another  important  reason  to  go  TOTI Customer 

Assistance  After  You  Buy. . .  Something  nearly  unknown  in  the 
low  cost  software  field. 

some  features 

Menu  driven,  Easy  to  use  ■  Available  on  tape  or  disk  ■  Com- 
patible With  Most  Column  Expansion  Hardware  ■  Built- 
in  ASCII  Translation  for  Non  Commodore  Hardware  ■  Color 
Variables  for  Easy  Modification  ■  Machine  language  speed  for 
Word  Processing  and  Mailing  List  &  Label  software. 

and  there  are  5  unique  programs  to  choose  from 

1.  WORD  PROCESSING  has  the  speed  and  versatility  to  produce 
documents,  forms  and  letters  in  a  straightforward  approacfi  ttiat 
is  easily  and  quickly  learned, 

2.  MAILING  LIST  AND  LABEL  lets  you  organize  your  mailing 
lists,  collection  catalogs,  menus,  recipes  and  anything  that  de- 
mands listing  or  sorting. 

3.  TOTL  TIME  MANAGER  tielps  you  plan  schedules  and  analyze 
events  and  activities  by  persons,  project  calagory  and  date. 
Ideal  for  project  plannmg  in  the  home  or  business. 

4.  RESEARCH  ASSISTANT  turns  your  computer  into  an  ad- 
vanced, automated  indexing  and  cross  reference  system. 
A  must  for  the  student,  educator  or  the  research  professional. 

5.  SMALL  BUSINESS  ACCOUNTING  is  a  set  of  straightforward 
accounting  programs.  Frees  the  salesman,  entrepreneur 
or  service  professional  from  time  consuming  record  keeping 
tasks. 


And  in  any  case,  we  return  to  the  calling  point: 
550    RETURN 

A  Caution 

When  you  type  in  this  program,  be  sure  that  lines 
330  and  380  end  with  a  semicolon.  If  you  miss 
this,  you  won't  get  a  program;  you'll  get  a  mess. 
Beginning  programmers  may  not  have  seen 
statements  such  as  GET#J,. . .,  where  a  variable 
selects  which  file  will  be  used.  A  little  thought 
will  reveal  how  it  works  and  will  possibly  open 
up  new  trains  of  thought  on  the  effective  use  of 
BASIC. 

Free  Bonus 

Programs  produced  by  MERGER  will  load  into 
any  Commodore  machine.  As  mentioned  before, 
VIC-20  and  Commodore  64  (and  the  new  B  series) 
will  automatically  relocate  programs  to  the  proper 
address.  For  the  PET  and  CBM,  we  have  supplied 
the  start  address  needed  by  these  somewhat  less 
flexible  loaders. 

This  means  that  a  simple  run  of  MERGER 
with  one  input  program  file  (replying  "N"  to  the 
second  file  name)  will  convert  a  program  into 
PET-Ioadable  form. 

This  is  not  a  wholesale  conversion  program, 
of  course.  A  program  may  be  loadable  to  another 
machine,  but  still  won't  run  because  the  POKEs 
and  PEEKs  are  incompatible. 

Using  MERGER 

You  might  like  to  keep  your  favorite  subroutines 
as  small  programs  on  disk,  and  merge  them  into 
other  programs  as  needed.  Be  sure  to  keep  your 
line  numbers  within  compatible  ranges  so  that 
the  new  program  lines  don't  overwrite  needed 
parts  of  a  program. 

Many  calculation  programs  run  using  DATA 
statements.  If  these  statements  are  saved  as  a 
program  file,  they  can  be  merged  into  the  calcula- 
tion programs  as  needed,  saving  a  great  deal  of 
retyping. 

Perhaps  most  important  of  all:  a  careful  reading 
of  this  program  will  reveal  a  good  deal  about  how 
programs  are  formatted  and  stored  on  disk. 
Copyright  ©  W83     }im  Butlerfield  © 
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Capabilities  To  Your  64  ^ 

•k  The  ability  to  transfer  data  from  any  type  of  device  to  another  (IEEE,  Serial, 
Parallel) 

•k  BASIC  4.0  which  allows  you  to  run  more  PET  BASIC  programs  and  gives  you 

extended  disit  and  I/O  commands. 

•k  The  ability  to  have  several  648  on  line  together  -  sharing  common   IEEE 
devices  such  as  disks  or  printers  with  Spooling  Capablllt/. 

■*■  Built-in  machine  language  monitor 

ir  A  built-in  terminal  or  modem  program  which  allows  the  system  to  communi- 
cate through  a  modem  to  many  bulletin  board  systems  and  other  computer 
mainframes. 


■*•  Compatibility  with  CP/M. 


Contact  your  local  Commodore  Dealer  or  RTC. 
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Digital  Research.  POWER  is  a  trademark  of  Pro- 
fessional Software.  PAL  is  a  copyright  o'  Brad 
Templeton. 


REVIEWS 


Jumpman 


James  Trunzo 


Creating  a  good  first  impression 
isn't  the  easiest  thing  in  the 
world,  especially  if  the  audience 
is  made  up  of  experts.  An  even 
more  difficult  task  is  to  sustain 
or  improve  upon  that  good  im- 
pression over  a  period  of  time. 
]iinipmau  succeeds  in  both  cases. 

In  the  face  of  cynical  com- 
ments like  "It's  probably  just 
like  the  rest  of  the  climbing-motif 
games,"  jiniipman  easily  con- 
quers that  skepticism  and  estab- 
lishes itself  as  a  software  classic. 
No  true  arcade-game  fan  who 
takes  joystick  in  hand  and  begins 
to  manipulate  junipiimii  around 
the  screen  will  be  able  to  walk 
away  without  adding  this  prod- 
uct to  his  Atari,  Commodore  64, 
or  Apple  collection. 

It's  tempting  to  compare 
jumpman  to  the  much  more 
widely  ballyhooed  Miner  2049er. 
The  comparison  would  be  unfair. 
Jumpman  is  much,  much  more. 
The  basic  premise  is  simple:  you 
are  the  Jumpman,  a  superhero 
whose  great  leaping  ability  is 
needed  to  thwart  the  dastardly 
efforts  of  the  Alienators,  The 
Alienators  have  infiltrated  the  30 
levels  of  Jupiter  headquarters 
and  booby-trapped  every  floor 
with  bombs.  Utilizing  your 
jumping  abilities,  you  must  de- 
fuse all  the  bombs  on  each  level 
and  save  command  headquar- 
ters. It  all  sounds  rather  simple 
and  clear-cut.  Not  so. 

30  Levels,  5  Variations 

As  hinted,  Jumpman  comes  with 
30  game  levels,  each  one  unique. 
The  30  levels  are  divided  into 
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three  difficulty  levels  with  five 
game  variations  in  all.  The  three 
difficulty  levels  consist  of  a  be- 
ginner's level,  made  up  of  eight 
"easy"  floors;  an  intermediate 
level,  consisting  of  ten  moder- 
ately difficult  floors;  and  the 
advanced  level,  containing 
twelve  very  complex  floors.  The 
other  two  game  variations  are 
Grand  Loop,  which  lets  you 
play  all  30  levels  consecutively, 
and  Randomizer,  which  allows 
you  to  play  a  random  selection 
of  all  levels. 

It  is  this  variation  that  makes 
jumpman  the  excellent  game  that 
it  is.  Each  level  presents  a  differ- 
ent type  of  problem.  Some  are 
out-and-out  hand-eye  coordina- 
tion tests,  requiring  excellent 
reflexes  and  quick  thinking. 
Others,  however,  demand  that 
the  player  call  upon  cleverness 
and  imagination  in  addition  to 
joystick  gamemanship.  For  ex- 
ample. Hot  Foot,  one  of  the  ten 
levels  in  the  intermediate  game, 
is  impossible  to  complete  unless 
you  discover  the  correct  se- 
quence to  defuse  the  bombs. 

In  the  Atari  version,  re- 
viewed here,  the  game  begins 
with  a  full-blown  title  page,  com- 
plete with  delightful  animation, 
excellent  music,  a  game  demo 
and,  if  you  have  played  before,  a 
review  of  previous  high  scores. 
Pressing  SELECT  starts  your 
game. 

You  are  first  asked  to  select 
a  game  variation  and  difficulty 
level  by  using  the  OPTION  key. 
Next,  after  pressing  START,  you 
indicate  how  many  players,  from 


one  to  four.  Once  the  pre- 
liminaries are  out  of  the  way, 
the  contest  begins. 

The  first  level  scrolls  down 
from  the  top,  accompanied  by 
the  title  of  that  particular  screen. 
The  title  is  then  replaced  by  a 
variety  of  information:  the 
number  of  the  current  player, 
the  difficulty  level,  the  number 
of  remaining  jumpmen  (shown 
by  small  renditions  of  Jumpman 
lined  up  eager  to  get  into  action), 
the  player's  current  score,  and 
the  player's  remaining  bonus 
points. 

Once  the  screen  has  settled 
into  place  and  the  necessary 
information  is  displayed,  one  of 
the  seven  Jumpmen  allotted  at 
the  beginning  of  each  game  ap- 
pears somewhere  on  the  screen. 
What  else  appears  depends  on 
the  level  being  played.  It  always 
is  an  arrangement  of  girders,  but 
it  might  be  accompanied  by  up- 
ropes,  ladders  (stationary  or 
moving),  and/or  floating 
elevators.  The  riumber  of  combi- 
nations is  amazing,  and  the  con- 
figuration of  the  girders  is  always 
unique. 

Off  And  Jumping 

During  play,  Jumpman  scurries 
about  the  structures  on  the 
screen  with  astonishing  anima- 
tion as  he  attempts  to  overcome 
obvious  obstacles  and  copes 
with  other  hazards  such  as 
speeding  bullets  which  come  out 
of  nowhere,  floating  blocks  that 
home  in  and  fire  at  him  like  a 
cannonshot,  and  swooping  bats. 

Jumpman  is  moved  by 
pushing  the  joystick  in  the  direc- 
tion you  wish  him  to  travel.  Make 
him  jump  by  pressing  the  fire 
button  and  pushing  the  joystick 


THERE^  A  COMPUTER  BORN  EVERT  MINUTE... 

GIVE  IT  A  HOME. 


For  $89>95  with  the  CS-1532  you  can  house  your  computer, 
peripherals,  and  accessories  without  spending  a  fortune. 


For  those  with  a  large  computer  familY  the  CS-2748  gives  you  all  the  room  you 
need  for  your  computer,  monitor,  printer,  peripherals,  software,  etc,  at  a  price 
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The  CS-1632  computer  storage 
cabinets  compact  yet  functional 
design  Dts  almost  anywhere 
while  housing  your  computer 
monitor,  joysticks,  software, 
books  and  peripherals  all  for 
only  $89.95, 

The  slide  oat  shelf  puts  the 
computer  at  the  right  heigh!  and 
position  for  easy  comfortable 
operation. 

The  fold  up  locking  door  keeps 
unwanted  fingers  ofTthe  key 
board  when  not  in  use. 
To  store  joysticks  just  turn  them 
upside  down  and  slide  them  into 
the  inverted  storage  rack. 
Twist  tabs  on  the  back  of  center 
panel  allow  for  neat  concealed 
grouping  of  wires,  while  power 
packs  rest  hidden  behind  center 
panel  on  shelf. 
The  slide  out  software  tray 
has  room  for  14  cartridges  or 
cassettes  and  up  to  30  diskettes. 
Most  brands  of  software  will  fit 
between  the  adjustable  parti- 
tions with  a  convenient  hook  for 
the  spare  key  at  rear. 
Stand  fits  Atari  400  &  800, 
Commodore  64  &  VIC  20. 
Ti99/4AandTRS-80. 
Cabinet  dimensions  overall  36" 
high  X  33-7/8"  wide  x  16"  deep. 


To  order  CS- 1632  send  $89.95  to:      To  order  CS-2748  send  $299.95  to: 
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Immediate  shipment  if  in  slock.  Ifnot.alkiw  3-4  weeks  for  delivery.  Ifpersonaldieck  is  seni  allow  additional 
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hammei,  and  a  few  minutes  orvour  time. 

Choree  in  simulated  woodgrain  of  wann  golden  oak  or  rich  natural  walnut  finish. 


The  two  slide-out  shelves  put 
the  keyboard  at  the  proper  oper- 
ating height  while  allowing  easy 
access  to  the  disk  drives. 
The  bronze  tempered  glass  door 
protecting  the  keyboard  and 
disk  drives  simply  lifts  up  and 
slides  back  out  of  the  way  during 
use. 

Twist  tabs  on  the  back  of  the 
center  panel  aUow  for  neat  con- 
cealed grouping  of  wires  while 
a  convenient  storage  shelf  for 
books  or  other  items  lies  below. 
The  printer  sits  behind  a  fold 
down  door  that  provides  a  work 
surface  for  papers  or  books 
while  using  the  keyboard.  The 
lift  up  top  allows  easy  access 
to  the  top  and  rear  of  the  printer. 
A  slot  in  the  printer  shelf  allows 
for  center  as  well  as  rear 
feed  printers. 
Behind  the  lower  door  are 
a  top  shelf  for  paper,  feeding  the 
printer,  and  a  bottom  shelf  to 
receive  printer  copy  as  well 
as  additional  storage. 
Stand  fits  same  computers 
as  the  CS- 1632  as  well  as  the 
Apple  I  and  II,  IBM-PC.  Franklin 
and  many  others. 
The  cabinet  dimensions  overall: 
39-1/2"  high  X  49"  wide 
X  27"  deep. 

Keyboard  shelf  20"  deep  x  26" 
wide.  Disk  drive  shelf  15-34" 
deep  X  26"  wide.  Top  shelf  for 
monitor  17"  deep  x  27"  wide. 
Printer  shelf  22"  deep  x  19"  wide. 


in  the  direction  you  want  him  to 
jump.  Be  forewarned:  keep  the 
joystick  pushed  in  the  given 
direction  until  the  jump  is  com- 
pleted. Otherwise,  you  may 
very  well  see  Jumpman  clinging 
desperately  to  the  lip  of  a  girder, 
legs  kicking  and  arms  flailing, 
only  to  fall  to  his  demise. 

Scores  are  achieved  in  a 
number  of  ways:  by  defusing 
bombs,  killing  creatures,  discov- 
ering and  defusing  hidden 
bombs  in  the  puzzle  levels,  and 
by  completing  levels.  Also, 
points  are  awarded  for  any 
Jumpmen  remaining  at  the  end 
of  the  game.  Also,  bonus  scoring 
can  really  add  to  your  score. 
Each  screen  begins  with  a  bonus 
score  total  of  1500.  Every  few 
seconds,  100  points  are  de- 
ducted. Any  bonus  points  re- 
maining at  the  completion  of  a 
screen  are  added  to  the  total 
points  score.  Obviously,  the 
quicker  Jumpman  defuses  all  the 
bombs  on  a  given  level,  the  more 
bonus  points  will  be  added  to 
the  grand  total. 

Jumpman  comes  with  the 
several  additional  options.  First, 
you  have  the  option  to  change 
Jumpman's  speed.  Simply  press 
the  appropriate  number  on  the 
keyboard,  from  1  to  8,  anytime 
during  play.  A  medium  speed  is 
selected  by  default  if  you  make 
no  selection.  Changing  the  speed 
of  Jumpman  changes  your  strat- 
egy. Jumpman  is  a  little  more 
difficult  to  control  at  high 
speeds. 

High  Scores  Recorded 

A  vanity  board  allows  players  to 
record  high  scores.  A  High  Score 
screen  appears  at  the  end  of  any 
game  in  which  a  player  qualifies. 
He  or  she  may  enter  via  joystick 
up  to  three  initials  next  to  the 
score  achieved.  All  information 
is  then  automatically  saved  to 
disk.  In  addition,  a  letter  will 
appear  to  the  right  of  the  score 
indicating  at  what  level  the  score 
was  achieved.  For  example,  a 
letter  B  will  appear  by  the  score 
if  it  was  accomplished  while 
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playing  at  the  beginner's  level. 
High  scores  can  also  be  cleared, 
assuming  no  write-protect  tab 
was  placed  on  the  disk,  by  simply 
pressing  the  CLEAR  key  while 
the  game  is  initially  loading  into 
memory. 

All  in  all,  Jimtpman  is  a  fine 
game.  There  are  excellent  hi-res 
graphics,  intricate  animation 
(wait  until  you  see  Jumpman 
scurry  up  or  down  a  rope),  and 
enjoyable  but  unobtrusive  circus- 
like music  that  plays  at  the  end 
of  each  level.  These  and  other 
nice  touches  reveal  the  degree  of 
attention  the  writers  paid  to 
small  details  and  put  Jumpman 
head  and  shoulders  above  most 
other  games,  climbing  games  in 
particular. 

Epyx,  better  known  for  its 
adventure  games  (especially  the 
Dungeonquest  series),  has 
created  what  should  become  an 
arcade  classic, 
lumpman 
Epyx 

Automatic  Simulations,  Inc. 
Simnyvak,  CA  94086 
Retail  price:  $39.95  © 


Synthy  64 

Richard  Mansfield,  Senior  Editor 

Music  can  be  a  complicated  af- 
fair -  you've  got  pitch,  rhythm, 
tone,  and  duration/loudness 
factors  to  cope  with  for  each 
musical  moment.  When  you're 
digitalizing  music  (playing  it  from 
a  computer),  you've  added  to 
the  complexity  because  you've 
got  to  program  lots  of  numbers. 
The  64  has  many  built-in  facilities 
for  programming  expressive, 
subtle  music,  but  there's  a  price: 
the  programmer  must  specify  a 
good  deal  about  each  note. 

Synthy  64  is  an  excellent 
solution  to  this  dilemma.  It  al- 
lows you  full  access  to  the  64's 
extraordinary  sound  capabilities, 
but  it  greatly  simplifies  the  pro- 
gramming for  you.  You  can  avoid 


Sirius  Is 
GIVING  AWAY 

Over 

$35,000.00 

In 
VIDEOGAMES!!! 


You  Can  Win  A  Sirius  Game 
OF  YOUR  CHOICE! 

Correctly  answer  the  questions 

belovv  to  qualify  for  the 

FREE  GAME  DRAWING. 

Enter  all  of  the 

Grud  Quizzes  and  qualify  for 

all  20  drawings ! 


GRUD  QUIZ  #7: 
GRUDS  IN  SPACE 

1.  Where  was  the  gun? 

2.  What  do  you  give  the  Butler? 

3.  What  are  the  three  objects  Lord 
Deebo  gives  you? 

4.  What  are  the  Navigational  and 
Teleport  coordinates  to  Earth? 


TO  ENTER: 


Jusi  send  a  postcard  or  3  x  5  piece  of 
paper  to  Sirius  containing  the  following 
mformation: 

1.  Your  name  and  address 

2.  The  Grud  Quiz  number  and  your  four 
answers 

RULES: 

1.  All  entries  must  be  handwritten  and 
individually  mailed. 

2.  All  entries  must  be  postmarked  by 
midnight,  February  29.  1934. 

3.  Only  one  prize  per  person  per  quiz  is 
permitted. 

1.000  WINNERS! 

If  ALL  of  your  answ;ers  are  correct  you 
will  qualify  for  that  Grud  Quiz  drawing. 
50  winners  per  quiz  wEl  be  randomly 
chosen  and  notified  by  mail  on  or  before 
March  31,  1984.  Each  winner  will 
receive  a  complete  Sirius  catalogue 
listing  from  which  they  can  select  the 
game  or  games  of  their  choice. 

LOOK  FOR  MOEtE  GRUD  QUIZZES  in 
the  Oct..  Nov..  and  Dec.  issues  of  your 
favorite  computer  magazines  or  at 
participating  software  retailers. 

ALL  CONTESTANTS  WILL  RECEIVE  A 

FREE  FULL  COLOR  SIRIUS  COMIC 

CATALOGUE 


<>irius 


Sirius  Software,  Inc. 
10364  Rockingham  Drive 
Sacramento.  CA  95B27 

IVOtD  WKERE  PRCUIBITED  BY  LAW) 


Sirius 


For  more  information  contact 
your  local  Sirius  dealer  or 
contact  Sirius  directly  at  10364 
Rockingham  Drive,  Sacramento 
CA  95827  (916)  366-1195. 


Game  design  by  Ch  jck  Sommefvifle  and  Joe 
Oudar  Pacltagc.  program  and  audio  visual  <^ 
19B3  Sitius  All  Tight  reserved 

Sirijs  and  Grwd*  In  Space  are  irademafks  of 
SiNus  SollwaiC!.  line  Atari  800  and  1200  are 
iradem^arks  of  Aiari.  fnc  Commodore  6*1  is  a 
tr^demarit  ol  CommoaoFe  Business  Machines. 
Ire  Apple  11,11-  and  We  are  UademarH.s  ot  Appli 
Computet,  Jnc  IBM-PC  is  a  Kademark  of 
ilniemaTianal  Busm&ss  Machines.  Inc. 


Atari  800  &  1200  Disk 
IBM-PC  Disk 
Apple  II,  11+  &lle 
Commodore  64  Disk 


massive  amounts  of  mysterious 
POKES  or  DATA  statements, 
just  as  BASIC  makes  pro- 
gramming easier  because  you. 
work  with  English  words,  Synthy 
64  makes  music  programming 
much  more  understandable. 
You  work  with  the  notes  as  they 
would  apply  to  a  piano,  rather 
than  with  frequency  numbers. 
You  indicate  a  C  in  the  third 
octave  as  C3,  not  as  1097. 

This  example,  however, 
only  touches  on  the  efficiency 
with  which  you  can  enter  com- 
plex music  via  Synthy  64.  Because 
it  is  a  language,  like  BASIC,  you 
can  make  Synthy  64  perform 
complicated  tasks  with  relative 
ease.  In  fact,  you  program  it 
very  much  the  way  you  program 
BASIC:  fine  numbers,  LIST, 
RUN,  SAVE,  INPUT,  error  mes- 
sages, and  other  BASIC-like  com- 
mands all  work  the  way  you're 
familiar  with.  And  all  the  music- 
specific  commands  are  straight- 
forward and  easy  to  use.  Voices, 
portamento,  filtering,  tempo, 
and  envelope  are  simple  to  pro- 
gram, and  even  conveniences 
such  as  REPEAT  a  phrase  and 
synchronizing  are  provided  for 
in  the  Synthy  64  language. 

To  give  you  an  idea,  here's 
one  of  the  early  examples  from 
the  software's  documentation: 

1    RUN 

10  T120 

20  C5/4  D  E  F  G  A6  B  C 

30  END 

This  will  play  a  scale  from 
the  fifth  octave  C  (C5)  using  quar- 
ter notes  (/4).  The  octaves  start 
with  A,  so  you  must  put  the  /6 
in,  but  only  when  changing  to  a 
new  octave.  Line  10  tells  the 
computer  how  many  quarter 
notes  to  play  per  minute.  If 
you  don't  set  a  tempo,  the  default 
is  100. 

All  of  Synthy  64  is  similarly 
well  thought  out  and  easy  to 
learn  and  use.  Even  esoterica 
such  as  ring  modulation  and 
special  bandwidth  filtering  be- 
come both  comprehensible  and 
usable.  A  41 -page  booklet  and 
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three  sample  compositions 
round  out  the  package.  If  you've 
been  frustrated  because  you 
know  your  64  has  a  lot  of  music 
inside  it,  but  you've  been  unable 
to  get  at  it  -  this  might  well  be 


the  tool  you've  been  waiting  for. 

Synthy  64 

Abacus  Software 

P.O.  Box  7211 

Grand  Rapids,  MI  49510 

$35  (tape),  $38  (disk)  © 


VICFORTH  From 

Human  Engineered  Software 


Peter  Busby 

VICFORTH  is  an  excellent 
cassette-based  implementation 
of  the  Forth  language  for  the 
Commodore  VIC-20.  Included  in 
the  sturdy  8K  cartridge  are  such 
features  as  standard  16-Iine,  64- 
character-wide  editing  screens, 
many  new  Forth  words  (com- 
mands) that  take  advantage  of 
the  VIC-20  capabilities,  ingeni- 
ous automatic  compensation  for 
memory  expansion  and,  best  of 
all,  the  power  to  redefine  funda- 
mental Forth  words. 

A  minor  objection  to  VIC- 


FORTH -  it  cannot  directly  access 
the  3K  memory  expansion  mod- 
ule. (Neither  can  BASIC  when 
simultaneously  expanded  up- 
ward.) But  without  resorting  to 
machine  language.  Forth  can 
easily  be  persuaded  to  use  the 
lower  3K  RAM  module  for  tables 
or  even,  with  care,  for  dictionary 
space.  This  language  is  so  flexible 
that  it  often  presents  several 
solutions  to  a  problem. 

Special  Commands 

On  power-up  or  reset,  VIC- 


VOICE  WORLD'S 


24K  Golden  RAM 
Expansion  Chassis 


ONLY  $149.00 


•  Programmer's  dream— Game 
player's  delight, 

•  Boosts  VIC 
memory  to 
29K! 

•  4  expansion  slots 
with  switches  for  in- 
stant cartridge  selection- 
faster  than  a  disk, 

•  Accepts  any  cartridge 
designed  for  the  VIC  20». 

•  System  Reset  Button. 

•  Plugs  directly  into  your  VIC  20*. 

•  8  memory  control  switches — easy  to 
configure  in  8K  banks  for  custom 
applications. 

•  Factory  tested— one  year  limited  warranty. 


VOICE  WORLD 

13055  V:a  Espena 
Dei  Mar.  CA  92014 
(619)481-7390 


•  Start  address  selection  at  2000, 
4000,  6000,  AOOO  HEX. 

•  ROM  mode  switches  ior 
memory  write  protec- 
tion and  PROM, 
EPROM 
emulation. 
•  Memory 

banks 
hold  pro- 
grams/data 
even  when  de- 
selected. 
Gold-plated  connectors/ 
switch  contacts  for  high  reliability. 
•  Fused  to  protect  your  VIC  20," 

TO  ORDER: 

Send  check  or  money  order.  Add  3.00 
shipping  and  handling.  California 
residents  add  6%  sales  tax.  COD 
DEALER  INQUIRIES  INVITED 


VIC  20  is  a  registered  trademark  of  Commodore  Business  Machines,  INC. 


FORTH  signs  on  with  a  cyan 
display  and  green  border,  indi- 
cating the  normal  operating  en- 
vironment in  which  programs 
are  run,  words  executed  and 
perhaps  defined,  and  peripher- 
als interfaced.  Five  special  words 
control  the  tape  cassette:  WRITE/ 
WRITES  saves  screens  to  tape, 
READ/READS  loads  screens 
from  tape  and  LOADS  loads  and 
compiles  screen  1  from  consecu- 
tive blocks  on  tape,  maximizing 
RAM  usage  with  the  cassette  as 
virtual  memory. 

Entering  1  EDIT  shifts  the 
format  to  the  EDITOR  vocabu- 
lary, displaying  screen  1  on  the 
top  16  lines  with  a  six-line  work- 
space below,  all  with  a  white 
background.  The  editor  includes 
many  commands  for  finding, 
moving  and  eliminating  blocks 
of  material  on  the  screens.  Seven 
commands  are  programmed  to 
the  function  keys,  and  the  cursor 
controls  are  revectored  to  the  64- 
character-wide  screen  which 
scrolls  horizontally. 

Pressing  INSERT  changes 
the  border  to  yellow  and  places 
the  editor  in  direct  screen  func- 
tion, in  which  the  material  is 
normally  written  to  the  screen. 
RETURN  then  leaves  the  INSERT 
mode,  and  STOP/RESTORE  re- 
turns to  the  reset  environment. 
This  raises  a  second  objection: 
the  first  key  entered  after  reset  is 
usually  flagged  an  error.  The 
habit  quickly  forms  of  pressing 
RETURN  after  reset,  which 
causes  the  VICFORTH  prompt 
to  be  displayed,  "OK". 

Limitations  And 
Enhancements 

Error  codes  conform  to  the  Forth 
Interest  Group's  specifications. 
The  12  errors  are  indicated  by 
an  arrow  and  a  number,  cross- 
referenced  to  the  instruction 
manual.  Full  error  messages 
could  be  displayed  at  the  cost  of 
some  memory,  as  shown  in  the 
manual,  since  MESSAGE  is  one 
of  13  vectored  words  provided. 
Vectoring  allows  the  user  to 
easily  change  VICFORTH's  I/O 


Get  Omni  quality 
for  as  little  as  $1.99. . . 

even  if  all  you  want  is  a 
10  pack. 


ARCHIVE 

152  Boscon  Turnpike 
Shrewsbury,  MA  01545 
(800)  343-0314; 
In  Mass: 
(617)  756-2960 


Call  toll-free  for  great  savings  on  Omni's  complete 
line  of  5 '4"  and  8"  premium  disks.  Each  is 
certified  error-free  at  a  minimum  of  twice  the 
error  threshold  of  your  system.  Each  is  rated  for 
more  than  12  million  passes  without  disk-related 
errors  or  significant  wear.  And  each  is  precision 
fabricated  to  exceed  all  ANSI  specifications  with 
such  standard  features  as  reinforced  hub  rings  and 
Tyvec  sleeves.  Get  next  day  shipment 

and  an  unconditional,  no  hassle 
money-back  guarantee. 


Call  toU  free 
343-0314 

In  Mass:  (617)  756-2960 

Call  if  you're  not  sure  which  disk  is  compatible  with  you?" 

system.  Call  for  prices  on  96  tpi  and  special  formats.  We  offer  an 

unconditional  money-back  warranty.  We're  here  to  help. 

Be  sure  to  indicate  system/drive  name  and  model  #  below. 


low, 
implete  line 
8"and5'/4" 
including 
TPI  and 
ial  format 


5 '/4"  disks 

Cost  per 
10  pack     Quantity 

$19.90       

$23.90      


Single  side/single  density 

Single  side/double  density 

Double  .side/single  density 

Double  side/double  density 

Rip/Roppy  revei.-iible 

Plastic  library  case 

lin  lieti  of  sofi  ^roragc  box) 

SKipping  and  handling 

(SZ.OO  fif-il  10  pnck,  AOi  additional  10  packs.  Continental  U.S.  only.) 

5%  sales  tax  (Mass  only) 

D  Check       DCOD    D  Master  Card    DViSA 


$37.50 
$39.90 
$  2.99 


8  "disks 

Cost  per 

10  pack  Quantity 

$24.90      

$31.90      

$34.90      

$37.50      

$39.90      

$  3,49      


Total 
Cost 


Total 


port  interfacing  to  recognize,  for 
instance,  a  new  printer  config- 
uration at  the  user  port. 

pther  standard  fig-Forth 
definitions  missing  here  are  20 
disk-handling  words  and  a  few 
redundant  or  virtually  defunct 
words.  An  experienced  pro- 
grammer, with  the  fig-Forth 
installation  manual  in  hand, 
could  revector  VICFORTH  to 
handle  disks.  Also,  the  monitor 
is  missing,  but  by  dropping  the 
memory  limit  variable  EM  ap- 
propriately and  calling  the  VIC- 
20  Kernal  machine  language 
LOAD,  a  monitor  such  as  Micro- 
mon  may  be  installed.  A  new 
word  DUMP  displays  the  con- 
tents of  a  range  of  memory  in 
four-byte  lines. 

Indeed,  any  machine  lan- 
guage program,  the  Kernal 
(Commodore's  set  of  subroutines 
called  from  a  table),  and  even 
the  BASIC  subroutines  in  ROM 
are  easily  accessed  with  the  word 
SYS,  which  has  an  enormous 
advantage  over  BASIC'S  SYS; 
the  parameters  for  the  ac- 
cumulator, X  and  Y  registers, 
and  the  carry  flag  can  be  passed 
back  and  forth  (so  to  speak)  - 
invaluable,  as  Forth  often  becomes 
very  primitive  in  its  operations. 

About  50  words  are  added 
to  fig-Forth,  and  many  others 
are  defined  in  the  manual  to 
access  the  VIC-20's  features, 
including  words  for  color  and 
sound  control,  several  predefined 
Kernal  routines,  and  printer  and 
user-port  commands. 

A  third  objection  to  Tom 
Zimmer's  VICFORTH  is  the  loss 
of  Commodore's  screen  editor 
from  the  operating  environment. 
With  the  VIC'S  BASIC  editor, 
normally  when  RETURN  is 
pressed  the  interpreter  accepts 
what  is  on  the  display  -  what 
you  see  is  what  you  get.  In  VIC- 
FORTH the  sequence  of  keys 
pressed  is  acted  upon  regardless 
of  the  display:  it  is  not  possible 
to  cursor  into  a  previous  line, 
correct  or  add  to  it  and  press 
RETUEiN  to  reexecute  that  line. 
This  is  partially  compensated  for 
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by  using  the  editing  screens  for 
defining  and  running  proce- 
dures, but  it  seems  a  shame  to 
lose  that  powerful  interactive 
editor. 

What  about  that  favorite 
VIC-20  feature,  programmable 
characters?  As  it  happens,  the 
editing  screens  almost  coincide 
with  the  internal  RAM  required 
for  redefining  display  characters. 
With  straightforward  manipula- 
tion, for  instance,  by  moving  the 
dictionary  pointer  the  requisite 
amount  (e.g.,  $1800  DP  ! )  and, 
after  compilation  from  the 
screens  is  complete,  using  the 
Kernal  to  load  directly  into  that 
space,  Greek,  Katakana,  or  what- 
ever characters  desired  may  be 
made  to  appear. 

Documentation 

Finally,  the  manual:  HES  pro- 
vides exceptional  documenta- 
tion. The  80-page  instruction 
book  ~  though  not  a  beginner's 
handbook  -  has  enough  examples 
and  detail  in  it  to  clarify  much 
of  VICFORTH.  An  example  of 
the  breadth  of  this  concept  is 
the  eight  pages  devoted  to  ad- 


justments to  the  recommended 
Starting  Forth,  from  the  Forth 
Interest  Group,  upgrading  that 
tutorial  manual  to  the  VIC- 
FORTH version.  A  slight  irrita- 
tion is  the  use  of  £  for  the  symbol 
#  throughout;  otherwise  the 
manual  does  seem  to  be  error- 
free  and  complete. 

Forth  is  a  fast  -  very  fast  - 
compact,  interactive,  flexible 
language,  though  more  arcane 
than  BASIC,  perhaps,  and  in- 
cluding less  simple  string  ma- 
nipulation. When  for  the  sake  of 
speed  or  complexity  it  is  neces- 
sary to  program  closer  to  the 
level  of  machine  language, 
Forth's  power  becomes  decisive. 
This  cartridge  from  Human  En- 
gineered Software  is  by  far 
the  most  exciting  "peripheral" 
for  my  computer.  VICFORTH 
could  become  the  center  of  pro- 
gramming action  on  your  VIC-20. 

VICFORTH 

by  Tom  Zimmer 

Human  Engineered  Software 

71  Park  Ijtne 

Brisbane,  CA  94005 

$59.95  © 


Flower  Power  Math  Fun 


Tony  Roberts,  Assistant  Managing  Editor 

Flower  Power  Math  Fun  is  an  at- 
tractive, challenging  math  drill 
game  that  adapts  itself  to  the 
abilities  of  the  player. 

The  program  includes  exer- 
cises with  whole  numbers,  frac- 
tions, and  decimals,  and  it  allows 
the  player  to  choose  addition, 
subtraction,  multiplication,  or 
division  problems.  A  decimal- 
fractton  conversion  exercise  is 
also  included.  The  range  of  the 
game  makes  it  effective  for  a 
child  just  learning  math  con- 
cepts, and  challenging  to  an 
adult  wishing  to  refine  his  ability 
to  solve  problems  in  his  head. 

The  program  automatically 
keeps  track  of  each  user's  prog- 
ress, with  room  for  about  100 


Flower  I'owcr  Math  luii. 

files  on  the  disk,  giving  it  added 
value  in  a  classroom  situation. 

Planting  The  Garden 

Each  time  a  student  runs  the 
program,  he  is  asked  for  his 
name.  Let's  say  James  is  playing 
the  game.  After  he  types  his 
name,  the  program  searches  the 
disk  to  see  if  any  information 


HEATH/  \ 
ZENITH  Z-ltJO™ 


SUPERBRAIN™ 

CP/M  DISKS 
DISKETTES 


DYNACOMP 

The  Leading  Distributor  Of 
Microcomputer  Software 

PRESENTS 


HOME  FINANCK 

PERSONAL  FINANCE  SYSTEM  (ALL) 
TAX  OPTIMIZER  (ALL) 
MICROCOMPUTER  STOCKS  (ALL) 
MICROCOMPUTER  BONDS  (ALL) 
BUDGET  MODEL  ANALYZER  (ATARI) 
PERSONAL  BALANCE  SHEET  (OSBORNE) 
STOCK  MASTER/STOCK  PLOT  (APPLE) 
NYINDEX  (ATARI) 
STOCKAID  (ATARI) 

PORTFOLIO  MANAGEMENT  (APPLE/OSB) 
INVESTING  ADVISOR  (TRS) 
INVESTMENT  MANAGEMENT 

(ATARI/IBM) 
OPTIONS  ANALYSIS  (TRS/OSB/ APPLE) 


39.95 
59.95 
59.95 
59.95 

23.95 
29.95 
59.95 
29.95 
29.95 
69.95 
39.95 

49.95 
99.95 


BUSINESS 

FINANCIAL  MANAGEMENT  „..„„, 

(NORTH  STAR)  S149-95 

MAIL  MASTER  (ATARI)  f  39.95 

FAYFIVE  (APPLE)  S149.95 

LIFE  CYCLE  ANALYSIS  (APPLE)  S  39.95 
DATA  RETRIEVAL  SYSTEM  (ATARl/CPM)  S  29.95 

OPTIMAC  (TRS/APPLE)  *  «.95 

BOOKKEEP  (CPM)  »  69.95 

CUSTOMER  PROFILE  (OSBORNE)  S  59.95 

EDUCATION 

HODGE  PODGE  (APPLE/TRS) 
CHILDREN'S  CARROUSEL  (APPLE) 
TEACHER'S  AIDE  (ALL) 
TEACHER'S  GRADE  BOOK  (APPLE) 
PLAYER  PIANO  (ATARI) 
SPELL  IT  (APPLE) 
ELIZA  II  (ALL  except  APPLE) 
PROBABILITY  (APPLE/ATARI) 
TYPEMASTER  (TRS) 
FEELING  BETTER  (APPLE) 
FROGMASTER  (ATARI) 


DlSKETTEIi 

SW"  SS/SD  with  hub  rings,  packed  m 
plastic  storage  box  (10/box) 

PRICES  ABOVE  ARE  FOR  5W" 


CARD  GAMIvS 

BRIDGE  MASTER  (ALL) 
GIN  RUMMY  (APPLE) 
POKER  PARTY  (ALL) 
BLACKJACK  COACH  (ALL) 
EUCHRE  (ATARI) 

WAR  GAMES 

LEIPZIG  1813  (ATARI) 
SHILOHI862(ATARI) 
IRONCLADS  (CPM) 

ADVENTURE 

CRANSTON  MANOR  (CPM) 
WINDMERE  ESTATE 

(NORTH  STAR/ APPLE) 
ZODIAC  CASTLE  (NORTH  STAR/APPLE) 
STARSHIP  LANDING  PARTY  (TRS) 
GENESIS-THE  CREATOR  (APPLE) 
VALLEY  OF  THE  KINGS  (ATARI) 

GAMES 

VALDEZ(ALL) 

FLIGHT  SIMULATOR  (ALL) 

BACKGAMMON  2.0 (ALL) 

MANAGEMENT  SIMULATOR  (ALL) 

CHESS  MASTER  (CPM/TRS) 

STARBASE  3.2  (ALL) 

CACTUS  LEAGUE  BASEBALL  (ATARI) 

FINAL  ASSEMBLY  (ATARI) 

ENGINKKRING/STATISTICS 

DIGITAL  FILTER  (ALL) 
HARMONIC  ANALYZER  (ALL) 
BASIC  SCIENTIFIC  SUBS.  Vol.  1  (ALL) 
BASIC  SCIENTIFIC  SUBS.  Vol.  2  (ALL) 
BASIC  STATISTICAL  SUBS.  (ALL) 
CELESTIAL  BASIC  (APPLE) 
ACTIVE  CIRCUIT  ANALYSIS  (ALL) 
BEAM  DEFLECTION  (ALL) 
ANALYSIS  OF  VARIANCE  (ALL) 
PRINCIPAL  COMPONENTS  (APPLE) 
S  19.95  ST  ATTEST  (ALL) 

SINGLE  DENSITY.  ADD  S3.00  FOR  DOUBLE  DENSITY,  S2.50  for  8" 


18.95 
19.95 

17.95 

49.95 

19.95 

19.95 

19.95 

J  39.95 

S  18.95 

S  39.95 

$  21.95 


S  29.95 

$  22.95 

S  23.95 

$  33.95 

$  19.95 

S  33.95 

$  33.95 

$  29.95 

$  19.95 

S  29.95 

)     $  29.95 

%  19.95 

S  49.95 

$  29.95 

$  23.95 

S  23.95 

$  23.95 

$  29.95 

$  23.95 

$  17.95 

$  19.95 

$  19.95 

$  53.95 

$  33.95 

$  53.95 

SI  29.95 

$  99.95 

S  49.95 

S  43,95 

$  39.95 

$  43.95 

$  49.95 

$  33.95 

THESE  ARE  ONLY  A  FEW  OF  THE  HUNDREDS  OF  PROGRAMS 
EN  THE  DYNACOMP  LIBRARY. 

Besides  being  the  leading  distributor  of  microcomputer  software,  DYNACOMP 
currently  distributes  software  in  over  60  countries.  DYNACOMP  provides 
FRIENDLY,  ACCESSIBLE  CUSTOMER  SERVICE  through  our  highly 
qualified  and  knowledgeable  staff.  WE'RE  AS  NEAR  AS  YOUR  TELEPHONE. 
DYNACOMP' S  prices  are  highly  competitive  and  we  promise  prompt  processing 
of  every  order! 

WRITE  FOR  A  FREE,  DETAILED  CATALOG 


Daytime  24  Hour 

Toll  Free  Order  Phones:       Message  and  Order  Phone: 
(800)  828-6772  (800)  828-6773  (716)  442-8731 


Office  Hotline: 

9-5E.S.T. 
(716)  442-8960 


DYNACOMP,  INC. 

1427  Monroe  Avenue  •  Rochester,  NY  14618 


about  James  is  available.  If  so, 
the  screen  will  ask,  "Are  you  the 
same  James  who  played  before?" 
If  the  answer  is  yes,  the  computer 
recalls  the  information  about 
James's  past  experiences  with 
Flower  Power  Math  Fun.  If  this 
particular  James  hadn't  played 
before,  the  computer  would  ask 
him  to  select  a  unique  name  for 
purposes  of  the  program. 
Perhaps  Jim,  or  James  D. 

Then  it's  time  to  choose  the 
type  of  problems  to  solve,  and 
the  game  begins.  The  object  is  to 
fill  the  garden  at  the  bottom  of 
the  screen  with  flowers  by  an- 
swering math  problems  cor- 
rectly. A  flower  sprouts  if  the 
answer  is  correct.  If  the  answer 
is  wrong,  a  weed  shoots  up,  and 
the  student  is  given  two  more 
chances  to  answer  correctly.  If 
the  correct  answer  is  supplied, 
the  weed  is  replaced  by  a  flower 
and  the  game  continues.  If  each 
of  the  three  tries  is  incorrect,  the 
weed  remains  in  the  garden. 

There  is  room  in  the  garden 
for  ten  plants  -  flowers  or  weeds. 
Once  the  garden  is  full,  the  exer- 
cise is  over,  and  the  student  is 
given  the  option  of  playing 
again. 

Keeping  Track  Of  Skill 
Levels 

The  first  time  each  of  the  13 
games  is  played,  the  computer 
sets  the  skill  level  at  1.0.  If  prob- 
lems are  solved  quickly  and  cor- 
rectly, the  skill  level  is  increased 
and  the  problems  become  more 
difficult.  When  a  student  an- 
swers incorrectly,  the  skill  level 
decreases.  Through  this  method, 
the  program  keeps  a  student  of 
any  level  working  at  the  edge  of 
his  capabilities. 

The  program  also  awards 
points  for  correct  answers,  based 
on  the  fime  it  takes  to  provide 
the  right  answer.  Nothing  is 
subtracted  for  a  wrong  answer, 
and  nothing  is  added  for  an  an- 
swer that  is  too  long  in  coming. 

At  the  end  of  each  session, 
the  student's  skill  level  and  score 
are  saved  on  disk.  The  next  time 
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he  plays,  he'll  be  able  to  pick  up 
where  he  left  off. 

The  program  requires  pre- 
cise answers.  For  example,  if  a 
fraction  addition  exercise  had 
produced  the  problem  %-H%, 
the  computer  would  not  accept 
an  answer  of  %.  The  program 
would  prompt  the  player:  "Re- 
duce your  fraction." 

Unemotional  Graphics 

Flower  Power  Math  Fun  is  not  an 
arcade  game.  Aside  from  the 
garden,  with  its  colorful  flowers 
and  green  weeds,  a  sun,  and  a 
couple  of  birds  in  the  sky, 
nothing  flashy  has  been  de- 
signed into  the  program .  Offi- 
cials at  Softwave  Productions 
use  the  word  "unemofional"  to 
describe  Flower  Power  Math  Fun's 
graphics.  "It's  enough  to  keep 
them  interested,  but  not  enough 
to  distract  them." 

There  is  no  music,  and  there 
are  no  explosions  to  disturb 
others  in  a  classroom.  The  only 
sound  produced  by  the  program 
is  a  series  of  notes  which  slide 
up  on  a  right  answer,  down  on  a 
wrong  answer. 

A  session  with  the  program 
could  last  as  long  as  time  permits. 
If  several  students  hope  to  have 
their  chance  to  play,  a  student 
could  complete  one  exercise  in 
about  five  minutes. 

The  instructions  that  come 
with  the  program  are  sparse,  but 
little  guidance  is  needed.  A  re- 
port program  included  with  the 
game  allows  a  teacher  to  review 
the  progress  of  each  student 
either  on  screen  or  via  a  printout. 
The  information  available  to  the 
teacher  includes  the  student's 
name,  skill  level,  and  high  score 
for  each  of  the  13  exercises.  In 
addition,  the  report  program  can 
be  used  to  erase  one  or  all  records 
from  the  disk. 

A  Challenge  For  All 

The  package  describes  the  game 
as  fun  for  ages  5-15.  A  five-year- 
old  would  be  able  to  handle 
many  of  the  problems  at  lower 
skill  levels,  and  the  higher  levels 


can  present  a  challenge  to  older 
players,  even  those  far  past  the 
age  of  15.  The  problems  at  the 
higher  levels  of  the  whole 
number  addifion  exercise,  for 
example,  have  you  adding  8- 
and  9-digit  numbers  without 
using  pencil  and  paper. 

Using  Flower  Power  Math 
Fun  regularly,  for  even  just  a 
short  time,  would  sharpen  al- 
most anyone's  ability  to  solve 
math  problems  mentally.  This  is 
not  the  kind  of  game  that  will 
keep  kids  riveted  tothe  keyboard 
during  all  their  after-school 
hours,  but  it  can  satisfy  and  chal- 
lenge computer-loving  kids  in 
the  more  sedate  setting  of  a 
schoolroom. 

Flower  Power  Math  Fun  is 
available  for  the  Commodore  64 
and  Apple  11  computers. 

Flower  Power  Math  Fun 

Softwave  Productions 

156  Drakes  Lane 

Summerloivn,  TN  38483 

(615)964-3573 

$39.95  © 


COMPUTE! 
Subscriber  Services 

Please  help  us  serve  you  better.  If  you 
need  to  contact  us  for  any  of  the  reasons 
listed  below,  write  to  us  at: 

COMPUTE!  Magazine 

P.O.  Box  5406 
Greensboro,  NC  27403 

or  call  the  Toll  Free  number  listed  below. 

Change  Of  Address.  Please  allow  us 
6-8  weeks  to  effect  the  change;  send 
your  current  mailing  label  along  wifti 
your  new  address. 

Benewaf.  Should  you  wish  to  renew  your 
COMPUTE!  subscription  before  we 
reminc  you  to,  send  your  current  nnailing 
label  with  payment  or  charge  number 
or  call  ^he  Toll  Free  number  listed  below. 

New  Subscription.A  one  year  (12  month) 
US  subscription  to  COMPUli!  is  $20,00  [2 
years,  $36.00;  3  years,  $5^.00.  For  sub- 
scription rates  outside  the  US,  see  staff 
page).  Send  us  your  name  and  address 
or  call  *he  Toll  Free  number  listed  below. 

Delivery  Problems.  If  you  receive  dupli- 
cate is-'iues  of  COMPUTE!,  if  you  experi- 
ence late  deliveiy  or  If  you  hove  prob- 
lems with  your  subscriplion,  please  call 
the  Toll  Free  number  listed  below. 


COMPUTE! 
800-334-0868 

in  NC  919-275-9809 


Fast,  Fast 

Relief  From  Expensive 

Software  Blahs. 


For  Commodore  VIC  20® 

Temple  of  Apshai $24  (T) 

A.E $24  (CT) 

Seafox $24  (CT) 

Skyblazer $24   (CT) 

3-Pac  Special $30  |CT) 

'Teiraguard/Black  Hole/ 

Videomania 

HomeAcct $45  (D( 

Piacticalc $26   (T) 

$29  (D) 

Quick  Brown  Fox $45 

KindercoTnp £24   (CT) 

Fort  Apocalypc £24   (CT) 

Necromancer $24  (CT) 

For  Commodore  64® 

Choplifter   $27  (CT) 

Seafox $24  (CT) 

Practicalc $33  (T) 

Practicalc $36  (D) 

Protector $21  (D&T) 

Shamus $21  (D&T) 

Sentinel $21 

Morgol $21 

Drelbs $21  (D&T) 

Turtle  Tutor $24  (CT) 

Paintbrush $18  (CT) 

Kindercomp $18  (CT) 

Pacemaker $21  (CT) 

Delta  Drawing $21  (CT) 

Inventory  Management   .  $49  (D) 

Accts.  Receivable $49  (D) 

Accts.  Payable $49  (D) 

General  Ledger $49  (D) 

Cash  Flow  Mgmnt $49  (D) 

Money  Manager £15  (D) 

For  Atari®    Home  Computers 

Target  Practice $10   (D&T) 

Spider  Quaker $10   (D&T) 

Rosens  Brigade $10   (D&T) 

Sea  Bandit $10   (D&T) 


(D&Tl 
(D&T) 


Choplifter $28 

HomeAcct $45 

Air  Support $21 

Dimension  X $21 

Zepplin   $21 

Blue  Max $21 

Temple  of  Apshai $24 

Gateway  of  Apshai $24 

Jumpman  Junior £25 

Nightriders $21 

Delta  Drawing $24 

Kids  on  Keys $21 

Alphabet  Zoo $21 

Word  Wizard $47 

Pooyan $19 

Hardware,  Too! 

Alphacom  40  Color  Printer  .  .  , 

VIC/Com  64/ Atari  Cable 

RANA  Atari  Disk  Drive 


(CT) 

(D) 

(D&T) 

(D&T) 

(D&T) 

(D&T) 

(D&T) 

(CT) 

(CT) 

(D) 

(CT) 

(CT) 

(CT) 

(D) 

(D) 


,  .  $90 

,  .  $29 

$329 


BMC  MONITORS 

12"  Green    $77 

13  "  Color  Comp $280 

USI  12"  Amber $149 

KOALAPAD 

For  Apple $75 

For  Atari $60 

For  Com  64   $60 

For  IBM   $75 

CARDCO 

3SlotVIC $26 

6  Slot  VIC $65 

16KV1C $52 

Cass  Interface/VIC $26 

Printer  Interface/ VIC  & 

Com  64 $52 

5SlotCom64 $43 

WICG 

Boss $12 

Batstick $17 

Redball $18 

Finally,  Books. 

Com  64  Reference  Guide $14 

VIC  20  Reference  Guide $12 

Elem.Com64 $10 

Book  of  Atari  Software $12 

Basic  Exercises/ Atari $9 

CODES:  (T)  =  Tape  (CT)  =  Cartridge 
(D)  =  Disc 

"Such-A-DeaH 
Software." 

903  S,  Rural  Rd.  "102 
Tempe,  A2  85281 

TO  ORDER  FAST,  FAST 

CALL  TOLL  FREE: 

1-800-431-8697 

For  Information  Only  (602)  969-9502 


Ordering  &  Terms:  Send  cashier  check,  money  order  or  bank  wire  transfer.  PersonalyCo.  checks  allow  3  wks.  bank  clearance.  VISA/MasteiCard  Accepted. 

Prices  subject  to  change.  Provide  phone  #  with  order.  Shipping:  Software  Add  $3.00,  Hardware  Add  $  10.00.  Arizona  residents  add  6%  sales  tax.  Returns  must  have 

authorizatian  #  (call  602-969-9502  for  authorization  #).  All  returned  merchandise  subject  to  restocking  fee  &  musf  come  with  all  original  packaging.  No  returns  allowed 

after  30  days  from  shipping  date.  Manufacluiers  warranty  applies.  Prices  reflect  a  cash  discount,  VISA/Mastercard  add  3%, 


Craftsmen  Need  Precision  Tools .  • . 
Programmers!  Demand  Precision  Software! 


BASIC  XL  has  mice  the  speed  and  twice 
the  power  of  Atari®  BASIC.  And  yet,  as 
befits  a  fine  ci^ftsmaii's  tcMil.  B.ASIC  XL  is 
even  easier  to  use  and  more  dependable, 
while  including  such  outstanding  major 
additions  as  structured  programtning, 
string  arrays,  programming  aids,  enhanced 
graphics,  and  business  capabliiiies. 

Atari  BASIC  is  a  good  starting  point.  We 
should  know.  We  wrote  it  in  1978.  Buy 
BASIC  XL.  Take  advantage  of  five  more 
years  of  experience! 

So,  prepare  yourself  for  some  explor- 
ation into  imaginative  programming  with 
BASIC  XL!  Cartridge,  excellent  tutorial, 
reference  manual . . .  S99- 


OSS 


'TM 


^  Precision  Software  Tools 

1173D  S.  Saratoga/Sunnyvale  Road 
San  Jose.  CA  95129  •  (408)  446-3099 


n  Functional,  honest,  and  beautiful 
U  describe  the  simple  lines  of  a  crafts- 
^\  man's  tools.  For  the  jeweler  these 
g    \  tools  are  an  extension  of  the  human 
I        \  hand  to  better  execute  complex 
\        /  designs.  For  you,  the  programmer. 
Precision  Software  tools  keep  com- 
plications out  of  your  programming  while 
allowing  you  to  produce  intricate 
programs. 


See  the  complete  collection  of  OSS 

Precision  Software''"  tools! 
MAC/65:    The  fastest  6502  macro 

assembler/editor  package  on 

cartridge . . .  S99. 
BUG/65:    A  powerful  debugger.  On  disk, 

with  OS/A+ . . .  $35, 
C/65:        The  first  native  mode  "small  c" 

compiler  for  Atari  and  Apple® 

computers.  On  disk . . .  $80. 
ACTION!:   The  fastest,  small  computer 

language  ever.  A  feature-i)acked 

cartridge  at  only . . .  $99. 


.\T.UtI  and  .APPLE  It.  are  iradenurks  of  Auri.  Inc  and  .Apple 
Computer,  [nc.  respecii\-eh .  .SUC'hi.  Bl'll  di.  C'6i.  BASIC 
XL.  OS/A*  and  OSS  PRECISION  SOFTtt'ARE'-  are  Iradentiria 
of  O.S.S.  I"iC.  ACnON!  is  a  trademarii  of  .Wlon  Coinpuler 
Produns. 


Super  Software  in  a  SuperCartridge! 

Expand  usable  memory  by  as  much  as  50%  ONLY  with  the 

OSS  SuperCartridge^". 

Pack  up  to  24,000  bytes  of  code  into  only  8K  of  your 

valuable  memory — Thanks  to  the  proprietary  memory 

bank  system  of  the  OSS  SuperCartridge^". 


Only  OSS  can  offer  you  these  Precision  Software  Tools  in  the  most 

advanced  cartridge  available. 


BASIC  XL 

ACTIONl 

MAC/65 

BUY  THE  BEST  and  only  complete 

PROGRAM  WITH  ACTION!— the  newest 

EXPERIENCE  THE  FASI'EST  6502  macro 

compatible  enhancement  of  Atari  BASIC! 

and  fastest  Precision  Software  Tool  from 

assembler  ever  produced.  MAC/65  gives 

BASIC  XL  makes  programming  easier  for 

OSS,  ACTION!  is  an  amazin^y  complete. 

you  more  than  speed.  It  makes  as.sembly 

both  the  beginner  and  experienced  pro- 

consistent, and  properly  structured 

language  programming  easier  and  more 

grammers  by  adding  dozens  of  powerful 

language  which  combines  features  from  C, 

pnxluctive  than  you  thought  possible. 

features. 

Pascal,  Ada,  and  even  BASIC. 

USE  SOPHISTICATED  MACROS  to  take 

LEARN  TO  PROGRAM  in  only  30  days 

WRITE  THE  FASTEST  GAMES  ever  written 

the  drudge  work  out  of  assembly  language. 

with  our  FREE  tutorial— the  best  yet  for 

in  a  high-level  language  for  6502-based 

Build  macros  libraries  to  make  easy  and 

ALL  Atari®  Home  Computers, 

computers.  Speeds  100  to  200  times  faster 

readable  code. 

BE  MORE  PRODUCriVE  by  using 

than  BASIC  are  standard  in  ACTION! 

EOrr,  ASSEMBLE,  AND  DEBUG  QUICKLY 

automatic  line  numbering  and  renum- 

programs. 

because  the  program  line  editor,  macro 

bering,  automatic  string  allocation, 

EDIT  WITH  EASE  thanks  to  ACTIONI's 

assembler,  and  a  very  effective  debugger 

intelligent  file  name  recognition,  and  more. 

built-in  screen  editor  which  compares 

are  always  just  a  command  away  in  this 

RUN  PROGRAMS  FAS'IER  with  BASIC 

favorably  to  even  the  best  word 

OSS  SuperCartridge. 

XL's  exclusive  FAST  mode.  Two  to  four 

processors. 

COMPARE  FEATURES.  No  other  complete 

times — or  even  more — faster  than  either 

PRODUCE  MORE  CODE  faster  and  easier 

6502  assembly  language  package  offers  al! 

of  Atari's  BASICS. 

using  ACTIONI's  program  monitor  and 

of  MAC/65's  advantages.  It  even  includes 

WRITE  BBFTER  PROGRAMS  with  string 

built-in  library  of  support  routines. 

support  for  the  65C02  CMOS  micro- 

arrays, structured  programming  controls, 

GET  A  FOUR-IN-ONE  DEAL  unlike 

processor  at  no  extra  charge. 

an  advanced  PRINT  USING,  extensive 

anything  ever  offered.  Editor,  compiler. 

ADDED  BONUS:  Buy  MA(y65  and  get  a 

Player/Missile  Graphics  support,  and  much. 

monitor,  and  library  al!  in  an  OSS 

65C02  microporcessor  for  less  than  $20, 

much  more. 

SuperCartridge, 

Ask  for  details. 

FIND  OUT  MORE  than  we  can  possibly 

put  in  this  ad  by  oilling  or  writing  for  a 

All  OSS  SuperCartridges  are  $99  each  and 

complete  catalog. 

will  work  in  any  Atari  computer  with  at 
least  16K  RAM.  Disk  or  cassette  hi^ly 

SUPER  BONUS 

recommended. 

Use  DOS  XL  with  a  SuperCartridge  and 

. 

save  an  extra  5K  of  valuable  RAM.  Retail 

value  $30.  Only  $10  with  purchase  of  any 

two  OSS  SuperCartridges. 

1^  OSS " 

^^k.  Precision  Software  Tools 

ATARI  is  J  iraderrarii  of  Auri.  Inc.  BASIC  XL  DOS  XL 
HAC/65  are  tratemiris  uf  OSS.  ACnON!  is  a  tndemit  of 

1173D  S.  Saratoga/Sunnyvale  Road 

Anion  Compuier  ProducE. 

San  Jose,  CA  95129  ■  (408)  446-3099 

Mothership  For  Timex/Sinclair 


Derek  Stubbs 

Mothership  is  a  fast  and  engaging 
space  game  for  the  Timex/Sinclair 
1000  with  16K  RAM.  It  has  sev- 
eral features  which  make  it 
unique. 

You  are  the  pilot  of  a  Star- 
light fighter  flying  in  a  long  can- 
yon (called  a  Zarway),  reminis- 
cent of  the  last  battle  scene  in 
Star  Wars.  The  fast-moving 
graphics  help  to  create  this 
illusion. 

Out  in  space,  at  the  end  of 
the  canyon,  is  the  giant  mother- 
ship  which  launches  waves  of 
drone  fighters  along  the  Zarway 
toward  you.  You  can  evade  them 
or  blast  them  with  your  laser, 
but  you  must  be  careful  not  to 
crash  into  the  sidewalls  of  the 
Zarway. 

The  object  of  the  game  is  to 
destroy  the  Mothership,  which 
can  evade  your  lasers  and  will 
fire  back  if  you  get  too  close.  The 
game  has  three  levels  -  and  can 
be  played  by  one  or  two  players. 

Though  Mothership  is  very 
difficult,  the  controls  make  it 
easier  to  play.  You  use  groups  of 
keys  rather  than  single  keys  to 
move  your  fighter  or  fire  your 
laser.  This  makes  the  game  seem 
like  an  arcade  game  where  you 
concentrate  on  the  screen  and 
just  "feel"  the  controls.  For  ex- 
ample, the  bottom  line  of  keys  is 
the  fire  button.  You  can  use  your 
thumb  to  tap  this  line  at  the  right 
time  while  your  other  fingers 
guide  your  fighter. 

This  package,  from  Soft- 
sync,  is  presented  well.  The  fast 
and  realistic  graphics  and  the 
easy  controls  make  it  one  of  the 
best  Timex/Sinclair  1000  space- 
war  games  I  have  seen.  It  is 
comparable  to  the  excellent 
game  Winged  Avenger  from 
Savage  Software. 

Depending  on  the  difficulty 
level  chosen,  anyone  over  the 
age  of  five  can  spend  many  hours 
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playing  and  enjoying  Mothership. 

Mothership 
Softsync 
P.O^Box480 
Murray  Hill  Station 
New  Yoric,  NY  10156 
$16.95  phis  $1 .50  shipping  and 
handling  © 


Guide  your  ship  up  and  down  the  center 
alley  and  fend  off  the  aliens  in  Turmoil. 


Turmoil  For  VIC, 
64,  And  Atari 

Tony  Roberts,  Assistant  Managing  Editor 

For  quick-draw  joystick  artists 
and  connoisseurs  of  shoot-and- 
run  videogames,  Turmoil  (Sirius 
Software)  may  be  the  fulfillment 
of  your  dreams. 

The  game,  which  is  available 
on  disk  for  the  Commodore  64 
and  on  cartridge  for  the  VIC-20 
and  Atari  computers,  is  guaran- 
teed to  leave  you  with  cramps  in 
your  joystick  hand,  and  may 
temporarily  short-circuit  your 
ability  to  concentrate  under 
pressure. 

Turmoil  was  designed  by 
MarkTurmell,  who  is  respon- 
sible for  several  other  successful 
Sirius  Software  games,  including 
Fast  Eddie,  Beer  Run,  and  Free 
Fall. 

The  object  of  the  game  is 
familiar:  destroy  the  aliens  before 
they  destroy  you.  The  complica- 
tions include  five  alien  ships, 
ghost  ships,  arrows,  and  prizes 
that  turn  into  supersonic  can- 
nonballs  if  you  fail  to  collect 
them. 

Attacking  The  Aliens 

Imagine  your  screen  divided 
into  seven  horizontal  traffic  lanes 
which  the  aliens  use  to  traverse 
your  monitor.  Down  the  center 
is  a  vertical  lane,  in  which  your 
ship  flies. 


Fly  your  ship  up  and  down 
the  center  alley  and  blast  those 
aliens.  They'll  be  on  you  quickly, 
so  keep  your  thumb  on  the  fire 
button.  Each  alien  ship  moves 
back  and  forth  at  a  different  pace, 
and  the  faster  the  ship  moves, 
the  more  points  it  is  worth. 

In  the  first  of  the  game's 
nine  levels,  things  will  be  rela- 
tively simple.  Zip  up  and  shoot 
left,  zip  down  and  shoot  right. 
Repeat.  Repeat.  Repeat.  Watch 
the  score  soar. 

Toss  In  A  Few  Curves 

Before  you  have  a  chance  to  get 
bored  with  your  success  at  shoot- 
ing everything  that  moves,  you'll 
be  overrun  with  problems  and 
wondering  how  you  can  save 
your  skin. 

Mixed  in  with  the  alien  ves- 
sels will  be  a  few  arrows.  If  you 
fail  to  wipe  out  the  arrows  on 
their  first  pass  across  the  screen, 
a  metamorphosis  occurs,  and 
you  have  to  cope  with  a  tank  - 
and  a  heavily  armed  one  at  that. 
Shooting  a  tank  head-on  won't 
destroy  it,  but  it  does  knock  it 
back  a  bit.  To  defeat  a  tank,  let  it 
pass  and  blast  it  from  behind. 

The  Prize  Eye 

Occasionally  youTl  see  some- 
thing that  looks  like  a  flashing 
eye  at  the  end  of  one  of  the  aliens' 
traffic  lanes.  This  is  a  prize,  and 
it's  worth  your  while  to  pick  it 
up  quickly. 

Under  normal  circumstances, 
you'll  remain  in  the  center  alley, 
flying  up  and  down.  However, 
when  a  prize  is  visible,  you'll  be 


allowed  to  fly  down  the  traffic 
lane  to  pick  it  up. 

If  you  fail  to  claim  the  prize, 
it  mutates  into  a  supersonic  can- 
nonball  and  behaves  much  like  a 
pong-game  ball  that's  gone  hay- 
wire. It  bounces  back  and  forth 
so  fast  that  getting  a  clean  shot 
at  it  is  nearly  impossible.  With  a 
supersonic  cannonball  on  the 
loose,  it's  usually  just  a  matter  of 
seconds  before  your  ship  has 
been  hit  and  you're  calling  in  the 
reserves. 

If  you  can  claim  your  prize, 
return  quickly  to  the  center  alley, 
or  you'll  be  smashed  by  an  inde- 
structible ghost  ship. 

Aliens,  More  And  Faster 

You  begin  the  game  with  five 
ships,  one  in  play  and  four  in 
reserve.  Wipe  out  all  the  aliens 
before  they  wipe  you  out,  and 
you'll  automatically  move  to  the 
next  level  and  receive  a  bonus 
ship  to  add  to  your  reserves,  up 
to  a  maximum  of  six. 

As  you  advance  to  higher 
levels,  the  play  becomes  faster, 
and  the  aliens  become  more 
numerous.  As  an  added  treat, 
after  you  reach  level  four,  the 
alien  traffic  lanes  occasionally 
become  invisible. 

If  the  aliens  get  the  best  of 
you,  as  they  are  bound  to,  press 
the  fire  button  to  start  a  new 
game  beginning  at  the  level  on 
which  you  started.  It  is  possible 
to  start  at  a  higher  level,  or  to 
change  levels  during  the  game, 
by  pressing  the  f5  key  on  Com- 
modore machines  or  the  SELECT 
key  on  the  Atari. 

Tunnoil  is  an  appropriate 
name  for  this  game.  There  are 
no  patterns  to  memorize  or  com- 
plicated strategies  (;o  develop. 
Building  a  hefty  point  total  de- 
pends solely  on  your  ability  to 
survive  amid  chaos. 
Turmoil 

Sirius  Software,  Inc. 
10364  Rockiiigbmi!  Drive 
Sacramento,  CA  95S27 
(916)366-1195 
Atari  carlrid<^e.  Commodore  64  disk, 

$34.95 
VlC-20  cartridge,  $34.95  © 


EDUCATORS  PREFER  GROUP 
LEARNING  WITH  EDUPRO  SOFTWARE 


Here's  what  educators  say  about  Edupro's 
multi-user  software: 

"/  have  one  microcomputer  in  my  classroom. 
Witti  Microgroup  programs,  more  ctiildren  tiave 
a  chance  to  use  it  eaclj  day. "  T  G.,  Dallas 

"Sometimes  ctiildren  compete  for  tlie  t)ighd5t 
score.  Other  times  tliey  cooperate  to  'beat  the 
clock '.  The  slower  ones  learn  from  the  faster 
ones.  No  one  gets  stuck. "         C.  R.  Cupertino 

"The  h/iicrograup  programs  offer  the  kids  a 
iot  of  variety.  My  kids  use  the  Storybook  Theme 
programs.  Each  program  has  four  learning 
games,  it's  easy  for  the  kids  to  switch  back 
and  forth."  K.  G.,  Minneapolis 

"/  tike  the  idea  of  easy  arid  hard  problems  in 
the  same  program.  Children  of  different  ages  or 
ability  levels  can  work  together " 

L,W.,  Tallahassee 

Group  learning  really  works. 

After  the  Edupro  Microgroup  4-player  and  8- 
player  programs  were  introduced  early  in  1983. 
educators  soon  confirmed  three  advantages: 

Efficiency.  By  allowing  several  children  to  use 
one  microcomputer  simultaneously  the  Micro- 
group  programs  increase  each  child's  lime  spent 
in  computer-aided  learning. 

Effectiveness.  Children  learn  effectively  in 
groups.  Older  and  more  advanced  students  test 
their  understanding  by  helping  those  who  are 
slower  Group  learning  stimulates  divergent 
thinking.  And  it  teaches  the  importance  of  worth- 
ing together  for  a  common  goal. 

Equity.  Children  differ  in  the  learning  situations 
they  prefer  Research  shows  that  differences 
in  gender  age,  and  culture  underiie  learning 
preferences.  The  Microgroup  programs  can  be 
used  by  groups  of  varying  sizes— even  by  a 
child  alone. 

Now  available  for  Apple®  Computers. 

Two-player  versions  of  many  Edupro  Atari- 
programs  are  now  available  for  the  Apple,  with 
your  choice  of  user-selected  keyboard  or  joystick 
control.  Other  new  programs  available  from 
Edupro  are: 

BASIC-Play.  This  is  the  most  enjoyable  com- 
puter literacy  tool  your  students  can  use.  Short 
BASIC  programs  are  presented  as  completion 
problems  in  Edupro's  familiar  WORD-DRAW 


format.  After  students  have  filled  in  the  miss- 
ing elements  of  a  program,  it  runs,  delighting 
them  with  sound,  graphics,  puzzles,  etc.  Stu- 
dents can  also  change  variables  and  observe 
different  outcomes. 

Don't  worry  if  your  students  seem  to  be 
having  fun.  BASlC-Play  is  teactiing  them  the 
essentials  of  Atari  or  Applesoft  BASIC. 


Oklahoma  Run.  The  year  is  1889.  Your  stu- 
dents are  poised  at  the  frontier  of  the  Oklahoma 
Territory  When  the  run  begins,  each  player 
stakes  out  a  homestead.  Ah,  but  no  two  home- 
steads are  the  same.  Given  location,  soil,  water, 
costs  of  supplies,  and  market  prices,  what 
should  a  player  raise?  What  about  drilling  for  oil? 
Will  it  be  boom  or  bust? 

This  multi-user  simulation  helps  students 
understand  the  interrelated  nature  of  land  use 
decisions.  Screen  graphics  include  aerial  views 
of  the  homesteads. 

First  Base  (a  single-user  program).  Children 
are  collectors.  They  collect  stamps,  coins,  base- 
ball cards,  and  more.  Children  need  a  database 
management  program,  but  a  simpler,  friendlier 
one  than  adults  use.  First  Base  has  been 
designed  for  ease  of  use,  yet  it  offers  flexibility 
in  record  storage,  retrieval,  and  display 

First  Base  comes  with  a  sample  file  of  baseball 
stars  and  their  statistics.  Fun  to  use,  simple  to 
learn  from. 

Share  the  excitement  of  group  learning  with 
software  from  Edupro.  Ask  for  Edupro  products 
for  Atari  and  Apple  computers  at  your  local  soft- 
ware dealer,  or  write  to: 

Edupro 

PO.  Box  51346 

Palo  Alio,  CA  94303 

415-494-2790    Dealer  inquiries  invited 


Atari  is  a  trademarit  of  ATARI  Inc.  Apple  is  a  trademarl*  ol  Apple  Compiler.  Inc. 


The  Commander  -  A 
Command  Extension  Facility 


Jim  Butterfield,  Associate  Editor 

The  Commander  is  a  4K  ROM 
for  PET/CBM  computers  with 
4.0  BASIC,  which  extends  the 
capabilities  of  BASIC  programs. 
It's  a  little  different  from  editing 
"enhancers"  and  is  worth  a  few 
extra  comments. 

There  are  essentially  two 
types  of  BASIC-helper  programs: 
editing  and  runtime. 

Editing  Aids 

Editing  packages  help  you  pre- 
pare a  program.  They  may  give 
you  ease  of  program  entry,  re- 
numbering, search  and  change 
capability,  and  other  features  to 
help  you  build  the  program  and 
spot  errors. 

Once  the  program  is  com- 
plete, the  editing  package  has 
done  its  job.  The  completed  pro- 
gram will  now  run  by  itself.  If 
you  have  prepared  a  program 
using  BASIC-Aid,  POWER, 
Sysres,  or  a  similar  package,  the 
final  program  can  run  on  any 
PET/CBM  -  even  ones  without 
the  editing  facility. 

In  other  words,  if  you  give  a 
friend  a  copy  of  a  program  that 
you've  written  using  one  of  the 
super-editors,  he  or  she  will  be 
able  to  load  it  and  run  it.  There's 
more:  since  the  final  program 
runs  without  using  the  editor,  it 
will  run  at  full  BASIC  speed. 

Runtime  Aids 

Runtime  packages  help  the  pro- 
gram run.  This  means  that  every- 
one who  wishes  to  run  a  program 
containing  a  runtime  package 
feature  must  also  have  the  pack- 
age. A  software  house  which 
created  products  using  the  Com- 
mander, for  example,  would 
need  to  specify  that  all  purchas- 
ers of  these  packages  must  also 
have  the  appropriate  runtime 
package. 
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A  potential  difficulty  of  run- 
time packages  can  be  that  pro- 
grams using  them  may  slow 
down,  due  to  the  extra  overhead. 
Many  packages  use  a  "wedge" 
technique  that  slows  everything 
down  -  sometimes  a  little,  some- 
times a  lot.  The  Commander 
doesn't  have  this  problem:  its 
functions  are  invoked  only  when 
the  program  calls  them  in  with  a 
suitable  SYS  command. 

The  Objectives 

An  editing  package  tries  to  solve 
the  question  "What's  missing 
from  the  machine's  regular  ed- 
iting features?"  A  runtime  pack- 
age addresses  the  question 
"What's  missing  from  BASIC?" 
People  may  have  different 
preferences  and  thoughts  about 
what's  missing,  based  on  their 
experience  with  other  BASICs 
and  other  languages.  The  Com- 
mander has  chosen  these: 

PRINT  USING:  Formats  a  floating 
point  variable  into  a  string  with 
a  specific  length  and  format; 

WINDOW:  Clears  a  specific  area 
of  the  screen,  on  either  40-  or  80- 
cotumn  machines; 

FRAME:  Prints  a  screen  message, 
enclosed  in  a  frame,  for  the  user's 
benefit; 

INSERT,  APPEND,  DELETE: 
Allows  a  program  to  be  changed 
as  it  runs; 

COM  LITERALS:  Repacks 
strings  to  help  the  above  change 
features; 

OVERLAY:  Allows  a  program  to 
call  another  program  to  continue 
the  run; 

RETURN  CLEAR:  Cancels  all 
GOSUB  and  FOR/NEXT  loop 

status; 

COMPUTED  GOTO:  Allows  a 


GOTO  address  to  be  calculated; 

MAT  PRINT#,  MAT  INPUT#, 
MAT  INIT,  MAT  ZER:  Allows 
arrays  to  be  saved,  recalled,  and 
cleared  quickly; 

ENHANCED  GET,  STRING: 
Allows  more  powerful  INPUT 
from  keyboard  or  file. 

invoking  Ttie  Commands 

Using  the  Commander,  you 
would  invoke  these  functions 
with  a  SYS  command.  First, 
you'd  be  expected  to  set  up  vari- 
ables which  set  the  range  of 
activities  needed.  For  example, 
to  delete  lines  300  to  400  in  a 
running  program,  you'd  type  in 
these  lines: 

360  BL  ==  300       (Begin  Line  300) 
370  EL  =400        (End  before  Line  400) 
380  GT  =400      (When  complete, 

GOTO  400) 
390  SYS  40006    (Delete) 

The  SYS  may  be  different, 
depending  on  the  particular 
RC)M  chip  fitted.  When  the  pro- 
gram reaches  line  390,  it  will 
delete  all  lines  from  300  to  just 
below  400  -  including  the  above 
lines  -  and  will  continue  running 
at  line  400. 

This  is  astonishing.  We've 
made  a  significant  change  in  a 
running  program  and  yet  the 
program  can  continue  running, 
complete  with  live  variables.  We 
can't  do  that  even  if  we  stopped 
the  program  and  made  a  change 
or  deletion:  our  variables  would 
disappear. 

The  Commander  allows  a 
program  to  modify  itself  as  it 
runs,  without  loss  of  variables. 
That's  amazing.  It's  also  danger- 
ous, and  some  computer  scien- 
tists might  argue  that  it's  bad 
practice.  The  argument  runs 
like  this:  BASIC  is  intended  to 
be  a  "fixed  framework"  pro- 
gram, and  all  BASIC  programs 
should  be  written  that  way.  Self- 
modifying programs  are  foreign 
to  BASIC:  but  with  the  Com- 
mander, you  can  have  them. 

Ctiainlng  And  Sucti 

Users  may  see  this  feature  as 
one  of  the  great  conveniences  of 
the  Commander.  Chaining  and 


Driving 
Commodore  is 
getting  easier 


Steer  your  way  to  greater  efficiency  and  meet  all  your 
administrative  needs  of  the  future  with  the  SUPER 
range  of  quality  software. 

Whether  you  want  a  fast  and  flexible  database,  a 
comprehensive  and  easy  to  use  word  processor,  or  a 
completely  integrated  office  'manager',  Precision  Soft- 
ware has  the  answer.  With  software  that  harnesses 
the  full  power  of  the  new  Commodore  "B"  Business 
Computer  (known  as  the  700  in  Europe). 


Database  manager  for  all  business  environments 
where  accurate  and  up-to-date  information  Is  the  key 
to  success. 

SUPERBASE  sets  new  standards  in  flexibility  and 
ease  of  use,  with  large  record  sizes,  fully  re-definable 
multi-screen  record  formats,  spreadsheet-like 
calculation  facilities,  fast  'B+  tree"  keyaccess  with 
selective  retrieval,  transaction  linking,  sorting  and  fully 
definable  report  formats.  SUPERBASE  can  also  be 
linked  to  SUPERSCRIPT  II. 
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'j^jj^^^  Enhanced  version  of  the  popular  full  feature  word 
'"""^     processor.  Unrivalled  tablo'tiandling  with  240  column 

wide  screen,  scrolling  in  all  directions,  arithmetic, 
memory  calculator,  column  manipulation  and  mail 
merge  with  record  selection.  Comprehensive  editing 
and  finish  quality  output  formatting.  Handles  up  to 
2,100  lines  of  80  column  text.  And  it  spellsl 
Versatile,  fast,  simple  to  learn  and  use, 
SUPERSCRIPT  II  processes  letters,  quotations, 
reports,  mailshots  and  standard  forms  with 
professional  ease,  enhancing  presentation  and 
ensuring  perfect  copies  every  time. 


Fast,  effective  spelling  checker  ensures  1 00% 
typographic  accuracy.  An  integral  part  of 
SUPERSCRIPT  II,  SUPERSPELL  checks  documents 
against  a  standard  30,000-i-  word  dictionary  and 
displays  a  list  of  every  unrecognised  word. 
SUPERSPELL  handles  both  English  and  American 
spelling  vahants.  You  can  accept,  ignore,  correct  or 
add  new  words,  building  up  your  own  dictionary 
extension.  SUPERSPELL  also  includes  a  word  look-  up  facility. 

The  ultimate  integrated  office  administration  system, 
with  full  records  management,  calculation,  word 
processing  and  spell  checking. 
SUPEROFFICE  combines  the  database  handling 

of  SUPERBASE  with  the  document  editing  and 

formatting  power  of  SUPERSCRIPT  II. 

The  availability  of  SUPERSCRIPT  II  as  an  Integral 

word  processor  enables  lists  selected  from  data  files  to 

be  used  for  mailshots,  tables,  standard  forms  and  labels. 

SUPEROFFICE  includes  a  powerful  programming  capability, 

enabling  you  to  build  up  a  library  of  your  own  programs. 

System-wide  help  screens  are  supported  by  clear 

comprehensive  manuals  and  tutorials. 

Choose  an  off-the-shelf  application  to  suit  your 

business  from  a  steadily  expanding  library. 

Find  out  more  about  the  Superseries  range  of 
Software.  Contact  your  local  Commodore 
Dealer  or  Precision  Software  at  our  U.K. 
office. 
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Precision 
Soltvvaic 


Precision  Software  Limited 

Park  House,  4  Park  Terrace, 
Worcester  Park,  Surrey,  KT4  7JZ. 
Telephone:  01-330  7166 
Telex;  8955021.  PRECIS  G  • 


overlaying  are  rather  complex 
activities  on  a  PET/CBM.  The 
Commander  gives  you  shortcuts 
which  make  the  job  easier.  The 
OVERLAY  command,  for  ex- 
ample, says  "throw  away  the 
old  program  and  variables  and 
start  the  new  one  I  have  named." 
INSERT,  APPEND,  and  DELETE 
commands,  on  the  other  hand, 
allow  the  user  to  modify  or  re- 
place the  running  program  with 
new  programming  and  keep 
going,  complete  with  variables 
in  place. 

The  system  takes  care  of 
most  activity  needed  to  preserve 
variables  (using  what  the  manual 
calls  a  "Common"  facility),  but 
one  kind  of  variable  needs  a  little 
extra  work  to  preserve:  "literal" 
strings.  This  is  the  type  of  string 
defined  by  a  statement  such  as 
X$  =  "PASS  1" .  The  string  is 
used  where  it  lies  in  the  program 
line;  deleting  the  program  line 
will  make  the  string  disappear. 
A  special  Common  command 
may  be  used  to  move  this  kind 
of  string  into  a  safe  place. 

PRINT  USING 

The  PRINT  USING  facility 
doesn't  print;  it  just  formats 
numbers  into  a  string,  from 
which  you  can  print  them.  It  has 
a  reasonable  complement  of  for- 
matting facilities  -  punctuation, 
commas,  etc.  -  but  doesn't  in- 
clude advanced  features  such  as 
floating  dollar  signs,  asterisk  fill, 
or  special  negative  symbols  such 
as  "CR"  or  parentheses, 

A  small  deficiency  of  the 
PRINT  USING  feature  on  the 
package  1  tested  was  that  num- 
bers are  not  rounded;  they  are 
truncated.  This  could  cause  prob- 
lems if  the  user  doesn't  watch 
for  it,  since  a  financial  number 
such  as  6.35  might  be  held  within 
the  computer  as  6.34999999;  this 
would  truncate  to  6.34,  which  is 
wrong.  The  user  can  cover  this 
possibility  by  adding  .005  to  the 
value  before  calling  PRINT 
USING:  but  it  would  be  better  if 
the  Commander  covered  this 
case. 

166    COMPUTE!    October  1983 


Odds  And  Ends 

The  FRAME  and  WINDOW  com- 
mands allow  nice  screen  displays 
to  be  generated  easily.  CON- 
VERT to  ASCII  can  be  useful  to 
interface  to  standard  ASCII  (non- 
Commodore)  printers,  if  the 
interface  hardware  doesn't  do  it 
already  for  you,  RETURN 
CLEAR  allows  you  to  exit  from 
subroutines  and  loops  in  an  un- 
orthodox manner,  and  computed 
GOTO  works  conveniently  and 
well.  The  programmer  should 
use  these  features  with  caution, 
since  they  could  lead  to  "cute" 
programming  that  may  cause 
debugging  problems. 

There  are  two  special  I/O 
commands.  STRING  INPUT 
allows  information  to  be  input 
from  disk,  including  punctuation 
such  as  commas  or  colons;  it's 
an  improvement  over  BASIC, 
which  trips  up  on  these.  There 
are  MAT  PRINT#  and  MAT 
1NPUT#  commands  to  save  and 
recall  arrays;  these  are  written 
and  read  in  a  highly  compacted 
form  to  save  time  and  disk  stor- 
age space.  Files  so  written  are 
not  strongly  compatible  with 
other  programs;  you  would  have 
considerable  difficulty  getting 
them  back  with  a  conventional 
set  of  INPUT  commands,  so 
you'll  want  to  use  MAT  INPUT# 
to  do  the  corresponding  input 
job. 

The  other  MAT  commands 
are  a  simple  set  of  array  com- 
mands which  allow  you  to  clear 
an  array  quickly  (set  to  zero  or 
null  string).  There's  a  gimmick 
which  might  be  useful:  you 
don't  have  to  clear  the  whole 
array,  since  you  can  start  part- 
way through  and  clear  from  that 
point  on. 

Packaging 

The  Commander  comes  in  two 
versions.  Version  11-4  goes  into 
socket  UDll  (or  UD4  on  older 
machines)  and  has  SYS  addresses 
in  the  range  40000  to  40110;  ver- 
sion 12-3  is  for  socket  UD12  (or 
UD3  on  older  machines)  and  has 
SYS  addresses  in  the  range  44000 


to  44110.  If  your  computer  al- 
ready has  one  ROM  chip  in  place, 
you  can  order  the  version  which 
fits  your  blank  socket;  otherwise, 
it  doesn't  matter. 

Documentation  is  complete, 
but  a  little  fuzzy.  The  manual 
will  seem  cryptic  to  the  beginner 
-  for  example,  the  Common  fa- 
cility is  described  in  detail  even 
though  in  most  cases  it's  auto- 
matically invoked  when  needed. 
However,  the  Commander 
comes  with  a  demonstration 
diskette,  which  serves  as  won- 
derful documentation.  The  user 
is  invited  to  stop  the  demonstra- 
tion programs  and  invoke  vari- 
ous features.  By  using  this  disk- 
ette, the  user  will  enjoy  a  well- 
paced  training  experience. 

Programs  written  using  the 
Commander  will  always  need  the 
Commander.  You  must  be  pre- 
pared to  live  with  this;  but  once 
you  do,  you'll  find  a  host  of  dy- 
namic leatures  at  your  fingertips. 

Many  of  the  features  are  use- 
ful; and  the  capability  of  having 
a  program  modify  itself  while 
running  is  exceptional.  Using 
the  Commander,  there  are  new 
possibilities  for  your  system. 
The  Commander 
$70,  iiicltidiii;^  iiiiituiiil  iiiid  demo 

diskctlc 
Sfn'clfy  ROM  i-xfmiisioi!  socket,  and 

4040  or  8050  demo  diiikcttc 
Comntaiuier  Systcim  Inc. 
4305  jacksoii  Street 
Hollifiuaod,FL  33021  @ 


Picnic 
Paranoia 
For  Atari 

James  V.  Trunzo 

Ants  and  more  ants  march  re- 
lentlessly upon  their  objective. 
Spiders  bar  pathways  while  spin- 
ning silvery  webs,  knowing  that 
the  threat  of  their  bite  will  make 
wary  any  who  wish  them  harm. 
Wasps  hover  and  dart  about, 
their  seemingly  erratic  flight 


THIS  FUNNY-LOOKING  LITTLE  DEVICE 


Introducing  the  Disc-Doubler, "  the  funny-looking 
amazing  little  device  that  actually  doublesyour  "floppy 
disc"*  capabilities!  Just  put  a  floppy  disc  in  and  it's  re- 
aligned for  useon  its  "flip  side!' It's  that  simple!  And  atjust 
^14.95  (plus  si.50for  postage  and  handling)  it'll  pay  for 
itself  the  minute  you  use  it!  From  LinkMarketing,  where 
we  looked  at  the  problem  from  both  sides. ..and  found 
a  way  to  save  you  money! 

CAN  DOUBLE 

YOUR  DISC 

CAPABILITIES! 

Just  $1495! 

(plus  $1.50  postage  and  handling-B.C.  residents 
add  6%  tax). 

IN  CANADA: 

write:  Link  Marketing 

1480  West  S8th  Avenue,  Vancouver,  B.C.  V6P  I WS 


Victor 

Frankiirr 

Apple 

Atari 
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I  operator  1 27 
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or  write:  Link  Marketing 

2 1 9- 1  St  Ave.  N.,  Suite  2 1 5,  Seattle,  WA  98 1 09 


COMMODORE  USERS 

Join  the  largest,  active  Commodore  users  group. 
Benefit  from: 

—  Access  to  hundreds  of  public  donnain 
programs  on  tape  and  disk  for  your 
Commodore  64,  VIC  20  and  PET/CBM. 

—  Informative  monthly  club  magazine 
THE  TORPET. 


Send  $1.00  for  Program  &  Information  Catalogue. 

(Free  with  memberstiip). 


Membership 
Fees  for 
12  Months 


Canada  —  $20  Can. 
U.S.A.  —  $20  U.S. 
Overseas    —    $30  U.S. 


Toronto  Pet  Users  Group 

Department  "S" 

1912A  Avenue  Road,  Suite  1 

Toronto,  Ontario,  Canada  M5M  4A1 

*   LET  us  KNOW  WHICH  MACHINE  YOU  USE  * 


Model  EP-2A-79 

EPROM  Programmer 


Three  years  in  the  field  with  unsurpassed  performance.  Software  is  available  for 
the  EP-2A-79  for  most  all  of  the  microcomputer?  including  the  popular  CP/M 
FLEX,  HDOS  operating  si.'stems.  Write  or  call  for  specific  hardware/software  inter- 
facing. Drii/er  packages  available  for  F-8,  6800,  6809,  8080,  8085,  Z  80,  1802, 
6502  and  2650  based  systems. 
EP-2A-79        115V  50/60  HZ $169.00 


PMO  TMS2708 

PMl  2704,2708 

PM-2  2732      .    . 

PM-2A  2732A 

PM-3  TMS2716 
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PM-9 
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2816      
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2764      
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33.00    SA-64-3    2764,27128 


$17.00 
35.00 
35.00 
35.00 
39.00 
39,00 


PM4        TMS  2532 

Optimal  Technology,  Inc. 

Phone  (804)  973-5482 
Blue  Wood  127  Earlysville,  VA  22936 


patterns  only  a  guise  that  will 
better  enable  them  to  deliver  a 
painful  and  harmful  sting. 

Is  this  a  sci-fi  movie  about 
insects  gone  berserk,  on  TV  at 
four  o'clock  in  the  morning?  No, 
it's  Piciuc  Paranoia,  written  by 
Russ  Segal  and  produced  by 
Synapse  Software. 

Picnic  Paranoia  is  a  refresh- 
ingly different  hi-res  arcade 
game  that  is  much  more  than 
just  another  simple  variation  on 
a  theme.  The  only  similarity 
between  Picnic  Paranoia  and, 
say.  Centipedes  or  Millipede  is  that 
insects  are  the  antagonists.  But 
unlike  those  games  and  many 
others,  the  "villains"  in  this 
game  aren't  out  to  attack  you 
directly.  They  are  after  some- 
thing even  better  -  your  food. 

As  the  title  suggests.  Picnic 
Paranoia  deals  with  that  universal 
summer  pleasure,  the  picnic. 
The  game  puts  you  in  the  role  of 
George,  the  beleaguered  pic- 
nicker, and  puts  you  right  in  the 
middle  of  four  rectangular,  food- 
covered  picnic  tables. 

The  tranquility  of  the  mo- 
ment is  shattered,  however,  by 
the  appearance  of  the  first  of 
many  black  ants  intent  upon 
pushing  the  food  off  the  table, 
across  the  lawn,  and  off  the 
screen.  Thev  are  aided  in  their 
endeavors  hy  spiders  (a  real 
nuisance)  and  wasps  (down- 
right vicious)  -  though  neither 
spiders  nor  wasps  have  any  de- 
sire for  your  food. 

Armed  with  a  flyswatter, 
you  must  dispatch  the  insects  as 
quickly  as  possible  and  thus 
prevent  them  from  carrying  off 
your  feast.  It  all  sounds  rather 
simple,  doesn't  it?  Well,  it  isn't. 
Without  quick  reflexes,  intent 
concentration,  and  some  strategy, 
you  are  soon  overwhelmed  by 
the  sheer  number  of  insects 
scurrying  all  over  the  screen. 

How  George  Swats 

The  mechanics  of  Picnic  Paranoia 
are,  for  the  most  part,  clean,  and 
they  function  without  a  hitch. 
George,  who  is  moved  around 
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the  screen  by  a  joystick,  swats 
the  assorted  nasties  in  one  of 
two  ways.  By  depressing  and 
holding  the  button  on  the  joy- 
stick and  moving  the  stick  slightly 
in  the  direction  George  is  facing, 
he  achieves  one  slap  with  the 
flyswatter.  By  continuing  to 
press  the  joysHck  in  a  given  di- 
rection, he  walks  and  swats  at 
the  same  time.  George  walks 
faster  when  he  isn't  swatting  - 
something  to  keep  in  mind  if  no 
insects  are  in  his  path. 

The  only  aspect  that  takes 
some  getting  used  to  is  the  tech- 
nique needed  to  return  food  to 
the  table  after  it  has  been  pushed 
onto  the  lawn  by  the  ants.  This 
is  important  because  food  on  the 
table  is  worth  more  points  than 
food  on  the  ground,  and  at  least 
one  food  item  must  be  on  a  table 
at  the  end  of  each  round  or  the 
game  comes  to  an  end. 

To  return  food  to  the  table, 
George  must  swat  the  food,  drag 
or  push  it  to  a  table,  and  release 
it  by  swatting  it  again.  The  fire 
button  must  be  released  before 
you  attempt  to  drag  or  push 
the  food . 

Picnic  Paranoia  plays  through 
a  series  of  90-second  rounds. 
During  this  time,  George  can 
score  points  in  two  ways:  (1)  by 
killing  insects,  and  (2)  by  pre- 
venting his  food  from  being 
pushed  off  the  screen.  The  ants, 
spiders,  and  wasps  are  worth 
10,  20,  and  40  points,  respec- 
tively, multiplied  by  the  round 
just  completed.  An  ant  killed  on 
round  five,  for  example,  would 
be  worth  50  points.  The  value  of 
any  food  remaining  at  the  end  of 
each  round  can  range  anywhere 
from  30  to  100  points  times  the 
given  round,  depending  upon 
the  food's  final  position.  Food 
still  on  the  table  is  worth  twice 
as  much  as  food  left  on  the 
ground.  After  the  first  5000 
points  have  been  scored,  and  for 
every  10,000  points  after  that, 
you  earn  a  bonus. 

However,  unlike  most 
games.  Picnic  Paranoia  does  not 
reward  you  with  an  extra  player 


Sivnttijig  at  hordes  of  iiiaynHiiiii^  iiul!^ 
zphile  dodging  n  bee  in  Picnic  Paranoia. 


(you  are  given  three  Georges  at 
the  beginning  of  the  game).  In- 
stead, you  are  given  a  can  of  bug 
spray,  which  can  be  brought 
into  plav  by  hitting  the  space  bar 
on  the  computer.  The  can  of 
spray  then  traverses  the  screen 
three  times,  killing  all  insects  on 
the  screen  at  the  time.  Powerful 
stuff,  but  no  points  are  awarded 
for  insects  sent  to  "bug  heaven" 
by  the  spray.  Special  concepts 
like  the  bug  spray  will  make 
owners  of  Picnic  Paranoia  enjoy 
the  contest  all  the  more. 

Strategic  Moves 

Strategy  enters  the  game  in  sev- 
eral ways.  A  red  "door"  is  lo- 
cated in  the  middle  of  each  of 
the  four  sides  of  the  playing  field. 
By  entering  a  door,  George  is 
able  to  pop  out  on  the  other  side 
of  the  screen.  Making  good  use 
of  the  doors  allows  you  to  quickly 
maneuver  him  around  the  picnic 
grounds,  arrive  at  trouble  areas 
sooner,  and  often  save  food  from 
being  pushed  off  the  screen. 

A  second  strategy  is  so  ob- 
vious that  it  might  be  over- 
looked. Each  insect  is  unique 
and  creates  different  problems. 
By  recognizing  each  insect's 
characteristics,  you  can  deter- 
mine your  best  attack  at  any 
particular  time  during  a  round. 
The  ants  can't  hurt  George,  but 
the}^  are  the  only  insect  that  can 
carry  off  the  food.  This  must 
always  be  foremost  in  your  mind. 

Spiders  can  bite  George, 
sending  him  to  the  middle  of  the 
screen  in  a  state  of  temporary 
paralysis.  However,  the  spiders 


are  most  annoying  for  the  webs 
they  spin,  blocking  pathways 
and  thus  making  movement 
impossible  until  the  webs  are 
swatted  and  destroyed.  Since 
speed  is  an  integral  part  of  the 
game,  the  webs  can  exert  a  sig- 
nificant influence  on  the  eventual 
outcome  of  the  contest. 

Finally,  the  wasp's  sting  is 
more  than  twice  as  potent  as  the 
spider's  bite.  It,  too,  sends 
George  to  the  middle  of  the 
screen,  but  leaves  him  immobile 
much  longer.  The  wasp  is  diffi- 
cult to  hit,  and  as  soon  as  one  is 
eliminated,  another  appears. 
A  third  bit  of  strategy  in- 
volves the  use  of  the  bonus  can 
of  bug  spray.  For  maximum  ben- 
efit, the  timing  must  be  right. 
Use  it  too  early,  and  you  will  still 
have  the  greater  part  of  the  round 
left  to  play.  Use  it  too  late,  and 
you  may  have  wasted  an  oppor- 
tunity to  save  it  for  a  more  crucial 
moment  in  a  following  round. 

The  last  strategy  will  be 
familiar  to  those  who  have 
played  such  games  as  Missile 
Coiiunaiui.  hi  the  later  rounds, 
after  you  have  lost  several  food 
items,  as  vou  undoubtedly  will, 
do  not  waste  your  effort  de- 
fending empty  tables.  Concen- 
trate on  attacking  the  insects 
surrounding  tables  that  still  have 
food  on  them.  Just  as  in  Missile 
Command,  where  it  is  of 
maximum  importance  to  keep  at 
least  one  city  safe  (and  ignore 
empty  earth),  in  Pioiic  Piinuioia 
you  must  keep  at  least  one  piece 
of  food  on  a  table.  Therefore, 
minimize  the  area  you  must 
cover  by,  for  example,  zeroing 
in  on  the  two  tables  with  the 
most  food  on  them. 

Picnic  Paranoia  offers  several 
options  for  the  gamer.  In  what 
has  become  standard  practice 
with  most  video  and  computer 
games,  Picnic  Paranoia  offers  five 
levels  of  difficulty.  Selecting  a 
higher  difficulty  level  simply 
starts  the  game  off  at  an  ad- 
vanced round.  Because  each  90- 
second  round  features  more  and 
more  insects,  by  beginning  at  a 


higher  round,  you  face  a  greater 
challenge  right  from  the  start. 

The  game  also  offers  a  day 
or  night  option.  By  selecting  the 
night  option,  you  change  the 
green  lawn  playing  screen  to  a 
solid  black.  This  is  not  to  suggest, 
however,  that  the  night  option 
is  simplv  cosmetic.  When  you 
are  playing  at  night,  you  cannot 
see  the  picnic  tables,  and  move- 
ment is  difficult.  It  is  easy  to  run 
George  into  a  corner  of  one  of 
the  invisible  tables.  Playing  at 
night  increases  the  difficulty  of 
Picnic  Paranoia  much  more  than 
just  selecting  a  higher  difficulty 
level. 

Picnic  Paranoia  also  offers 
some  of  the  finest  graphics  and 
sound  available  today.  From  the 
opening  song  and  graphics  of 
the  title  page  -  a  delightful 
animation  accompanied  by  a 
rousing  rendition  of  the  "Flight 
of  the  Bumblebee"  -  to  the 
game-ending  animation  where 
literally  scores  of  ants  push 
George  off  the  screen  and  spell 
out  (with  their  bodies)  "THE 
END,"  the  hi-res  graphics  are 
excellent. 

Great  attention  has  been 
paid  to  detail  in  all  areas:  the 
foods  on  the  table  look  absolutely 
edible  and  are  identifiable,  not 
just  shapes  of  familiar  objects. 
George  himself  is  a  sight  to  be- 
hold, complete  with  a  tiny  brush 
mustache  and  hat.  Even  the  in- 
sects are  finely  done,  the  wasp 
drawn  with  constantly  fluttering 
wings,  stripes,  and  stinger. 
George's  face  turns  red  with 
embarrassment  when  stung.  A 
cacophony  of  sounds  matches 
the  graphics  to  round  out  this 
fine  effort,  and,  as  you  would 
expect,  all  animation  is  flicker- 
free. 

Picnic  Paranoia  is  available 
from  Synapse  Software  in  either 
cassette  or  disk  format.  It  runs 
in  16K. 

Picnic  Paranoia 
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INSIGHT:  Atari 


Bill  Wilkinson 


Last  month,  I  said  that  this  month's  column  would 
include  the  final  part  of  the  series  on  writing  self- 
relocatable  code.  Unfortunately,  that  project  has 
turned  out  to  be  bigger  than  I  thought  it  would 
be,  so  I  am  going  to  put  it  off  a  month  and  devote 
an  entire  column  to  it.  However,  as  compensation, 
I  will  finally  discuss  the  "new"  Atari  graphics 
modes  I  hinted  at  a  couple  of  months  back.  Before 
I  get  to  the  juicy  stuff,  though,  I'd  like  to  continue 
a  little  of  the  ranting  and  raving  that  I  started  last 
month. 

How  To  Shed  50  Kilobytes  Without 
Even  Trying 

I  heard  (from  two  different  sources)  the  official 
Atari  "line"  regarding  the  new  1050  disk  drives. 
It  seems  that  Atari  chose  to  utilize  only  128  bytes 
per  sector  and  only  127K  bytes  of  file  space  per 
driveinorder  to  achieve  "increased  reliability." 
Honest.  Do  you  believe  it? 

Actually,  that's  pure  computer  puckey  (to 
paraphrase  Colonel  Sherman  Potter).  And  it's 
ridiculous  for  several  reasons. 

First  off.  Atari  is  implying  that  double-density 
drives  are  unreliable.  If  that's  true,  then  IBM, 
Radio  Shack,  Commodore,  and  a  lot  of  other  com- 
puter companies  are  in  real  trouble.  Actually, 
Atari  and  Apple  are  the  ony  major  computer  com- 
panies still  relying  on  single-density  technology 
as  their  primary  modus  operandi.  And,  despite 
Atari's  claims,  even  Atari's  1050  is  actually  using 
true  double  density. 

It  turns  out  -  based  on  what  we  have  gleaned 
from  the  specs  of  DOS  III  at  this  time  -  that  Atari 
formats  the  1050  drive  with  40  tracks  of  32  sectors 
each,  with  128  bytes  per  sector.  That's  a  total  of 
160K  bytes.  Most  double-density  manufacturers 
achieve  either  identically  the  same  total  (40  tracks 
times  16  sectors  times  256  bytes)  or  slightly  more 
(40  tracks  times  18  sectors  times  256  bytes  equals 
180K  bytes  -  the  format  used  by  most  Atari^ 
compatible  drives  such  as  Percom,  Astral,  Micro- 
Mainframe,  etc.).  So  why  does  Atari  claim  only 
127K  bytes? 

Real  simple:  DOS  III  only  supports  127K 
bytes.  Shall  1  say  that  I  don't  know  why  Atari 
chose  this  limitation?  With  a  relatively  minor 
modification,  and  by  using  only  another  64  bytes 
of  memory  per  drive,  DOS  III  could  have  sup- 
ported a  full  180K  drive. 

Now,  as  it  turns  out,  I  do  happen  to  know 
the  real  reason  Atari  chose  128  bytes  per  sector. 
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And  I  know  this  from  the  most  reliable  of  sources, 
one  of  the  DOS  Ill's  designers. 

It  seems  that  so  many  of  Atari's  own  products 
violate  Atari's  own  "rules"  (especially  those  about 
respecting  the  LOMEM  pointers),  and  so  many 
other  products  also  reach  outside  DOS  to  do  direct 
sector  disk  I/O  that  Atari's  planners  were  fearful 
of  the  impact  of  changing  either  LOMEM  or  the 
sector  size.  Hence  the  scheme  of  DOS  III. 

A  secondary  impact  of  the  LOMEM  problem 
was  that  it  caused  more  and  more  of  DOS  III  to  be 
moved  to  the  diskette  from  memory,  to  be  called 
in  as  overlays  when  the  user  requested  a  function 
not  in  memory.  Even  the  keyboard  menu  proces- 
sor eventually  got  moved  to  disk.  The  result  of  all 
this?  While  DOS  III  may  be  the  easiest-to-use  DOS 
yet,  it  still  suffers  from  the  time-consuming  swaps 
to  a  MEM.SAV  file  when  you  want  to  achieve 
something  as  simple  a,s  getting  a  disk  directory. 

(Of  course,  there  is,a  very,  very  elegant  way 
to  completely  avoid  the  LOMEM  problem  on  the 
new  Atari  XL  computers.  Why  not  move  the  DOS 
into  the  as-yet-unused  extra  memory?  Why  waste 
14K  bytes  of  RAM?  I  probably  shouldn't  drop  this 
idea  in  Atari's  laps  [I  should  sell  it  to  them],  but  it 
will  take  them  at  least  six  months  to  even  discuss 
it,  sol  figure  it's  OK.) 

As  I  said  last  month,  DOS  III  contains  a  nice 
little  file  manager.  It's  a  crying  shame  that  it  wasn't 
released  three  or  four  years  ago,  since  it  seems 
ideally  suited  to  an  810  size  drive.  But  it  doesn't 
look  to  me  like  a  system  for  the  long  haul,  when 
larger  and  larger  drives  become  available  for  the 
new  Atari  computers. 

And  lest  too  many  of  my  critics  cry  "foul"  for 
my  promoting  OSS's  version  4  DOS  (which  will 
allow  up  to  32  megabytes  per  disk  drive),  let  me 
hasten  to  say  that  I  am  not  suggesting  that  version 
4  and  the  1050  are  necessarily  the  answer.  What  I 
am  saying  is  that  Atari  could  have  achieved  virtu- 
ally the  same  results  by  sticking  with  DOS  2.0 
and  extending  it  to  handle  up  to  120K  bytes  of  file 
space  (with  128  byte  sectors  -it  will  handle  240K 
bytes  with  256  byte  sectors). 

Well,  enough.  I  promise  no  more  on  this  sub- 
ject until  I  give  you  the  patches  to  DOS  2.0s  to 
give  you  120K  bytes  on  a  1050.  In  the  meantime, 
ask  yourself  this  question:  if  DOS  III  is  limited  to 
127K  bytes  of  file  space,  how  will  Atari  handle  the 
double-sided,  double-density  drive  in  the 
1450XLD,  which  will  have  a  capacity  of  at  least 
320K  bytes?  Atari,  will  you  answer? 


Guarantee:  We  will  ship  your  order  for  items  in  this  ad  within  48  working 
(Books/non-released  items  excluded.  Gift  certificate  issued.  Offer 


SPELLICOPTER 


Dtt/ignUlaM 


Become  a  spelling  ace  as  wb^I  as  an  ace  chopper  pilot  wilh 
ihis  action  learning  game  tor  ages  6  to  adult  Rescue  ihe 
5ecrel  word,  letter  by  leitef  usmg  the  conteitl  clue  at  the 
Dottom  o!  the  screen  Comes  with  spelling  lists  Aiih  400 
wards.  Becajse  you  can  create  yOLjr  own  word  lists  and 
dues,  It  s  perfect  lor  practicing  eacn  weeks  spell  ng  3es- 
sofi  Lively  soLind  efiects.  graphics  and  animatioii  make 
learning  Ilh' 

Atari  48K  Disk  S39,95 


CREATURE 
CREATOR 

DeflgnUJoM 


Do  Ihe  Monsler  MalCh!  This  compuler  discovery  game  lor 
ages  i  to  6  years  is  a  challenging  matching  actiuiiy.  Hours 
ol  enlertainmeni  as  individuals  oi  groups  create 
thousands  ol  difterenl  combinations  ol  heads,  acms. 
bodies  and  legs.  Crsatures  can  De  animated  v»ilh  dancing 
steps  jusl  by  pressing  6  keys.  Simple  on-screen  instruc- 
lions  help  children  learn  concepts  of  compuler  program- 
ming and  patlern  recognition 

Atari  48K  Disk  S39.95 


COLOR  DISKEHES 

GET  ONC  COLOR  DISKtriE  FOR  ONLY  J1.00  WITH 
THIS  COUPON  AT  ANY  Of  OUR  PARTICIPATING 
STORES  {coupon  not  redeemable  through  mall  orderj 
The  whole  disk  IS  colored  —  nol  |USI  ine  envelope:  It  s  so 
hard  10  describe,  we  want  you  to  see  ii  Try  Ihese  pfemium 
quality  disks  in  S  bright  colors  Try  a  drlterent  color  lor  each 
subject  or  person.  Available  in  poxes  ot  ten.  alt  one  color 
tOrS34  50 

#40262  Green  #33242  Orange 


#37460  Red 
#33534  Blue 


#29865  Yellow 


S34.50 


#  tests  Assorted  Colors 

Name 

Address  

City  Slate  


$39.50 


-Zip- 


Type  ol  Compuler 


CRYPTO 
CUBE 

De/ignUffwe 


t>y  Paul  ftfelsfe//?  from  Sirius 

1 983  Golden  jQystick  Award  lor  besl  graphics!  Bizarre  3-D 
scrolling,  action  mazes'  Select  Irom  26  incredible  tour- 
neys. You  II  have  a  compass  and  a  map  ol  your  travels  al 
the  bottom  of  the  screen  Save  9  dilterenl  locations  or  Ihe 
entire  game  You  must  avoid  the  miscnevious  hiding  Ciep- 
langie.  Keep  your  eye  on  tne  lireflies.  they  II  show  you 
which  way  the  wind  s  DJowing  in  the  maze  and  maybe  even 
give  you  a  clue  to  the  WAVOUT! 

44075  Atari  32K 
DlskS39.95 


A  three-dimensional  word  game,  includes  ready-lo-solue 

puzzles  for  all  proficiency  levels  and  ages  from  8  to  adult 

The  50  topical  puzzles  are  inlerestmg  lor  everyone.  Since 

players  can  lype  in  their  own  words.  Its  Ihe  perlect  way  to  m^^Pfc 

gently  lead  children  10  greater  vocabularies  The  uuilt  m    C|/YBl*»ZcR 

puzzle  generator  turns  new  lists  into  puzzles.  What  achat-    Wl*  1  l*fc^*^fc»» 

lenge! 

Atari  48K  Disk  SaSreff 
20%  OFF  SALE 
NotwtilOct.  31 

$31.96 


hours  or  you  get  a  20%  rebate, 
expires  October  31, 1983) 

DEEP  BLUE  C 
COMPILER 

by  John  H,  Po/evrch  Irom  APX 

This  implementation  ot  the  Small  C  language  tills  the  gap 
between  BASIC  and  assembly  language  C  is  more  pow- 
erful and  laslei  than  BASIC  yet  clearer  and  less  error- 
prone  then  assembly  language  Now  you  can  create  C 
programs  on  your  Alan-  ones  that  contain  more  than  a 
hundred  lines  ol  code.  Includes  a  library  ot  commands  and 
user  manual  which  eases  the  transition  to  C  Requires 
Atari  Program  Text  Editor  or  other  nonline  oriented  text 
editor 

241 41  Deep  Blue  C  Atari  48K  Disk  S39.95 
1  28796  Program  Text  Editor  Atari  32K 

iDiskS39.95 

THEC 

PROGRAMMING 

LANGUAGE 

by  Brian  W.  K^rrighan  ar^d  Denojjr  M.  Ritchie  Irom 
Prenhce-Hal! 

This  IS  the  lirst  available  text  on  the  rapidly  developing  C 
programming  language  It  otters  a  detailed  yet  under- 
slandaDie  enplanalion  ot  all  aspects  ot  the  C  language 
Incorporating  examples  that  are  complete  programs.  Ihe 
te«t  not  only  teacheslhe  language  but  demonstrates  use- 
ful algorithms,  data  structures  and  programming  lech- 
nigues 

Softcover  Book  SI  7.95 
SPECIAL  PPICE  ALL 
THREE  FOR  $77.85 
A  S20.00  SAVINGS! 


KID 
GRID 


byArri  Hanounian  from  Tromx 

Its  the  wildest,  wackiest  v«deOchase  inis  atde  of  the  ar- 
cades Your  job  IS  to  conreci  alt  the  dots  on  itie  colorful 
grid-  EasVi  rignf  Pac-Man  looked  easy  too^  ll'sharderthan 
it  looks  because  the  OuHies  are  m  hot  pursuit!  Squashtace, 
Thuggy,  Muggy  and  Moose  aire  all  in  ihe  game,  if  they 
catch  vo:j,  Ihe  results  are  explosive  So  keep  your  eyes 
peeled  lor  the  mystenous  bouncing  question  mark  and 
doni  sicw  down' 

43524  Atari  1 6K  Tape  S2ftr9S 
43535  Atari  16K  Disk  S2»r95 
15%  OFF  SALE  Now  til  Oct.  31  S25,45 


by  Tony  Suluki  Irom  Broderoor^d  

Stand  by  lor  brilliant  aerial  actioni  You  ve  hidden  away  that 
vintage  WWIII  lel  which  you II  need  to  clear  away  radar 
stations,  avoid  supersonic  lanKs,  find  and  destroy  ICBM 
installations,  escape  heat-secHing  missiles  and  explosive 
sky  mines  Make  your  final  bomb  run  on  the  Bungeimg 
Empire  Headquarters' Joystick  conlrolled 

34928  Atari  48K  Disk  S3*rW 

20%  OFF  SALE  Now  til  Oct.  31    S25.56 

MATCH-. 
BOXES 

by  Al  Cheser  from  Broderbund 
An  antimated  game  far  the  familyl  Lurking  behind  a  grid  of 
36  numbered  boxes  is  an  anmated  menagerie  of  colorful 
characters,  creatures  and  oO|ects.  each  with  a  catchy  tune 
all  lis  own.  Uncover  Doxes  two  al  a  lime  to  match  pairs  ol 
light  and  sound  to  solve  a  hidden  word  puzzle  Seven 
d<fferent  games  for  1  or  2  players  A  delighl  lor  the  eyes, 
ears  and  nleHect' 

34265  Atari  32K  Tape  S29.95 
23814  Atari  32K  Disk  S29.95 


JOY  SENSOR  / 


from  Svncom  '"^^ 

Exciting  breakthrough  in  game  controllers!  Touch  sensitive 
with  no  stick  Jusl  the  right  combination  of  control  and 
responsiveness  includes  switch  to  move  only  m  horizon- 
tal and  vertical  or  all  eight  directions  Moves  are  executed 
much  taster  —  the  slightest  touch  is  all  it  lakes 

31 059  Atari  Joy  Sensor  S34.95 


THE  PROGRAM  STORE 
now  open  in 
Monmouth 


Mall 


D 


iy- 


Rt.36 


'% 


■04, 


Monmouth  Mall 

Eatontown,  NJ 


Over  2500  Programs  for  TRS-80,  ATARI  400/800,  APPLE,  IBM,  VIC  20  &  C64 


V/S/7  OUR  STORES 

Tenley  Mall.  4200  Wisconsin  Ave.,  NW,  Washington.  DC 
Harvard  Square.  13  Dunster  St..  CamtirldQe,  MA 
W.  Bell  Plaza,  6600  Security  Blvd.,  Baltimore.  MD 
While  Flint  Mall,  Rockville  Pilie,  Rockville,  MD 
Cherry  Hili  Mall.  Rt  38  &  Haddonfielii  Rd.  Cherry  Hill.  NJ 
Monmouth  Mall,  Rt  35  &  Wyckolt  Rd,  Eatontown,  NJ 


Willowbrook  Mall,  14J)a  Willowtirook  IVlall,  Wayne,  NJ 
Nanuet  Mall,  Rt  59  &  Middletown  Rd,  Nanuel.  NY 
Olenlangy  Plaia,  829  Bethel  Rd,  Columbus,  OH 
Westmoreland  Mall.  Rt  30  East,  Greensburg,  PA 
Montgomery  Mall,  230  Montgomery  Mall,  North  Wales,  PA 
Plymojth  Meeting  Mall.  500  Germantown  Pilie,  Plymouth  Meeling, 
Century  III  Mall,  SR  51  &  SR  885.  West  MiHIin  Borough,  PA 
Seven  Comers  Center,  Falls  Church,  VA 


COMING  SOON  IN 

CHICAGO  ST  PETERSBUHG 

DENVER  TAMPA 

OKLAHOMA  CITY  TULSA 


PA 


FRANCHISE 

OPENINGS  IN 

SELECTED  CITIES 


To  Order  Call  Toll  Free  800-424-2738 
For  Information  Call  (703)  556-9778    ■ 

Mailaraeit:  Lisf  computer  item  item  »  qty  tape  nisk  lom,  ooo»  prce,  shipping,  lai  &  [oldi 
Send  chock  or  tut  O  tor  total  purchase  plus  S2  00  shipping  ano  handling.  VA  add  <i°c  sales  tax 
Charge  cards  — include  all  emoossed  information  List  name  address  city,  siaie  jipS  phone 


W^ 


/^ 


THE 

PROGRAm  /TORE 

C  1983  THE  PROGRAM  STORE 


THE  PROGRAM  STORE        Dept.  10-10-3     80x9582    4200  Wisconsin  Avenue,  NW    Wastiington.  D.C.  20016 


One  more  comment.  I  just  want  to  say  that, 
aside  from  the  1050, 1  am  impressed  with  all  of 
Atari's  new  hardware  products.  And  I  even  like 
some  of  their  new  software.  I  think  Atari  is  back 
on  its  feet  and  running  hard. 

Four  Equals  Seven 

Many  of  the  games  currently  on  the  Atari  market 
use  custom-designed  character  sets  for  back- 
ground displays.  The  classic  example  of  this  is,  of 
course.  Eastern  Front  by  Chris  Crawford.  That 
beautiful  scrolling  map  he  displays  is  actually 
composed  of  "characters."  This  works  because  a 
couple  of  the  ANTIC  graphic  modes  allow  the 
programmer  to  treat  each  pair  of  bits  within  a 
character  cell  as  one  of  four  colors. 

In  fact,  by  controlling  the  high  order  bit  of 
the  character  to  be  displayed,  the  programmer 
may  choose  two  different  sets  of  four  colors. 
Which  would  be  really  nice  except  for  the  fact  that 
only  one  of  the  colors  can  change  between  the 
two  sets,  thus  there  is  a  total  of  five  displayable 
colors. 

If  you  don't  remember  and/or  understand  all 
that,  don't  worry.  There's  a  better  way.  A  way 
which  will  get  you  seven  colors!  The  method  only 
works  on  machines  with  a  GTIA  installed,  but  I 
hope  that  all  COMPUTE!  readers  have  added  a  GTIA 
by  now.  (If  you  have  purchased  a  machine  in  the 
last  year  and  a  half  or  so,  you  got  a  GTIA  with 
your  machine.  If  you  have  an  old  machine  with  a 
CTIA,  the  upgrade  cost  is  nominal.) 

The  credit  for  finding  and  documenting  this 
until  now  hidden  feature  of  the  Atari  must  go  to 
Steve  Lawrow,  the  author  of  our  MAC/65  assem- 
bler. He  did  a  nice  job  of  investigating  all  the 
ramifications  and  provided  me  with  the  table 
which  I've  reproduced  here.  Before  I  go  into  the 
details  of  the  table,  though,  let  me  briefly  describe 
how  one  accesses  two  new  Atari  Graphics 
modes. 

Getting  At  The  New  Modes 

First,  the  new  modes  are  variations  on  BASIC 
GRAPHICS  1  and  GRAPHICS  2  {and,  by  exten- 
sion, GR.  17  and  GR.  18).  And  the  method  of  pro- 
ducing the  variations  is  so  simple  that  it's  almost 
funny  that  no  one  stumbled  on  it  before.  Simply 
turn  on  the  GTIA's  special  color  mapping  mode. 
And  what,  pray  te!!,  is  that?  In  this  case,  it  is  the 
upper  bit  of  GPRIOR,  the  priority  select  register. 

GPRIOR  is  a  hardware  register  that  has  its 
OS  shadow  location  at  $026F  (decimal  address 
623).  That  means  (for  those  of  you  not  familiar 
with  shadow  locations)  that  by  changing  the  RAM 
location  $026F  you  cause  the  OS  to  change  the 
appropriate  hardware  register  for  you.  (And  see 
COMPUTEl's  book  Mapping  the  Atari  if  you  need  to 
know  more.) 
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Briefly,  then,  you  need  simply  to  turn  on  the 
upper  bit  of  GPRIOR  in  order  to  activate  these 
new  modes.  There  are,  however,  some  caveats  to 
be  observed.  Perhaps  the  easiest  way  to  observe 
the  toughest  potential  problem  is  to  turn  on  your 
Atari,  go  into  BASIC,  and  do  a  POKE  623,128. 

What  do  you  see?  Garbage  on  the  screen,  if 
you  have  a  GTIA.  Unfortunately,  activating  the 
GTIA  destroys  the  normal  character  display 
mode(s).  More  on  this  later. 

Now,  on  to  the  table.  When  you  tell  BASIC 
to  PRINT  #6  in  Graphics  modes  1  and  2,  it  prints 
larger  than  normal  characters  to  the  upper  portion 
of  the  screen.  In  particular,  though,  the  characters 
are  available  in  several  different  colors.  Try  this 
little  program  to  see  what  I  mean:  GRAPHICS  2  : 
PRINT  #6;  "AaAa"  (where  the  underlined  char- 
acters are  typed  in  inverse  video). 

And  why  do  you  get  four  different  colors? 
Because  the  upper  three  bits  of  each  of  the  charac- 
ters are  different.  In  particular,  the  upper  three 
bits  for  the  four  characters  shown  are  010,  01 1, 
110,  and  111,  respectively.  Because  you  are  in 
Graphics  mode  2,  all  four  characters  came  out  as 
uppercase  letters. 

Now,  the  bytes  which  are  put  in  screen  mem- 
ory are  actually  translations  of  the  bytes  which 
you  PRINTed.  In  particular,  when  the  bytes 
shown  are  translated  to  screen  codes,  they  end 
up  with  upper  bits  of  00,  01,  10,  and  11,  respec- 
tively. The  upper  two  bits  of  the  bytes  placed  in 
screen  memory  determine  the  color  to  display; 
the  bits  in  the  character  set  determine  which  bits 
will  be  "turned  on"  on  the  screen. 

The  concept  used  in  our  "new"  graphics 
mode  is  similar.  In  particular,  the  upper  two  bits 
of  the  bytes  placed  in  screen  memory  determine 
the  color  MAP  to  use.  The  actual  bits  in  the  char- 
acter set  determine  which  color  will  be  selected 
from  the  appropriate  map.  In  other  words,  we 
have  added  yet  another  level  of  color  indirection 
to  the  Atari! 

In  GRAPHICS  10,  memory  is  organized  in 
groups  of  four  bits.  The  value  of  the  four-bit  nyb- 
bles  determines  which  color  register  is  displayed. 
Thus,  since  there  are  nine  color  registers  (five  for 
the  primary  graphics  and  four  for  player/missile 
graphics),  there  are  a  maximum  of  nine  indepen- 
dently displayable  colors.  (Yes,  I  know  that  you 
can  get  16  colors  in  GRAPHICS  9  and  11;  but  in 
those  cases  the  colors  are  not  truly  independent.) 
In  GRAPHICS  1  -I-  and  2 -f  (well,  I  had  to  call 
them  something,  didn't  I?),  pairs  of  bits  (instead 
of  four-bit  nybbles)  determine  the  color  register  to 
use.  Remember,  though,  that  the  pair  of  bits  can 
only  select  a  color  from  the  particular  MAP  which 
has  been  selected  by  the  two  upper  bits  of  the 
character  on  the  screen. 

And,  finally,  this  implies  that  the  other  six 


HAPPY  WINS  THE  RACE  WITH  WARP  DRIVE  SPEED! 


)^:  . 


HAPPY  81 0  ENHANCEMENT 

•  The  only  change  needed  to  run  all  WARP  DRIVE  software 

•  Plug  in  P.C.  tioard  requires  no  permanent  modifications  , 

•  Proven  reliable  in  ttiousands  of  installations,  reduces  disk  drive  wear  i 

•  Comes  completely  assembled  and  tested,  just  plug  in  and  use 

•  Full  one  year  parts  and  labor  guarantee,  compatible  wilt)  existing  software 

•  High  quality  printed  circuit  board  with  gold  connectors 
NO  ONE  ELSE  HAS  THIS  PERFORMANCE 

Unenhanccd  whole  disk  (ATARI  rev  B  format)  read  time:  1 12  seconds 
Unenhanced  whole  disk  (ATARI  rev  C  fast  format)  read  time:  89  seconds 

ENHANCED  810  whole  disk  (any  format)  read  time  with  standard  software:  68  seconds  ■  _      ■ 

ENHANCED  810  whole  disk  {any  format)  read  time  with  WARP  DRIVE  software:  43  seconds  . 

Standard  software  whole  disk  write  and  verify  time:  238  seconds 
WARP  DRIVE  software  whole  disk  write  and  verify  time;  62  seconds  -^ 

NEW  HAPPY  WARP  DRIVE  SOFTWARE 

WARP  SPEED  HAPPY  BACKUP  PROGRAM 

•  Completely  automatic;  nothing  to  figure  out,  inser!  disks  and  press  return 

•  Only  program  on  the  market  guaranteed  to  backup  any  disk 

•  Can  write  to  a  blank  disk;  format  write  and  verify  in  one  operation  .-       , 

•  Automatic  program  tracing:  copies  only  the  tracks  that  are  used 

•  Efficient  memory  utilization:  reduces  the  number  of  disk  inserlions 

•  Requires  only  one  ENHANCED  disk  drive,  backups  will  work  on  a  standard  drive 
WARP  SPEED  MULTI  DRIVE  HAPPY  BACKUP  PROGRAM 

•  Same  features  as  above  plus  support  of  multiple  ENHANCED  drives 

•  Can  be  used  with  up  to  4  ENHANCED  drives 

•  Source  and  all  destination  drives  read  and  write  in  parallel 

•  Format  write  and  verify  3  complete  disks  in  less  than  3  minutes 
WARP  SPEED  HAPPY  COMPACTOR  PROGRAM 

•  Reduces  the  numlier  of  disks  required  to  backup  your  library 

•  Combines  up  to  8  self  booting  disks  into  1  disk  with  a  menu 

•  Compacted  disks  run  only  on  an  ENHANCED  drive 

•  Pays  for  itself  by  saving  on  disks 

•  Single  or  dual  ENHANCED  drive  operation 
HAPPY  WARP  DRIVE  DOS 

•  Improves  ATARI  DOS  2.08  to  use  warp  speed  reading  and  write  with  verify 

•  Use  all  features  of  BASIC,  PILOT,  FMS.  and  DUP  at  top  warp  speed 

•  Warp  speed  I/O  software  module  available  separate  from  DOS 
HAPPY  WARP  DRIVE  SECTOR  COPY  PROGRAM 

•  Standard  format  whole  disk  read,  write  and  verify  in  1 05  seconds 

•  Use  with  sngle  or  dual  drives,  mix  ENHANCED  and  NON-ENHANCED  drives 
HAPPY  CUSTOMIZER  PROGRAM  (sold  separately  $99.95) 

•  Creates  custom  format  disks  of  any  specification 

•  Any  type  bad  sector,  duplicate  sector  numbers,  or  interleave 

•  Easy  to  use  but  requires  an  advanced  level  user  to  interpret  the  results 

REVIEWED  IN  POPULAR  MAGAZINES 

AN.AL.O.G.  COMPUTING—July/ August  1 983    "...The  installalion  instruclions  lor  the  Happy  B 1 0  Enhancement  are  among  the  best  I  have  ever  seen. ..  The  Happy 

BIO  Enhancement  is  one  ol  the  most  powerful  hardware  modilications  available  to  ATARI  computer  owners." 

ANTIC-July  1 983    'The  dillerence  between  a  normal  ATARI  B  W  disk  drive  and  one  equipped  with  Happy  is  like  the  contrast  between  mass  transit  and  the 

aulotnobite.  A  car  costs  you  more  initially,  but  improves  the  quality  olyour  Hie.  Similarly,  it  you  use  your  disk  drive  a  lot.  installing  Happy  will  markedly  enhance  your 

programming  life." 

SPECIAL  SUGGESTED  RETAIL  PRICE  BEFORE  DECEMBER  31, 1983:    Get  the  HAPPY  810  ENHANCEMENT  with  the  single  and  multi  drive  HAPPY  BACKUP 

PROGRAM,  plus  the  HAPPY  COMPACTOR  PROGRAM,  plus  the  HAPPY  DRIVE  DOS.  plus  the  HAPPY  SECTOR  COPY,  alt  with  WARP  DRIVE  speed,  including  our 

diagnostic  lor  $249.95-  Existing  registered  ENHANCEMENT  owners  may  upgrade  to  WARP  DRIVE  speed  lor  S1S.00  with  no  hardware  changes! 

Price  includes  shipping  by  air  mail  to  U.S.AandCanada.  Fore  ignordersadd  $10.00  and  send  an  international  money  order  payablelhrough  a  U.S.A.  bank  Califomia 

orders  add  SI  6.25  stale  sales  tax.  Cashiers  checit  or  money  order  for  immediate  stiipment  from  slock.  Personal  checks  require  2-3  weeks  to  clear.  Cash  COD 

available  by  phone  order  and  charges  will  be  added  Ko  credit  card  orders  accepted.  ENHAMCEMENTS  for  other  ATARI  compatible  drives  coming  soon,  call  for 

information.  Please  specify  -H  model  for  all  drives  purchased  new  after  February  1 982,  call  for  help  in  ENH  ANCEfi^  E  NT  model  selection.  Dealers  now  throughout 

the  world,  call  for  the  number  of  the  dealer  closest  io  you,  atari  sio  ,s  a  ,eg,s\e,ea  iraaemark  oi  flian.  mc, 

HAPPY  COMPUTING  •  P.O.  Box  32331    •  San  Jose,  California  951 52  •  (408)251-6603 
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Play  the 

arcade  games 

that  taik  back! 

What  do  Program  Desisn  games  include  for  free 
that  other  companies  charge  you  hundreds  of  dol- 
lars for? 

The  human  voice. 

Only  Program  Design  software  comes  with  a  voice 
based  cassette  synchronized  with  your  Atari  com- 
puter. So  now,  you  not  only  use  your  eyes  and  intel- 
lect to  play  one  of  our  arcade  games.  You  use  your 
ears  too.  Visit  your  nearest  software  dealer  and  take 
a  test  listen. 

DON'T  PLAY  'CUPPER' 
IF  YOU  CAN'T  SWIM! 

You're  the  captain  of  the 
clippership  Flying  Cloud. 
And  there's  never  been  a 
tougher  sea  challenge  than 
your  voyage  from  New  York 
to  San  Francisco  via  Cape 
Horn. 

As  you  cast  off,  the  actual 
sound  of  old  sea  chanteys  fills  the  air.  But  there's  no 
time  for  sinsing,  because  you  have  to  navigate 
through  storms  and  icebergs.  As  if  that  wasn't 
enough,  there's  the  constant  danger  of  being 
thrown  ovz(  board  by  a  mutiny,  so  you  better  know 
how  to  swim.  Remember,  you're  in  charge.  So  pick 
your  cargo,  crew  and  course  very  carefully. 

Defend  'moonbase  io' 
and  the  president  will 
thank  you  personally 

The  voice  of  mission  control  asks  you  to  defend 
Moonbase  lo  from  a  horde  of  alien  invaders.  But  first, 
you  and  your  robot  must  navigate  through  mine 
fields.  Moonbase  lo  combines  three  adventure 
games  in  one.  And  when  your  mission  is  completed 
the  president  will  thank  you  personally  (so  mind 
your  manners).  Moonbase  lo  is  the  winner  of  the 
most  innovative  game  award  from  Electronic  Games 
magazine. 

Clipper  comes  in  32K  disk,  cassette  &  joystick  or  24K  cas- 
sette &  joystick.  Moonbase  lo  comes  in  24K  disk,  cassette 
and  joystick  or  16K  cassette  &  joystick. 


bits  of  the  character  on  the  screen  select  the  par- 
ticular character  from  the  character  set  memory, 
just  as  normal  GRAPHICS  1  and  2  do. 

Does  that  sound  complicated?  It  should,  be- 
cause it  is.  Anyway,  now  is  the  time  to  look  at  the 
table.  It  shows  the  MAPs  that  are  available. 

Color  Selection  Under  GRAPHICS  1  +  And  2  + 


Bit  Pairs  Of  Color 

Selectors  In  Character  Memory 

Upper  Bits 

of  Character 

00 

01 

10 

11 

on  Screen 

(Map  Selector) 

00 

704 

704 

704 

704 

01 

704 

705 

712 

709 

10 

704 

706 

712 

712 

11 

704 

707 

712 

711 

And,  you  presumably  ask,  what  are  the  num- 
bers shown  in  the  table?  Simply  the  location  of 
the  color  register  which  will  be  displayed  when 
you  use  the  given  bits  within  the  given  map.  For 
example,  704  is  PMCOLO  (player  color  0)  and  712 
is  PFCOL5  (playfield  color  5).  However,  the  easiest 
way  to  change  the  color  registers,  in  this  instance, 
might  be  to  refer  to  them  via  the  locations  shown 
in  the  table. 

So,  writing  POKE  704,0  will  make  the  back- 
ground color  black.  Writing  POKE  712,152  will 
give  you  a  nice  blue  for  bit  pattern  10  in  MAPs  01, 
10,  and  11.  A  little  observation  of  the  table  will 
show  you  that  MAP  00  is  essentially  useless:  it 
always  gives  you  the  background  color,  regardless 
of  the  bit  patterns  in  the  character  memory. 

On  the  other  hand,  bit  pattern  00  always  gives 
you  background  color,  regardless  of  the  MAP 
used,  so  it  may  prove  useful  in  many  cir- 
cumstances. For  the  rest,  note  that  MAP  10  gives 
you  only  three  colors,  but  it  is  the  only  MAP  which 
gives  color  2  (706).  Sigh.  The  system  is  not  totally 
flexible,  but  it  is  handy. 

First  thing  next  month  we'll  put  this  all  to- 
gether with  a  little  BASIC  program  that  demon- 
strates the  capabilities  of  the  new  modes.  @ 
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if  you  program  In  BASIC,  you  know  about  ^         "®'  '"S'**^  Atari  BASIC 

commands  like  PRINT,  GOSUB,  IF-THEN,  and  i     Atari  BAcirr-  a  t-r;„i,  i       i  t 

others.  2     Internal "--    ^^^^^^                                            1 

But  did  you  know  that  each  of  these  3     Mer^^^iVf  ^    Overview ^ 

commands  is  actually  a  mini-program  in          -  ^"^y  r^f ^S^ to 

itself?  Atari  BASIC  is  a  collection  of  machine  ^    i.^Sfam  i^ditor  -i 

language  routines  that  tell  the  computer  ^    The  Pre-compiler iz. 

what  to  do,  how  to  do  it,  and  what  to  do  next.  6    Execution  Overview  .  .              

Atari  BASIC  is  a  powerful  and  versatile  7    Execute  Expression    "^^ 

language.  Now  available  from  COMPUTE!  8     Execution  Boundarv  Condition. ^^ 

Books,  The  Aiari  BASIC  Sourcebook  offers  9    Program  Flow  cZtlflfl          71 

Atari  programmers  a  chance  to  look  inside  .n    TowS^  p               .^"^^  ^^''*^"'^"*^ 75 

the  language  -  directly  to  the  source  code  ., .     Tu.^t      rogram  Save  and  Load '   o. 

that  is  Atari  BASIC.  ]l     Y"""  4^^  ^""^  ^^'^^^  Statements   .                   o  J 

Authors  Bill  Wilkinson,  Kathleen  O'Brien,  ];*     Atari  Hardware  Control  Statements             m 

and  Paul  Laughton,  the  people  who  wrote  ''3     External  Data  I/O  Statements               a 

Atari  BASIC,  take  you  on  a  tour  through  the  14    Internal  I/O  Statements             

language.  They  explain  how  it  works  and  15    Miscellaneous  Statements '^'^^ 

how  you  can  make  it  work  for  you.  16     Initialization                          ^^^ 

The  Atari  BASIC  Sourcebook  answers  109 

these  questions  (and  more):  Part  Twn*  niro^-fi.,  a- 

•  When  you  RUN  a  BASIC  program,  ^"  '"'°'  L»"ectly  Accessing  Atari  BASIC 
what  is  really  going  on  inside  the  Introduction  to  Part  Two 

.  HoTdSs  the  computer  know  how  I     ^f^^^^""^^!  'l^^'^bers  .' ; : : .'  ]  \  \  [  :.[:[[:::[ JI5 

to  handle  a  FOR-NEXT  loop?  How  ,       EEfGng  and  POKEing   i.}^ 

does  it  RETURN  from  a  subroutine?  ^     Listmg  Variables  in  Use ^ZZ 

•  Where  do  ERROR  messages  come  *♦     Variable  Values j^i''^ 

from?  How  does  the  computer  know  5     Examining  the  Statement  Table 

what's  wrong?  6     Viewing  the  Runtime  Stack          ^'^^ 

•  How  does  your  Atari  decide  which  7    Fixed  Tokens ^^'^ 

mathematical  operation  to  perform  5    What  Takes  Precedence?' .' ^^^ 

•  Why  do  some  tasks  take  so  long,  ®    ^^'"S  ^^at  We  Know  ...['.'.][  \  [  [  [  [  [  ]  [  ]  [ '  _'  _'  _'  _' ' ' " '  ' '  "g 
while  others  happen  almost  instantly?  p  ^  Throa   At     ■  oac 

•  Why  does  the  computer  sometimes  '  '  nree:  Atari  BASIC  Source  Code 
lock  up  when  you  delete  lines  from  Source  Code  Listine 

a  program?  o  *  ■ ' 14'^ 

•  How  does  the  computer  interpret  AnnpnHir'OE 
words  and  symbols  like  GOTO,  INT,  ^PK«:"""-es 

CHRS,^a^d=?  A      Macros  in  Source  Code 

•  How  can  a  machine  language  pro-  h      tt,    d         -"juilc  v^oae ^ 

grammer  take  advantage  of  the  so-  "      /^^  °"gs  m  Atari  BASIC ;;^ 

phisticated  routines  in  Atari  BASIC?  *-      Labels  and  Hexadecimal  Addresses . .         ii^ 

Intermediate  to  advanced  Atari  program-  j                                                                      ^°1 

mers  will  find  a  wealth  of  useful  and  m-  index 

teresting  information  in  The  Atari  BASIC  285 

Sourcebook.  r.:..-^.-.. 

Much  more  than  a  simple  source  code  listing,  -   '  '  """' 

this  book  explains  how  BASIC  works  and  why.  All  major  routines  are  examined  and  explored.  The  authors  go  into  detail  about  the 
internal  design,  the  stack,  inpui/output  statements,  and  much  more.  When  you  finish  reading  this  book,  you  will  have  an  in-depth 
understanding  of  how  to  put  Atari  BASIC  to  work  for  you  in  ways  you  never  thought  possible. 

The  Atari  BASIC  Sourcebook  is  available  at  many  computer  stores  and  bookstores,  and  can  also  be  ordered  directly  from 
COMPUTE!  Books 

Available  at  computer  dealers  and  bookstores  nationwide.  To  order  directly  call  TOLL  FREE  800-334-0868.  In  North  Carolina  call 
9 1 9-275-9809.  Or  send  check  or  money  order  to  COMPOTE!  Books,  P.O.  Box  5406.  Greensboro,  NC  27403. 
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64  EXPLORER 


Lorry  Isaacs 


We  are  pleased  to  welcome  Larry  Isaacs  and  his  new 
column,  "64  Explorer,"  to  the  pages  of  COMPUTE!. 
Larry  has  extensive  experience  in  programming  with 
6502-based  machines. 

To  get  things  started,  here's  the  first  of  a  two-part 
article  on  a  little  understood  but  important  feature  of 
BASIC,  the  STATUS  variable. 


This  is  the  first  of  a  two-part  series  dealing  with  a 
feature  of  BASIC  which  is  not  too  well 
documented,  the  STATUS  variable.  It  is  used  to 
detect  the  success  or  failure  of  input/output  oper- 
ations. I  came  to  this  reahzahon  while  writing  a 
disk  copy  program.  At  one  point  I  thought  I  had 
the  program  fully  operational.  I  was  surprised  to 
discover  that  the  program  was  copying  all  but  the 
last  byte  in  the  file,  causing  the  copy  to  be  one 
byte  shorter  than  the  original. 

Fortunately  I  was  able  to  quickly  determine 
that  the  problem  was  not  in  my  programming. 
The  program  worked  exactly  as  1  intended  it  to. 
Instead,  my  error  was  that  I  made  an  assumption 
concerning  the  STATUS  variable  which  turned 
out  to  be  incorrect.  An  error  arising  from  an  er- 
roneous assumption  can  be  a  very  tough  one  to 
find.  Everything  looks  right,  and  doesn't  work. 

Tracking  Down  A  Mistake 

After  discovering  my  error,  I  reread  the 
documentation  to  find  where  I  might  have  over- 
looked something  relahng  to  my  mistake.  (By 
documentation,  I  mean  the  Commodore  64  Pro- 
grammer's Reference  Guide  and  the  2541  Floppy  Disk 
User's  Manual.)  After  a  thorough  reading,  I  wasn't 
able  to  find  anything  saying  that  my  assumption 
wasn't  valid.  I  even  found  an  example  program  in 
the  1541  User's  Guide  which  makes  the  same  mis- 
take I  did.  Fortunately,  I  had  some  previous  ex- 
perience which  led  me  to  quickly  suspect  and 
correct  my  assumption.  It  can  be  quite  frustrating 
if  you  don't  have  that  experience,  and  have  to 
acquire  it  the  hard  way.  Since  the  STATUS  variable 
is  not  documented  very  thoroughly,  and  is  crucial 
to  proper  I/O  (input/output)  communications, 
perhaps  we  should  try  to  discover  the  necessary 
information  ourselves.  The  all-important  question 
we  need  to  answer  is;  "What  does  the  STATUS 
variable  really  tell  us?" 
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Before  starting  our  investigation,  a  little  in- 
troduction to  the  STATUS  variable  may  prove 
helpful.  The  purpose  of  the  STATUS  variable  is  to 
provide  an  indication  of  the  completion  status  of 
the  last  input/output  operation.  It  is  supposed  to 
indicate,  among  other  things,  when  an  error  oc- 
curs in  the  I/O  operahon,  and  when  the  end  of 
the  data  is  reached  while  reading  a  file.  The  end 
of  the  data  in  a  file  is  more  commonly  called  end- 
of-fiie,  abbreviated  EOF.  My  invalid  assumption 
involved  this  EOF  indication. 

The  STATUS  variable  acts  like  a  normal  vari- 
able in  most  respects.  It  may  be  used  in  an  ex- 
pression just  like  any  other  variable,  and  may  be 
abbreviated  ST.  However,  it  differs  from  other 
variables  in  that  you  can't  give  it  a  value.  It  only 
returns  a  value.  Here  are  a  few  examples  showing 
how  the  ST  variable  might  be  correctly  used: 

1050  SS=ST: REM  SAVE  THE  STATUS  IN  VARIABL 

E  SS 
2000  IF  STO0  GOTO  9999 
3110  EOI=ST  AND  64: REM  GET  EOI  STATUS 

An  example  of  an  incorrect  use  of  the  ST  vari- 
able would  be: 

100ST  =  ST-64 

where  the  statement  attempts  to  assign  a  value  to 
ST.  This  results  in  a  SYNTAX  ERROR. 

STATUS  Can  Catch  Errors 

The  value  returned  by  the  STATUS  variable  is 
used  to  detect  if  anything  unusual  happened  dur- 
ing the  last  I/O  operation.  The  unusual  things 
that  may  occur  will  vary  depending  on  which 
device  is  involved.  The  Reference  Guide  describes 
the  meaning  of  the  STATUS  variable  only  for  the 
cassette  and  serial  bus  devices,  such  as  the  1541 
disk  drive.  Therefore,  we  will  concentrate  on 
these.  In  either  case,  the  value  returned  by  the  ST 
variable  will  be  a  signed  byte.  To  keep  things  simple, 
think  of  this  as  a  byte  of  memory  holding  a  number 
which  can  range  from  -128  to  4- 127.  This  differs 
from  an  unsigned  byte  which  can  hold  values  from 
0  to  255. 

Instead  of  getting  into  a  discussion  of  bits 
and  binary  numbers,  we  will  interpret  the  un- 
signed byte  as  being  the  sum  of  a  unique  combi- 
nation of  numbers  from  the  group:  1,  2,  4,  8,  16, 
32,  64,  -128.  An  important  restriction  is  that  these 


READ  THE  LABEL 


tot  i^e 


e  a\\oV;'^  J°epo'*^ 


1 


,cteT* 


op 


10 


25 


V,e\ds.WP 


lO 


35 


vel^o^'" 


sei 


i\ecte' 


,iie\ci^^° 


eco' 


di^ 


.h>\e ' 


.  reCO»' 


dv 


'"'"""copV.^^*"*" 


of 


(leqvieti 


,  Vie' 


Ad,  o' 


,eeoP'°' 


imp^^ ' 


tofef^i!!, 


i^s^^^J, 


,«."--,  one  ^— ^        a  ^--^.  Vou -^  .^.o.y 


^^^^B^^ 


f^::^-v^^-^yi!::^o-'^ 


\at>e\Lorniofe 


.b30^one--beP' 


vo<J 


lO 


des^g'^ ''' 


oU( 


OvNtl 


tep' 


,0'^ 


^^B:§5^-^^°" 


i\\o:^\t 


di 


^^^::^BjJ^^^^-^^- 


rs^^^'l 


t^^?,o  ma"»^^j!oU  ^f 'pacVaa^  ^^' 


€«^P 


.as^^*!*i935S 


numbers  may  appear  in  the  sum  only  once.  The 
presence  of  one  of  these  numbers  in  the  sum 
equivalent  to  the  value  of  ST  will  indicate  the  pre- 
sence of  a  particular  condition.  Let's  explain  this  a 
little  further. 

You  can  find  which  numbers  make  up  the 
sum  by  repeating  the  following  steps,  using  the 
ST  value  as  the  initial  remainder:  (1)  Subtract  the 
next  number  in  the  group  from  the  current  re- 
mainder, starting  with  -128  and  proceeding  to- 
ward 1.  Subtracting  -128  is  the  same  as  adding 
+ 128.  (2)  If  the  result  is  positive  and  less  than 
128,  include  the  subtracted  number  in  the  sum 
and  use  the  result  as  a  new  remainder.  (3)  If  the 
result  is  negative  or  greater  than  or  equal  to  128, 
don't  include  the  subtracted  number  in  the  sum, 
and  then  keep  the  old  remainder.  When  the  re- 
mainder becomes  zero,  you  will  have  the  numbers 
which  make  up  the  sum.  Here  are  a  couple  of 
examples  to  show  how  it's  done. 


ST=  115 

-  64 

(-128  IGNORED,  115  + 128>128) 

51 

-  32 

19 

-  16 

3 

-  2 

(64  INCLUDED) 

(32  INCLUDED) 

(16  INCLUDED) 

(8  AND  4  IGNORED) 

1 
-     1 

(2  INCLUDED) 

0      (1  INCLUDED) 

115=  64  +  32  +  16-1-2  +  1 

ST=  -120 
+  128 

8 
-     8 

(128  INCLUDED) 
(64,32,16  IGNORED) 

0      (8  INCLUDED,  4,2,1  IGNORED) 
-120=  -128  +  8 

Using  STATUS  With  Tape 

Since  more  readers  are  likely  to  have  the  cassette 
unit  instead  of  a  disk  drive,  we  will  first  investigate 
the  STATUS  variable  as  it  relates  to  cassette.  To 
begin,  let's  take  a  look  at  what  the  STATUS  vari- 
able indicates  when  accessing  the  cassette. 

VALUE     MEANING 


1 

not  used 

2 

not  used 

4 

SHORT BLOCK 

8 

LONG  BLOCK 

16 

UNRECOVERABLE  READ  ERROR 

32 

CHECKSUM  ERROR 

64 

END  OF  FILE 

-128 

ENDOFTAPE 

(Note:  This  information  can  be  found  in  the  Com- 
modore 64  Programmer's  Reference  Guide  on  page 
85.) 

Since  the  END  OF  FILE  indication  was  the 
one  I  had  trouble  with,  let's  begin  there.  The  pri- 
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mary  question  we  want  to  answer  is  "When  will 
the  STATUS  variable  indicate  we  are  at  EOF?" 
Will  EOF  be  indicated  as  the  last  byte  of  the  file  is 
read,  or  will  EOF  be  indicated  when  you  try  to 
read  one  byte  beyond  the  last  byte? 

To  answer  this,  all  we  need  is  a  simple  little 
test  program.  This  test  program  should  first  write 
a  cassette  file  containing  a  few  bytes.  Then  it 
should  instruct  us  to  rewind  the  cassette.  Finally, 
it  should  read  the  cassette  file,  displaying  each 
byte  and  the  ST  variable  as  each  byte  is  read.  Here 
is  a  test  program  to  do  this,  which  will  be  called 
"TESTl": 

100    OPEN  1,1,2, "TEST" 

110  PRINT#1, "ABC"; : CLOSE  1 

200  PRINT  "REWIND  THE  CASSETTE." 

210  PRINT  "PRESS  RETURN  WHEN  READY." 

220  INPUT  Z$ 

300  OPEN  1,1,0,  "TEST" 

310  FOR  1=1  TO  5 

320  GET#1,Z$: PRINT  I , Z$ , ASC{ Z?+CHR$ (0) ) , S 

T 
330  NEXT  I: CLOSE  1 

As  you  can  see,  lines  100-110  write  the  file, 
200-220  ask  you  to  rewind  the  cassette,  and  300-330 
read  the  file.  The  2  in  the  OPEN  command  in  line 
100  specifies  that  the  file  is  being  opened  for  writ- 
ing with  an  END  OF  TAPE  marker  to  be  written 
when  the  file  is  closed.  You  might  note  that  the 
program  reads  five  bytes  from  the  file,  though 
only  three  bytes  are  written.  This  is  done  so  we 
might  answer  another  question,  namely,  "What 
happens  if  you  read  past  the  end  of  the  file?"  Ex- 
ecuting TEST  1  will  cause  the  following  to  appear 
on  the  display  screen: 

PRESS  RECORD  &  PLAY  ON  TAPE 

OK 

REWIND  THE  CASSETTE. 

PRESS  RETURN  WHEN  READY. 

7 

PRESS  PLAY  ON  TAPE 


OK 

1 

A 

65 

0 

2 

B 

66 

0 

3 

C 

67 

64 

4 

0 

0 

5 

T 

84 

0 

This  includes  all  of  the  prompts  which  occur 
during  program  execution.  Since  it  is  the  displayed 
data  which  will  answer  our  questions,  we'll  limit 
ourselves  to  that  in  the  tests  which  follow. 

The  first  column  of  the  displayed  data  shows 
a  count  of  the  bytes  in  the  file.  The  second  column 
displays  the  character,  with  the  third  column 
giving  the  numeric  value  (called  the  ASCII  value) 
of  the  character.  The  last  column  shows  the  value 
of  the  ST  variable  after  the  GET  command  which 
fetched  the  character. 

From  this  data,  we  are  now  prepared  to  an- 
swer the  first  question.  The  EOF  indication 
appears  with  the  reading  of  the  last  byte  of  the 
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cassette  file. 

Concerning  the  second  question,  we  now 
have  some  test  results  to  examine.  First,  note  that 
the  test  program  read  the  two  additional  bytes 
with  no  apparent  ill  effects  -  no  errors  occurred, 
etc.  Second,  we  can  see  the  EOF  indication  went 
off  once  the  next  byte  was  read.  And  third,  notice 
■the  first  byte  following  the  last  one  we  wrote  (i.e., 
the  C)  is  suspiciously  a  zero.  Since  a  zero  byte 
doesn't  correspond  to  a  displayable  character, 
there  is  a  blank  space  in  the  second  column  where 
a  character  would  have  been.  Zero  bytes  are  often 
used  when  there  is  need  of  a  byte  which  marks 
the  end  of  something.  Thus,  it  is  not  too  surprising 
to  find  one  here.  But  if  a  zero  byte  is  being  used 
to  mark  the  end  of  a  file,  what  is  going  to  happen 
if  a  zero  byte  is  written  as  part  of  the  data  in  the 
file?  To  answer  this  question,  let's  modify  the 
TEST  1  program  to  make  another  test  program. 
Make  the  following  changes  to  TEST  1  to  make 
"TEST  2": 

100    PRINT#l,"A"rCHR${0);"C"r :CLOSE    1 

As  you  can  see,  TEST  2  will  write  a  zero  byte 
in  place  of  the  "B"  written  by  TEST  1.  Executing 
the  TEST  2  program  displays  the  following  results: 

1  A  65  64 

2  0  0 

3  C  67  64 

4  0  0 

5  T  84  0 

Ah  ha!  This  time  we  got  two  EOFs.  Since  it's 
not  possible  for  a  file  to  have  two  ends,  one  must 
conclude  that  what  is  given  as  an  EOF  indication, 
strictly  speaking,  doesn't  indicate  EOF.  Instead  it 
is  a  "next  byte  is  a  zero"  indication.  Provided  you 
do  not  write  any  zeros  as  part  of  your  data,  then 
the  zero  byte  at  the  end  (which  is  added  automat- 
ically by  the  64)  might  properly  provide  the  EOF 
indication.  However,  if  you  should  accidentally 
read  past  the  end  of  your  data,  you  could  be  in 
trouble.  It  doesn't  appear  that  the  GET#  command 
can  tell  if  you've  passed  the  end  of  the  file. 

The  Cassette  Buffer 

At  this  point,  you  might  be  wondering  where  the 
data  is  coming  from  once  you  read  past  the  end  of 
the  file.  The  answer  to  this  is  fairly  simple. 
Whenever  data  is  read  or  written  to  a  cassette  file, 
it  will  be  done  in  groups  of  191  bytes,  called  blocks. 
There  is  an  area  of  memory  reserved  to  hold  this 
block,  called  the  cassette  tape  I/O  buffer.  In  the  case 
of  writing  a  cassette  file,  the  data  is  stored  in  the 
cassette  buffer  until  the  buffer  becomes  full  (that 
is,  contains  191  bytes).  At  this  point  the  BASIC 
program  will  temporarily  stop  executing  while 
the  cassette  motor  is  turned  on  and  the  buffer 
contents  written  to  the  cassette. 

Now  the  buffer  is  considered  empty,  and 
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execution  of  the  BASIC  program  resumes.  When 
the  buffer  becomes  full  again,  another  block  is 
written.  When  the  program  closes  the  cassette 
file,  a  zero  byte  is  placed  following  the  most  recent 
byte  stored  in  the  buffer  and  the  entire  buffer 
written  as  the  last  block  in  the  file.  This  means 
there  may  be  bytes  following  the  zero  byte  which 
are  left  over  from  the  previous  buffer  full. 

A  similar  process  occurs  for  reading  a  cassette 
file.  Blocks  are  read  from  the  cassette  into  the 
cassette  buffer,  and  then  read  from  the  buffer 
until  it  becomes  empty.  As  you  might  have 
guessed  by  now,  the  bytes  we  are  reading  after 
the  end  of  the  file  are  the  leftover  bytes  in  the 
buffer. 

So  far,  our  two  test  programs  wrote  only  three 
bytes  to  the  file.  This  implies  that  our  cassette  file 
contains  only  one  block  of  data.  Since  our  test 
programs  wrote  an  END  OF  TAPE  marker  fol- 
lowing the  file,  it  might  be  interesting  to  find  out 
what  will  happen  if  we  read  past  the  one  block. 
To  find  out,  make  the  following  change  to  the 
TEST  2  program  to  make  "TEST  3": 

310    FOR    1=1    TO   196 

This  reads  five  bytes  past  the  one  block  of 
data  in  the  cassette  file.  Executing  the  TEST  3  pro- 
gram displays  the  following  as  the  last  five  lines. 


192 

< 

60 

0 

193 

3 

0 

194 

Bc^ 

252 

0 

195 

3 

0 

196 

32 

0 

The  EC3  is  the  character  which  would  be  entered 
by  pressing  the  COMMODORE  key  plus  C.  The 
first  four  numbers  turn  out  to  be  the  beginning 
and  ending  addresses  of  the  cassette  I/O  buffer. 
From  this  I  would  assume  that  the  END  OF  TAPE 
marker  is  simply  an  additional  191-byte  block 
written  after  the  file.  It  seems  to  have  no  ter- 
minating effect  while  data  is  being  read.  I  suspect 
that  the  END  OF  TAPE  marker  has  an  effect  only 
if  encountered  while  the  64  is  searching  for  a  file 
with  a  specific  name. 

Well,  that's  about  all  the  experimenting  we 
have  space  for  in  this  column.  In  next  month's 
column  we  will  continue  with  a  few  more  experi- 
ments on  the  cassette,  then  look  into  the  disk 
drive.  © 
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SPIRALIZER 


Chayim  Avinor 


Based  on  geometrical  principles,  tliis  program  uses 
high-resolution  grapliics  to  let  i/oii  create  some  dazzling 
patterns.  A  screen  menu  makes  it  very  easy  to  use. 
Written  for  the  Apple  II,  versio>is  are  also  included  for 
the  VIC,  64,  Atari,  and  Color  Computer. 


"Spiralizer"  is  a  program  for  making  patterns  on 
the  high-resolution  screen  of  the  Apple  II.  It  makes 
patterns  very  much  like  those  made  on  the  non- 
computer  game  called  Spirograph,  which  has 
tooth  wheels  of  different  sizes.  However,  the 
spiralizer  can  create  a  far  greater  number  of 
combinations. 

The  patterns  are  actually  made  by  two  radii  - 
one  of  them  is  turning  around  a  stationary  or 
linearly  moving  center  (depending  on  your  input), 
and  the  center  of  the  other  radius  is  the  free  edge 
of  the  first  one. 

You  are  given  control  of  the  relative  speed 
and  length  of  the  radii  and  some  additional  handy 
features. 

Running  The  Program 

After  typing  RUN  and  RETURN,  you  are  asked  to 
type  in  the  relative  speed  between  the  two  radii. 


This  is  actually  the  number  of  loops  the  pattern  is 
going  to  have.  You  can  choose  an  answer  between 
-50  and  50.  If  you  type  4  and  RETURN,  your  pat- 
tern will  have  four  complete  loops.  If  you  type  -6 
there  will  be  six  loops,  but  they'll  be  on  the  inner 
side  of  the  pattern. 

Use  the  back  arrow  to  delete  a  character.  If 
you  simply  press  RETURN  without  typing  in  a 
number,  the  program  will  default  to  a  value  of  5, 
and  will  print  it  on  the  menu.  Large  numbers 
cause  the  program  to  draw  straight  segments, 
because  of  the  large  steps.  The  patterns  thus  pro- 
duced are  quite  nice,  too. 

A  pattern  with  three  loops  is  easily  under- 
stood, but  what  would  a  pattern  with  two  loops 
look  like?  How  about  one  loop?  Could  a  pattern 
possibly  have  zero  loops?  Try  them  and  see. 

The  second  number  you  are  asked  to  enter  is 
the  radius.  This  determines  the  ratio  of  the  radii. 
You  can  choose  any  number  between  1  and  60.  A 
small  number  would  make  the  inner  radius  small 
and  the  outer  radius  large,  and  vice  versa.  Like 
the  first  input,  you  can  simply  press  RETURN 
and  take  the  default  value  of  35. 

Next  you  are  asked  for  the  spin.  An  answer 
larger  than  1  will  make  the  pattern  rotate  while  it 


"Spiralizer,"  Atari  version. 
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A)wther  variation  available  in  "Spiralizer,"  Apple  version. 
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800-648-331  1 


In  NVcall  [70S]5aS-565a 


Order  Status  Number:  53S-SGS4 


Oept-^OOBj  P.O.  Box  6689,  Stateline,  NV  89449 

No  risk,  no  deposit  on  C.O.D.  ardsrs.  Pra-paid  orders  recaivo  rree  shipping  within  the  UPS  Continental  United  Statfjs  with  no  waiting  period  lor  certified  checks  or 
monny  orders.  Add  3%(minumum  S3.00)  shipping  and  handling  on  afl  C.Q.D.  orders  and  credit  card  orders,  Largef  shipments  may  require  charges.  NV  and  PA 
reaidtints  add  saiss  taxn  AH  itcims  subject  to  availability  and  price  change.  rvjOTE:  We  stock  menulacturer's  and  third  party  software  for  most  all  computers  on  the 
market.  Call  today  tor  our  nuvt  catalog. 
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ACE  1000  Color  Computer 
ACEl  1  00  Drive  SCovsr  lor  ACE  1000 
ACE  1  200  Computer  with  Disk  Drive 
ACE  PRO  PACK: 

ACE  1000.  0*9I(  Drive, 
80  Coiumn  Card.  ACECalc  £ 
ACEWrrter  il 
MICRO-SCI 
Apple  &  Franklin 

\2  S249.00 

140- S349.00 

H70 S459.00 

D2  Conlroller S79 ,00 

:47  Coivlroller S89,00 

RANA 

Elite  I  |Apple/Franl(l>n) S279.00 

Elite  II  (Apple/Franklin) CALL 

Elite  III  (Apple/Franklin) CALL 

VISICORP 

FOR  APPLE.  IBM  4  FRANKLIN 

Visidei SI  69,00 

Visitile 5189.00 

Visipiot SI  59.00 

Visiterm, Se9.00 

Visitrend/Plot S229.00 

VisiSchedule S229.00 

Desktop  Plan SI  B9.00 

Visicalc  {Apple.  CBH.  IBM)-..  SI  79,00 
Visicorp  pnces  forlBMmayvfltvslightly. 

Letter  Perfect  Apple ....SI 09. 00 

Data  Perfect  Apple .S75.00 

AXLON 

Apple/Franklin  128K  Bam  ...S299.00 
Apple/Frankirn  Ram  Disk.  ..S729,00 

MPC 

ButXlisk(l28KNDnVolitare)..  S649-00 

JOYSTICKS 

Vt/ICO 

Joystick  S21  .95 

Famous  Bed  Ball S23.95 

Pov»er  Gf ip  S2 1 ,95 

Three-Way  Deluxe. S22.95 

Atari/VIC  Trackball S34.95 

Apple  Trackball  .859,95 

KRAFT 

Atari  Single  Fire SI  3.00 

Alan  Switch  Hitter S16.00 

Apple  Joystick  S44.00 

Apple  Paddies S39.00 


S  commodore 

CBM 
B03S 


APPLE/FRAIMKUIN 

1.  ChOplilter $27.00 

2.  Bank  Street  Writer  S55.00 

3.  PFS:  File S89.00 

4.  Visicalc S179.00 

5.  Home  Accountant S55-00 

B.  Zaxxon S29 .00 

7.  Most  Amazing  Thing S28.00 

B.  Visitile S189.00 

9,  Fathoms  40 S 1  9 .00 

I  0.  Deadline $35.00 

It  .  PFS:  Beport $89.00 

12,  Zork  III S29.00 

1  3,  Ffogger $24.00 

14.  Pacemaker $24.00 

15.  Snooper  Troops  «1 S32.00 

16.  Delta  Drawing  . , S35.00 

17.  Castle  WoKenstine S24.00 

IS,  Wayout $29.00 

19,  Canyon  Climber $19.00 

20    Bandits S26.00 


CBM6<4 

VIC  SO 

GAUL  aiv 
Exacutiva  B4  Porcabia 

1  520  Color  PrinlBr/PtDttor ...  SI  69.00 

152S  SO  Colurrin  Printer $219.00 

1526 S319-00 

1 530  Datasette S6B.0O 

1541  Single  Disk  Drive $249,00 

1600  VIC  Modem $59.00 

1650  AD/A  A  Modem  $S9.00 

1701  14'   Color  Monitor $249.00 

Pat  64 S569,00 

Pet  4032  S599.0O 

CBM  8032 S599.00 

Super  Pet  $999.00 

Bl  28-30 S769.00 

BX256-80 $969-00 

2031 S299.00 

4040 $699 .00 

8050 $949 ,00 

8250 S1199.00 

9060 $  1  999. 00 

9090 S21  99.00 

4023 - S379.00 

6400 .$1  399.00 

54 K  Upgrade S269  00 

Spell  Master $149,00 

Z-Ram $549,00 

Silicon  OflicB $749.00 

The  Manager $209,00 

Soft  Rom SI  29.00 

Jinsam CALL 

PRaFESSiONAL 
SOFT\A/AnE 

Word  Pro  2  Plus SI  59.00 

Word  Pro3  Plus S1B9.00 

Word  Pro4  Plus $279. OO 

Word  Pro  5  Plus S2  79.O0 

IntoPro SI  79.00 

Administrator S399.00 

Power S79.00 

Word  Pro  64  Plus $65.00 

CARDCO 

Light  Pen S32-00 

Cassette  Interface  S29-00 

Parallel  Printer  Interface $69.00 

3 Slot  Expans.  Interface (20). ,  .S32  00 
6  Slot  Expans.  Interlace  (20)...  S79. 00 

C.M.O. 

CBM  B«* 

1 .  Word  Pro  64 $65.00 

2.  Jumpman $29,00 

3.  Gort  (20/641  SI  4.95 

4.MicrospecDataBase64  ... $69.00 

5.  Logo  64 S39.00 

6.  Microspflc  Gen.  Ledger64 . . .  S79.00 

7.  Zork  III $29.00 

8.  Frogger  (641 $23.00 

9.  Quick  Brown  Fox  1 20/64)  ...$49.0O 

10.  Shamus $29.00 

1 1 .  Deadline $29.00 

12.  Assembler  64 S14.9S 

13.  Zork  II t29.0Q 

14.  3-D  Man $14.00 

1  5.  Protector S32.0U 

1  6.  Starcross $29. OO 

17.  Easy  Mail  64 $14.95 

18.  Grave  Robber $11.00 

19.  Wall  Street $19.00 

20.  Trash  Man $32.00 

put;er 

ORO 


ATARI  HOME  COMPUTERS 

ATARI  400  ,-^™™™™.™._^  ™ 

A 

\  I  ATARI 


*'*  YourFINAL  PRICE  afterREBATE 

when  purchased  with 

package  as  shown. 


ATARI  400  &  410  Recorder  Package 
YOU  PAY      S1  73.00 

You  Get  ATARI  REBATE   $50.00 
YOUR  TOTAL  COST     SI  SS-OO 

Retail  Value  of  ATARI  410  $100.00 
Net  Cost  of  ATARI  400   $29.00 

CALL  FOR  PRICING  ON 
THE  ENTIRE  ATARI  XL  LINE! 

1010  Program  Recorder S74.00 

1 020  40  Col .  Printer/Ptotter . . .  S249.00 

102  5  80  Col,  Printer S449.00 

1027  Letter  Quality  Printer  ...$299,00 

1050  Disk  Drive 1379.00 

850  Interlace  -SI 69.00 

1030  Direct  Connect  Mod  em  ..  .CALL 

CX30  Paddles SI  2.00 

CX40  Joystick SB-00 

CX42  Remote  Joystick CALL 

CX77  Touch  Tablet  S69.00 

CXBQ  Trak  Ball    .- $49.00 

CX85  Keypad   SI  05 .00 

CX418  Home  Manager S69.00 

CX488  Communicator  II ,,.  ,$229.00 
KX7a98  Atari  Accountant , , .  $209.00 

KX7101  Entertainer S69.00 

KX7102  Arcade  Champ $75.00 


DISK  DRIVES  FOR  ATARI 

AT88-S 1 $369.00 

ATBB-Al $299.00 

AT88-S2 $569  00 

ATBB-S1  PO S469.O0 

AT88-S2  P D $669 .00 

AT88-DDA $1  39.00 

AT44-S1  $579.00 

AT44'S2 $969,00 

TEXAS  INSTRUMENTS  DRIVE 

TX  99-S1   S349.0O 

RAIMA 
1000  Atari  Disk  Drive  . 


$319.00 


ALIEN 

^tari  Voice  BoJi  $11 9.00 

Apple  Voice  Box  . .- $149.00 

MEIVianY 

Axlon  32K  Ram $59.00 

Axlon  4aK  Ram $99.00 

Axlon  i2eK  Ram S299.0O 

Intec  32K  Board $59.00 

Intec  48K  Board $85.00 

Intec  64K  Board  |400  only) . . .  $99.00 
Intec  Real  Time  Clock  S39.0O 

INNOVATIVE  CONCEPTS 

Fllp-n-Flle  10  S4.00 

Fhp-n-Flle  50 $19.00 

Flip-n-Flle  400/800  Cart SI  9. 00 


FLOPPY  DISKS 

MAXELL 

MD-1  $32.00 

MO-2 $44,00 

FD-1  (B'( $40.00 

FD-2(B"  DD( $50.00 

ELEPHANT 

S'/."'SS  SD SI  6. 95 

5Vt"'  SS  DD S24.95 

5V.  ■  DS  DD S29.95 

VEPBATUIVI 

SV.  ■  SS  DD  $26.00 

5V."  DSOD $36.00 

HEAD 
Disk  Head  Cleaner SI  4.95 


TOP    SO 


I .  Donkey  Kong $39. 

I.Zaxxon $29. 

3.  E.T.  Ptione  Home S39, 

4.  Miner  2049ar $35 

5.  Dig  Dug $33, 

6.  Choplitler S29, 

7.  Donkey  Kong,  Jr  S39 

8.  Canyon  Climber $25 

9.  Snooper  Troops  #2  S34 

10.  Word  Wizard  $59 

I I ,  Picnic  Paranoia  .....,.-.  .$34 

12.  Jumpman  $29 

13.  Shamus  $34 

14.  Letter  Perfect $109 

15.  File  Manager  BOO $69 

16.  Prepple $24 

17.  Astro  Chase S25 

ie.  Blade/Black  Hole $27 

19.  Pac  Man $33 

20.  Baja  Buggies S25 


ATARI 

.00 

21- 

.00 

22 

.00 

23. 

.00 

24 

.00 

25- 

.00 

26 

.00 

27 

.00 

23 

.00 

29 

.00 

30 

.00 

31 

.00 

32 

.DO 

33 

-OO 

34 

.00 

35 

.00 

36 

.00 

37 

.00 

38 

.00 

39 

.00 
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Crush .  Crumble*  Chomp, . . 

Wayoul 

Zork  II 

V.stcalc S 

Atari  Writer 
Three  Little  Pigs 
Upper  Reachesof  Apshai 
Starbowl  Football 

Orelbs 

Projector 
Frogger..  - . , . 
Lunar  Leeper 
Wizard  of  Woi 
Kindercomp 
Moori  Shuttle 
Home  Accountant 
Temple  of  Apshai 
Spell  Wizard 
Nautilus- 
O'Riley's  Mine 


'    W    M    M 


is  drawn,  and,  of  course,  the  number  of  loops  will 
change.  You  can  choose  between  1  (no  spin)  and 
18.  When  spinning,  the  lines  remain  smooth  and 
curvy,  but  it  takes  more  time  to  draw  the  complete 
pattern.  If  you  decide  to  quit  while  a  pattern  is 
being  drawn,  press  any  key  and  the  program  will 
return  to  the  menu.  To  escape  from  the  program, 
use  RESET. 

Added  Features 

Now  things  become  more  complicated.  You  are 
asked,  "MOVEMENT  OR  DECREMENT  (M/D)?" 
If  you  choose  M,  the  whole  pattern  will  move 
while  it  is  being  drawn.  If  the  spin  is  1,  the  pattern 
will  be  drawn  five  times  while  it  moves.  If  the 
spin  is  greater  than  1,  the  pattern  will  move  until 
it  finishes  rotating.  If  the  spin  is  greater  than  1 
but  less  than  9,  you  will  not  be  asked  for  this 
input. 

Pressing  D  will  cause  the  pattern  to  decrease 
in  size  while  being  drawn.  The  rules  here  are  the 
same  as  above.  If  you  press  RETURN,  the  default 
value  is  NONE,  and  none  of  the  above  actions 
will  take  place. 

Last,  you  are  asked  if  you  want  to  clear  the 
screen.  If  you  decide  not  to,  then  the  new  pattern 


64  Notes 

Gregg  Peele,  Editorial  Prcgrammer 

Like  the  Apple,  Atari,  and  Color  Computer, 
the  Commodore  64  is  capable  of  high- 
resolution  graphics.  Unlike  those  computers, 
however,  there  are  no  specific  commands  in 
the  64's  standard  BASIC  to  create  graphics 
on  the  high-resolution  screen.  At  the  time  of 
this  writing,  the  Video  Support  Package  car- 
tridge promised  by  Commodore  is  not  yet 
available.  We  are  left  with  a  system  of  com- 
plex POKEs  and  formulas  to  accomplish 
simple  hi-res  graphics  on  the  64. 

Program  5,  the  Commodore  64  version, 
consists  of  routines  to  plot  points,  draw  lines, 
and  clear  the  hi-res  screen.  All  these  routines 
are  in  machine  language  and  are  accessed 
with  the  SYS  command.  The  hi-res  screen  in 
these  programs  is  located  at  8192  ($2000)  and 
may  be  accessed  from  BASIC  by  tw^o  POKEs: 

POKE  53272,PEEK(53272)OR  8 
POKE  53265,PEEK(53265)OR  32 

These  POKEs  put  the  screen  in  bitmap  mode 

with  a  320  x  200  high-resolution  screen. 

To  access  the  plot  routine,  LOAD  and 

RUN  Program  5,  and  set  up  a  BASIC  program 

which  begins  with  the  two  POKEs  previously 

mentioned.  Next,  POKE  the  X  coordinate 

into  53242.  If  the  X  coordinate  is  greater  than 


VIC,  Atari,  And  Color 
Computer  Notes 

Patrick  Parrish,  Editcnal  Programmer 

To  create  different  spiral  patterns  with 
"Spiralizer,"  you  must  first  type  in  several 
variables  (speed,  radius,  etc.).  Try  different 
values  for  these  variables  or  simply  press 
RETURN  (ENTER  on  the  Color  Computer) 
to  use  default  values. 

For  the  VIC  version  of  Spiralizer,  you 
need  the  Super  Expander  cartridge.  With 
this  version,  you  can  overlay  as  many  as  five 
spiral  figures  on  the  high-resolution  graphics 
screen.  The  Atari  and  Color  Computer  ver- 
sions allow  you  to  overlay  as  many  patterns 
as  you  wish. 

As  with  the  Apple  version,  the  Atari 
and  VIC  versions  let  you  return  to  the  be- 
ginning of  the  program  by  pressing  any  key 
if  you  are  not  pleased  with  the  patterns  being 
drawn. 


255,  then  POKE  53243  with  1  and  POKE  53242 
with  X- 256.  If  the  X  coordinate  is  less  than 

256,  then  POKE  53243  with  0.  Now  POKE 
the  Y  coordinate  of  the  point  into  location 
53240  and  POKE  a  0  into  location  53241.  Fi- 
nally,  SYS  to  location  49710  and  your  point 
will  appear  on  the  screen.  To  clear  the  screen, 
merely  SYS  50039  and  all  points  plotted  will 
vanish.  If  you  want  to  return  to  text  screen, 
POKE  53272,21  and  POKE ,53265,27. 

If  you  want  to  draw  a  line  between  two 
sets  of  coordinates,  then  POKE  the  first  end- 
point  coordinate  (XI)  into  53220.  As  before, 
if  the  coordinate  is  greater  than  255,  then 
POKE  53221  with  1  and  POKE  53220  with 
Xl-256.  If  XI  is  less  than  256,  then  POKE 
53220,X1  and  POKE  53221,0.  POKE  the  first 
Y  coordinate  into  53222  and  POKE  53223 
with  0.  The  coordinates  of  the  other  endpoint 
are  now  POKEd  in  starting  with  X2.  If  X2  is 
less  than  256,  then  POKE  53224,X2  and  POKE 
53225,0.  If  X2  is  greater  than  255,  then  POKE 
53224,X2-256and  POKE  53225,1.  POKE  Y2  into 
53226  and  POKE  53227  with  0.  Once  you  have 
these  coordinates  in  memory,  use  SYS49152  to 
plot  your  line  on  the  high- resolution  screen. 

To  use  "Spiralizer"  on  the  64,  run  Pro- 
gram 5  and  then  Program  6.  Program  6  does 
all  these  POKEs  for  you  and  will  create  end- 
less variations  of  designs  for  you  on  the  high- 
resolution  screen. 
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Switchable  g^eplate" 
locks  out  the  diagonals 
[GREAT  FOR  MAZE  GAMES!) 


PRECISELY. 
THE REASON 
WHY  YOUR 
NEXT  'STICK' 
SHOULD  BE 


ARCADE-STYLE  JOYSTICK 


The  Prostick  "  features  left/right  hand  fire  buttons 

Full  five  year  limited  Marrenty 

Now  available! — Prostick  HE  for  Colecovision™ 


DIVISION  OF  CALTROni 


BISHOP,  CA  93514  [408]  358-3430 

DEALER  INQUIRIES  INVITED 

Ateri,  Commodaro,  TiutaB  Instruments  and  Colecovision  ars  trademarks 
respectively  of  Warner  CammunlcationSt  Inc.,  Commodore,  Inc.,  Texas 
Instruments  and  Coleco 


LEARN 
TO  TYPE 
OR  GET 

BLOWN 
TO  BITS. 


,«^*. 


MasteiType™  makes  typing  a  blast. 

Now  there's  a  typing  program  for  the  Apple  "i.  Atari " ' 
and  IBM  PC,  that  dares  to  be  fun.  And  now  it's  avail- 
able for  the  Commodore  64™  2.  It's  Masterlype.  A  combi- 
nation of  fast-action  blow  'em  up  video  games  with  the 
best  instructional  programs  available.  The  result?  Highly 
motivating  and  enjoyable  learning. 

Masteif/pe  is  educations'  favorite. 

In  fact,  it's  the  best  selling  educational  program  to- 
day And  that's  no  surprise.  Reviewers  agree.  lnfoWorld"3 
wrote : 

"We  had  fun  reviewing  it,  and  we  highly  recommend 
it  to  those  who  want  to  learn  typing  in  an  uncon- 
ventional but  motivating  way." 

lnfoWorld'3  also  went  on  to  rate  Masterlype  as 
"excellent"  in  all  four  of  its  categories. 

MasteiType  teaciies  your  fingers  to  fly. 

Masterlype.  With  18  explosive  learning  levels,  you'll 
either  learn  to  type  or  get  blown  apart. 

39.95  (49.95 
All  require  disk 
32K  for  Atari"! 

48K  for  Apple  "1    ,— ,,im- 

64K  for  IBM  PC,     |w||^Si#^^^l^rta  So***^"^. 
64K  for  Com- 
modore 64  "'s 


MIC" 


f^ja^O^ 


OS 


SIS 
s|8 


will  be  drawn  on  the  previous  one.  This  feature 
allows  you  to  make  overlays  of  patterns. 

For  a  nice  sample,  I  suggest  you  try  the  fol- 
lowing inputs:  for  speed,  enter  7;  for  radius,  50; 
for  spin,  18;  then  choose  M  for  movement  and 
clear  the  screen. 

Experiment  with  different  values,  and  you'll 
see  some  stunning  designs. 

Program  i:  Splralizer -Apple  Version 

10   ONERR   GOTO  90 

60  Rt  =   CHR*  <B):  HCOLaR=  3:H*  =  " 

"  +  R*  +  R*  +  R«  +  R* 
70   HQHE  :  HSR 
80   VTAB  9:     HTAB  15:  FLASH  :  PRINT  "SPI 

RALIZER":  NORMAL 
90   POKE   -  16368, 0:Z  =  5:  HTAB  1;  VTAB 

21:  PRINT  "SPEED  <-50,50)?  ";:  BOSUB 
380: K  =  Z 
100   IF  Z  <   -  50  OR  Z  >  50  THEN  90 
110  K  =  K  -  1 
120  Z  =  35:  PRINT  "RADIUS  <1,60)?  " ; : 

GOSUB  380 :R  =  Z 
130   IF  Z  <  1  OR  Z  >  60  THEN   VTAB  22: 

BOTD  120 
140  R  =  R  +  13;S  =  1 
150  Z  =  1:  PRINT  "SPIN  (1,18)?  "j:  GOSUB 

380 
160   IF  Z  <  1  OR  Z  >  18  THEN   VTAB  23: 

BOTD    150 
170    A=1/Z:IFZ>1    AND    Z    <    9    THEN 

240 
180  SM  =  1:M  =  2;  PRINT  "MOVEMENT  OR  DE 

CREMENT  CH/DJ?  "H*; 
190   GET  X*:  IF  X*  =   CHR*  (13)  THEN  M  = 

0;SM  =  0:  PRINT  "NONE";:  BOTO  240 
200   IF  X*  =  "M"  THEN  SM  =  0:  GOTO  230 
210   IF  X*  =  "D"  THEN  M  =  0!  GOTO  230 
220   GOTO  190 
230   PRINT  X$; 
.  240   VTAB  21:  HTAB  24:  PRINT  "CLEAR  (Y/ 
N)?  "H*;:  BET  T*:  IF  TS  <   >  "N" 
THEN  PRINT  "YES":  TEXT  :  CALL  62450: 
HGR 
250   IF  T*  =  "N"  THEN   PRINT  "NO" 
260  W  =  1;Z  =  139:  IF  M  =  2  THEN  Z  =  80 
:  IF  A  =  1  THEN  W  =  5:M  =  1:Z  =  12 
2 
270   IF  SM  -  A  =  0  THEN  W  =  5 
280   IF  A  <  1  THEN  K  =  K  +  A 
290  C  =  0.001:  IF  A  <  1/9  THEN  M  =  M  / 

2:C  =  C  /  2 
300  J  =  R: I  =  79  -  R 
310   HPLOT  Z,0 
320   REM  -MAIN  LDOP- 

330   FOR  T  =  0  TO  6.2831  /  A  »  W  STEP  0 
.  06283  :F  =   PEEK  C  -  16384):  POKE 
-  16368,0:  IF  F  >  127  THEN  90 
340   IF  SM  THEN  J=R»S;I=79*S- 

J:S  =  S  -  C 
350   HPLOT   TO  Z  +  T  «  M  -   SIN  (T)  *  J 
+   SIN  <T  «  K)  «  1,79  -   COS  (T)  « 
J  -   COS  (T  «  K)  *  I:  NEXT 
360   GOTO  90 

370   REM  -INPUT  SUBROUTINE- 
380  L0  =  0:L1  =  l:Bt  =  "" 
390   PRINT  Ht; :  GET  AS 

400  IF  A*  =  "-"  AND  L0  =  0  THEN  PRINT 
A*;:B«  =  A$:L0  =  1:L1  =  2:  GOTO  39 
0 
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410 

420 
430 


440 

450 
460 
470 


IF  A*  =   CHR*  (13)  AND  L0  >  0  THEN 

Z  =   VAL  (B«):  PRINT  :  RETURN 

IF  A*  =   CHR*  (13)  THEN   PRINT  Z:  RETURN 

IF  A*  =  R*  AND  L0  >  1  THEN   PRINT 

AS;:B*  =   LEFT*  (B*,  LEN  (BS)  -  1) 

: L0  =  L0  -  1 :  GOTO  390 

IF  At  =  R»  AND  L0  =  1  THEN   PRINT 

A*;:B*  =  "":L0  =  0:  GOTO  390 

IF  L0  >  LI  THEN  390 

IF  A*  <  "0"  OR  A*  >  "9"  THEN  390 

PRINT  A«;:B*  =  B*  +  A*:L0  =  L0  +  1 

:  GOTO  390 


Program  2:  Spiralizer  -  vie  version 

100  IF  FL=1  THEN: GRAPHIC  4 

110  FL=1 J  PRINT" {CLRl": POKE  36879 , 28: PRINT 
"{DOWN} {3  RIGHT} EYELIu 

t3  RIGHT}-114  SPACES } - " 
120  PRINT" [3  RIGHT}-[PUR}T2  SPACES }SPIRAL 

IZER{2  spaces] {YEL}-":PRINT" (3  RIGHT} 

-{14  SPACES}-" 
130  PRINT" {3  RIGHT}J 

140  POKE198,0:Z=1;PRINT"{2  DOWN }{ RED } HOW 

(SPACEJMANY  SPI RAL" : PRINT "FIGURES  {l- 

5)  ?{4  SPACES} {3  LEFT}"; :GOSUB550:F=Z 
150  IF  F<1  OR  F>5  THEN  PRINT"{4  UP}";:GOT 

O  140 
160  FORP=lTOF: PRINT" {down} {CRN } SPIRAL  FIG 

URE  #";P: GOSUB  690 
170  FOR  I=7TO0  STEP-1:FORJ=1TO50:NEXT  J:P 

OKE  38680, I: NEXT  I 
180  Z=5 : PRINT "{ OFF } {BLU] {down} SPEED  (-50, 

50)  7{4  SPACES} {3  LEFT }";: GOSUB  550:K 

(P)=Z 
190  IF  Z<-50  OR  Z>50  THEN  PRINT"{2  UP)";: 

GOTO  180 

200  kCp)=k(p)-i 

210  Z=35: PRINT "{down} RADIUS  (1,60)  ? 

{4  SPACES} {3  left}"; : GOSUB  550:R(P)=Z 

*7 
220  IF  Z<1  OR  Z>60  THEN  PRINT" {2  UP}";:GO 

TO  210 
230  S=l 
240  Z=l: PRINT" {down} SPIN  (1,18)  7 

{4  SPACES) {3  LEFT}"; :GOSUB  550 
250  IF  Z<1  OR  Z>18  THEN  PRINT" {2  UP}";:GO 

TO  240 
260  FOR  1=8120  TO  8163: POKE  I,32:NEXT  I 
270  A(P)=1/Z:IF  Z>1  AND  Z<9  THEN  PRINT" 

{2  DOWN}": GOTO  3  50 
280  SM(P)=1:M(P}=2:PRINT"{D0WN}M0VEMENT  / 
DECREMENT {2  SPACES} (M/D)  ?{5  SPACES} 

{4  LEFT}"; 
290  GET  X$:IF  X$=""  THEN  290 
300  IF  X$=CHR5(13)  THEN  M( P )=0 :SM(P }=0:PR 

I NT "NONE": GOTO  3  50 
310  IF  X5="M"  THEN  SM(P)=0;GOTO  340 
320  IF  X5="D"  THEN  M(P)=0:GOTO  340 
330  GOTO  290 
340  PRINT  X? 
3  50  PRINT" {12  UP}":NEXT  P:C5=INT(RND (0 )*6 

)+2 
360  FOR  P=l  TO  F 
370  W=1:Z=400:IF  M(P)=2  THEN  Z=401:IF  A(P 

)=1  THEN  W=5:M(P)=1:Z=370 
380  IF  SM(P)-A(P)=0  THEN  W=5 
390  IF  A{P)<1  THEN  K(P)=KCP)+A(P) 


Finally!    An  Affordable  FuH-Size,  Full-Feature  PRINTER 

For  your  VIC-20®,  C-64®  ^^  $229.95 ! ! 

ATARI® 

Centronics  Parallel  Types 
And  RS-232  Serial  Types 


FEATURES: 

•  Full  graphics  capability. 

•  In  the  graphic  mode,  a  column  of 
graphic  data  can  be  repeated  as  many 
times  as  you  want  with  a  single  command. 

•  Double  width  character  output  under 
software  control  (5  char,  per  inch). 

•  Print  position  addressable  by  character 
or  dot  (positioning  control). 

•  Graphic  character  and  double  width 
character  modes  can  be  intermixed  on 
a  single  line. 

•  Automatic  printing.  When  the  text 
exceeds  the  maximum  line  length  no 
data  is  lost  due  to  overflow. 

•  Self-test  printing  mode. 

•  Paper  width  is  adjustable  up  to  10  inches. 
Standard  plain  paper. 

•  50  cps  print  speed. 

•  80  characters  per  line. 

•  5  X  7  dot  matrix. 

•  Full  2  yr.  Warranty. 

•  Foreign  character  sets 

For  U.S.,  U.K.,  Sweden,  and  Germany. 


BASIC  PRINTER 
(Requires  one 
Option  Betow) 


Any  of  these  Options  allow  you  to  connect  and  print-  cables  included. 

APROPRINT-2064™  (pictured)  . . .  .Add:  $35.95 

For  Commodore  VlC-20  &  C-64  -  Cableincluded. 

APROPRINT-4080™ Add:  $45.95 

For  all  Atari  Computers  -  Cable  included. 

APROPRINT-1000™ Add:  $29.95 

RS-232-Serial  -  Name  your  computer 

APROPRINT-8000™ Add:  $29.95 

Centronics  type  Parallel  -  Name  your  computer 

ADD:  $8.00  shipping  (cont.  USA),  $25.00  (Canada,  HI,  AK) 

(All  other  foreign  orders  Add  $55.00  (shipped  by  Air) 


The  ONE  VIC-20®  Memory  Expansion  Board  that  DOES  IT  ALL! 


Maxi  mum  Memory  allows  you  to  use  more  power! u  I  programs  for; 

•  EDUCATION  •  ENTERTAINMENT  •  MAIL  LISTS 

•  BUSINESS  APPLICATIONS  •  FINANCIAL  RECORDS 
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RAMAX 


Very  lo*    ._ 
pow«r  UMge 
requrresoa 
extern  al 
power  sourcfl' 


TO  ORDER: 

Send  Check  or  Money  Order  For  the  Total 

Calif,  residents  add  6%  tax . 

Or  Contact  your  Local  DeaJer 

Phone  orders  Call  (805)  482-3604 


VSM    I  Alt  Prices  U.S.  Dollars 


DEALER  INQUIRIES  WELCOME 


High  reli3Wify 
gcM  plated 
conrWdWSl 


WE  SERVICE  WHAT  WE  SELL 

VIC-20  &  Commodore-64  a^e  registered 
trademail^s  of  Comrrwdofe  Intofnationa). 
Atari  is  a  trademarK  of  Atari  lr>c. 

APROPOS  TECHNOLOGY 

1071 -A  Avenida  Acaso 

Caniarillo,CA  93010 
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ConwTefWal  LSA  Fore^ffi  orbera  pkiaw 
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•  Comptelet^jerBbng  Manual 
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purchase' 
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L  APROPOS  TECHNOLOGY 


400  C=.001:IF  A(P)<l/9  THEN  MCP)=M( P J /2 :C 

=C/2 
410  J=R{P) :I=400-R(P) 
420  GRAPHIC  2: COLOR  l,2,C5,C5 
430  POINT  C5,125+(Z+100)/1.3,130 
440  FOR  T=0TO  6 . 283I/A( P ) *W  STEP  .06283 
450  IF  PEEK(198)<>  0  THEN  100 
460  IF  SM{P)  THEN  J=R{ P ) *S : I=400*S-J : S=S- 

C 
470  X=125+(100+Z+T*M{P)-SIN(T)*J+SIN(T*K( 

P))*I)/1.3 
480  Y=520-COS(T)*J-COS(T*K(P) )*I 
490  IF  X<0  OR  Y<0  THEN  650 
500  DRAW  1  TO  X,Y:NEXT 
510  NEXT  PrGOSUB  690 
520  GET  R$:IF  R$  =  "'"  THEN  520 
530  GOTO  100 
540  REM  -INPUT  ROUTINE- 
550  L0=0:L1=1;B$="" 
560  GET  A$:IF  A$=""  THEN  560 
570  IF  A5="-"  AND  L0=0  THEN  PRINT  A$;:B$= 

A$:L0=1:L1=2:GOTO  560 
580  IF  A$=CHR${13)  AND  L,0>0  THEN  Z=VAL(B? 

) : PRINT: RETURN 
590  IF  A$=CHR5{13)  THEN  PRINT  ZsRETURN 
600  IF  A5=CHR$(20)  AND  L0>1  THEN  PRINT  A? 

; : B$=LEFT$ ( B$ , LEN ( B$ ) -1 ) : L0=L0-1 ; GOTO 
560 
610  IF  A$=CHR$(20)  AND  L0=1  THEN  PRINT  A$ 

; :B?="":L0=0:GOTO  560 
620  IF  L0>LI  THEN  560 
630  IF  A$<"0"  OR  A$>"9"  THEN  560 
640  PRINT  A$r :B?=B?+A?:L0=L0+1:GOTO  560 
650  REM  ERROR  TRAPPING  ROUTINE 
660  GRAPHIC  4:PRINT"{CLR}E2  DOWNjCOORDINA 

TES  ARE  OUT {3  SPACES} OF  RANGE" 
670  PRINT" {2  down} TRY  ANOTHER  FIGURE ":PRI 

NT"t2  DOWN} RETURNING  TO  MAIN  MENU" 
680  FOR  1=1  TO  4000: NEXT: GOTO  110 
690  F0RV=15  TO  0  STEP  - . 5 : SOUND245 , 0, 0 ,0, 

V: NEXT: RETURN 

Program  3:  Spiralizer- Atari  version 


KHiHMHJISSagai; 


100 
110 


120 
130 

140 


150 

160 
170 


180 

190 
200 

210 

220 
230 


□LOR  2,0,0:SETCOL 
ION  0,5iPRINT  #6; 
Z  E  R";FOR  1=1  TO 


DIM  fl*<3) , X»<4> 
GRAPHICS  2:SETC 
OR  0,  •?,  10:  POSIT 
"SP  I  RAL  I 

750:NeXT  I 
OPEN  «1 , 4, 0,  "K:  " 

GRAPHICS  B:COLOR  1 : SETCOLQR  2,0, 
0 
?  CHR* ( 125) ; : G 


POKE  656,0: POKE 
ed  (-50  to  S0)? 
";:GOSUB  450: K= 
IF  Z<-50  DR  Z>5 
<UP>"; :60T0  140 
K  =  K-1 

G=3: 2=35: PRINT 
?<:3  SPACES><3  L 
R  =  Z 

IF  Z<1  OR  Z>60 
" : GOTO  170 
R=R+13: S=l 
Z=1:PRINT  "Spin 
{3  SPACES>C3  LE 
IF  Z< 1  OR  Z>1B 
":60TD  200 
A=l/Z: IF  Z>1  AN 
SM=1 :M=2: PRINT 
ement  <C/E)?t4 


4:Z=5:P0KE  752,0: 
657,2:PRINT  "Spe 
iZ    SPACES! t3  LEFT> 
Z 
0  THEN  PRINT  " 


"Radius  (1  to  60) 
EFTJ " ; : 60SUB  450: 


THEN  PRINT 


up; 


c  1  to  18) ? 
FT> " ; : EDSUB  450 
THEN  PRINT  "{2  UP3 

D  Z<9  THEN  290 
"Movement  or  Deer 
SPACES><:4  LEFT>"; 


A  siiiilnirst  of  color  am  be  slvii  in  the  VIC  vursion  of 
"Spiralizer," 


240  BET  #1  ,  X:  X«.  =  CHR*  (  X  )  :  IF  X  =  155  THE 

N  M=0: SM=0: X*="None" : ?  X*;:60T0 

290 
250  IF  X*="M"  THEN  SM=0:GOTO  280 
260  IF  X*="D"  THEN  M=0:GOTO  2S0 
270  GOTO  240 
280  PRINT  X*; 
290  POKE  656,1:PDKE  657,24:POKE  752, 

1:PRINT  "Clear   (Bi/C:)7<:3  SPACES> 

{3  LEFT>"; 
300  GET  #1 , V: A*=CHR* (V) : IF  A*<>"N"  T 

HEN  GOSUB  550: GOTO  320 
310  PRINT  "No"; 
320  W=1:2=139:IF  M=2  THEN  Z=B0:IF  A= 

1  THEN  W=5: M= 1 : Z=122 
330  IF  SM-A=0  THEN  W=5 
340  IF  A<1  THEN  K=K+A 
350  C=1.0E-03:IF  A<l/9  THEN  M  =  li/2:C  = 

C/2 
360  J=R: I=79-R 
370  PLOT  Z+20,0 
380  REM  -MAIN  LOOP- 
390  FOR  T=0  TO  6.2831/A«W  STEP  0.062 

83: IF  PEEK (764) <255  THEN  POKE  76 

4,255:G0T0  140 
400  IF  SM  THEN  J=R*S : I =79«S- J : S=S-C 
410  TRAP  420;DRAWTO  (  Z+T « M-S  I  N  (  T )  * J  + 

SINCT«K)«I)+20,79-COS(T)«J-COS(T 

*K)  «I 
420  NEXT  T 
430  GOTO  140 

440  REM  -INPUT  SUBROUTINE- 
450  ZL=1 

460  GET  #1,V:IF  V0155  THEN  500 
470  IF  ZL=1  THEN  ?  Z : RETURN 
480  SI6N=1 : IF' A* < 1 , 1 ) ="-"  THEN  A*=A* 

(2) : SIBN=-1 
490  Z=0:FOR  1  =  1  TD  LEN  (  A* )  :  Z  =  Z *  1 0  +  AS 

C  (A*  (  I  )  ) -48:  NEXT  I:Z  =  SIBN»Z:?  :R 

ETURN 
500  IF  V=126  THEN  IF  ZL>1  THEN  ZL=ZL 

-1:PRINT  CHR« ( 126) ;: GOTO  460 
510  IF  (V<4a  OR  V>57)  AND  V045  AND 

V046  THEN  460 
S20  IF  ZL=G  THEN  460 
530  PRINT  CHR* (V)  ;  : A*  (  ZL) =CHR* (V)  :  ZL 

=  ZL+1 
540  GOTO  460 
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AARDVARK  L.T.D. 
TRS-80  COLOR       COMMODORE  64      VIC-20      SINCLAIR/TIMEX 


TI99/4A 


QUEST  -  A  NEW  IDEA  IN  ADVENTURE 
GAMESI  Different  from  all  the  others. 
Quest  is  played  on  a  computer  generated 
map  of  Alesia.  Your  job  is  to  gather  men 
and  supplies  bv  combat,  bargaining,  expfor- 
ation  of  ruins  and  temples  and  outright 
banditry.  When  your  force  is  strong  enough, 
you  attack  tJie  Citadel  of  Moorlock  in  a 
life  or  death  battle  to  the  finish.  Playable 
in  2  to  5  hours,  this  one  is  different  every 
time.  TRS-80  Color,  and  Sinclair,  13KVIC- 
20,  Extended  BASIC  required  for  TRS-80 
Color  and  TI99/A.  $19.95  each. 

32K  TRS  80  COLOR  Version  $29.95 . 

Adds  a  second  level  with  dungeons  and 
more  Questing, 


n 


Tamer  ^-^^1^ 

WIZARDS  TOWER  -  This  is  very  similar  to 
Quest  Isee  above).  We  added  wizards,  magic, 
dragons,  and  dungeons  to  come  up  with  a 
Quest  VMith  a  D&D  flavor.  It  requires  16k 
extended  color  BASIC.  13k  VIC,  Commo- 
dore 64,  TRS-80  16k  Extended  BASIC, 
TI99/A  extended  BASIC.  S19.95  Tape, 
$24.95  Disk. 

Authors  —  Aardvark  pays  the  highest  com- 
missions in  the  industry  and  gives  programs 
the  widest  possible  advertising  coverage. 
Send  a  Self  Addressed  Stamped  Envelope 
for  our  Authors  Information  Package. 


ZEUS  —  It's  fast  and  furious  as  you  become 
the  WIZARD  fighting  off  the  Thurderbolts 
of  an  angry  ZEUS.  Your  Cone  of  Cold  will 
destroy  a  thunderbolt  and  your  shield  will 
protect  you  —  for  a  while.  This  is  the  best 
and  highest  speed  arcade  action  we  have 
ever  done.  Difficulty  increases  in  wave  after 
wave,  providing  hours  of  challenging  fun 
and  a  game  that  you  may  never  completely 
master.  Commodore  64,  Vic20  1 16k  ex- 
pander), and  16k  TRS-80  Color  Computer. 
(ALL  MACHINE  CODE!) 
$24.95  tape  $29.95  disk.  (Tape  will  not 
transier  to  disk.) 


SEAWOLFE  -  ALL  MACHINE  CODE  In 
this  high  speed  arcade  game,  you  lay  out 
patterns  of  torpedoes  ahead  of  the  attacking 
PT  boats.  Requires  Joysticks,  at  least  13k 
RAM,  and  fast  reflexes.  Lots  of  Color  and 
Sound.  A  fun  game.  Tape  or  Disk  for  Vic20, 
Commodore  64.  and  TRS-80  Color.  NOTE: 
tape  will  not  transfer  to  disk  I 
$24.95  Tape  -  $29.95  Disk. 


ADVENTURESf!! 

The  Adventures  below  are  written  in  BASIC, 
are  full  featured,  fast  action,  full  plotted  ad- 
ventures that  take  30-50  hours  to  play.  (Ad- 
ventures are  interactive  fantasies.  It's  like 
reading  a  book  except  that  you  are  Ihe  main 
character  as  you  give  the  computer,  com- 
mands like  "Look  in  the  Coffin"  and  "Light 
the  torch.") 

Adventuring  requires  16k  on  Sinclair, 
and  TRS-80  Color.  They  require  8k  on  OSl 
and  1 3k  on  V IC-20.  Now  available  for  TI9g. 
Any  Commodore  64. 

$19.95  Tape  ~  $24.95  Disk. 

ESCAPE  FROM  MARS 

(by  Rodger  Olsenl 
This  ADVENTURE  takes  place  on  the  RED 
PLANET.  You'll  have  to  explore  a  Martian 
city  and  deal  with  possibly  hostile  aliens  to 
survive  this  one.  A  good  first  adventure, 

PYRAMID  (by  Rodger  Olsen) 
This  is  our  most  challenging  ADVENTURE. 
It  is  a  treasure  hunt   in  a  pyramid  full  of 
problems.  Exciting  and  tough ! 


Dungeons  of  Death  -  This  is  the  first  D&D 
type  game  good  enough  to  qualify  at  Aard- 
vark. This  is  serious  D&D  that  allows  1  to  6 
players  to  go  on  a  Dragon  Hunting,  Monster 
Killing,  Dungeon  Exploring  Quest.  Played 
on  an  on-screen  map,  you  get  a  choice  of 
race  and  character  (Human,  Dwarf,  Soldier, 
Wizard,  etc.),  a  chance  to  grow  from  game 
to  game,  and  a  15  page  manual.  16k  Ex- 
tended TRS-80  Color,  13k  VIC,  Commo- 
dore 64.  At  the  normal  price  for  an  Adven- 
ture (19.95  tape,  $24.95  disk),  this  is  a  give- 
away. 

Dealers  —  We  have  a  line  of  about  100  origi- 
nal programs  for  the  machines  listed  here. 
We  have  High  speed  Arcades,  Quality  Ad- 
ventures, Word  processors  and  Business 
Software  for  Small  machines.  Better  yet, 
we  have  excellent  Dealer  support.  Phone  for 
information. 


Send  $1 .00  for  Complete  Catalogue   -   Please  specify  system  on  all  orders  -  $2.00  Shipping  Charge  on  each  order 

AARDVARK  L.T.D. 
2352  S.  Commerce,  Walled  Lake,  M!  48088  /  (313)  669-3110 
Phone  Orders  Only:  (800)  624-4327 
Phone  Orders  Accepted  8:00  a.m.  to  4:00  p.m.  EST.  Mon.-Fri. 


Byte  Book  Club " 


FORMERLY  COMPUTER  PROFESSIONALS'  BOOK  CLUB 


INTRODUCING   THE   UNIX 

SYSTEM.  By  H.  McGilton  &  R. 
Morgan.  256  pp.,  SO  illut.  soft.  This 
book  helps  you  over  the  initial  hur- 
dles of  learning  this  new  and  pow- 
erful computertool — even  if  you 
have  never  used  the  Unix  system  or 
penetrated  any  of  its  literature. 
450/013  S18.95 

OPERATING  SYSTEMS  By  H, 

Lorin  &  H.  iVl.  Dietel 

582354-3  S24'.95 

MICROCOMPUTER  GRAPH- 
ICS AND  PROGRAMMING 
TECHNIQUES.  By  H.  Katzan,  Jr. 
240  pp..  lOOiltus.  and  tables.  Here's 
a  stimulating  introduction  to  com- 
puter graphics  for  small  com- 
puters. It  covers  all  the  advances  to 
date  in  color  coding  and  computer 
graphics  technology  and — best  of 
all — it's  written  for  information 
professionals  who  can't  draw]  In- 
cludes actual  graphics  programs 
worth  hundreds  of  dollars! 
582576-7  S18.95 


MINICOMPUTER  AND  MI- 
CROPROCESSOR INTERFAC- 
ING. By  J,  C.  Cluley.  266  pp..  73 
illus.  and  tables.  Unless  you  are 
content  to  have  your  information 
processing  system  simply  talk  to  it- 
self, you  need  the  intense  coverage 
of  interfacing  provided  so  bril- 
liantly by  this  compact  volume.  In 
addition  to  discussing  the  logical 
design  of  interfaces  assembled  from 
small-scale  integrated  circuits,  the 
book  gives  you  a  lucid  picture  of  the 
interface  packages  designed  for  mi- 
croprocessor systems  and  the  way 
in  which  they  are  used. 
582585-6B  $27.50 

(Counts  as  2  of  your  3  books) 

ASSEMBLERS,  COMPILERS, 
AND     PROGRAM     TRANSLA- 
TION By  P.  Calingaert 
582110-9  S24.95 

INTERFACE  PROJECTS  FOR 
THE  TRS-80  By  R,  C,  Hallgren 

582466-3  $18,95 


PROGRAMMING  WITH  ADA: 

An  IiitRMluction  By  Means  of 

Gi^ck,iatetl  ExatnplB  By  P.  We<]- 

ner 

789/24X  $19.95 

AN  INTRODUCTION  TO  VISI- 
CALC^  MATRIXINC  FOR  AP- 
PLE* AND  IBMF.  By  H.  Anbar- 
lian.  252  pp.,  illus..  softcover. 
Enables  you  to  use  VisiCalc  ma- 
trixes— also  known  as  templates  and 
models — to  put  your  Apple  or  IBM 
personal  computer  to  productive 
use  almost  immediately.  It  de- 
scribes the  actual  process  of  devel- 
oping matrixes  for  such  applica- 
tions as  expense  vouchers,  price/ 
earnings  ratios,  payrolls,  stock 
portfolios,  and  more. 
016/054  122,95 


TALKING  COMPUTERS  AND 
TELECOMMUNICATtONS. 

By  J.  A.  Kuecken,  23?  pp.,  94  illus. 
A  look  at  a  future  that's  already 
upon  us — and  a  guide  to  help  you 
put  this  exciting  technology  to 
work  for  youl  Coverage  ranges 
from  the  basic  techniques  of  te- 
lephony to  linear  predictive  cod- 
ing, both  the  hardware  and  soft- 
ware techniques  used  in  Moser 
encoding,  and  the  problems  of 
speech  recognition, 
582801-4B  $26.50 

(Counts  as  2  of  your  3  books) 

APPLE  PASCAL  GAMES  By  D. 

Hergert  and  J.  T.  Kalash.  371  pp.. 
illus.,  softcover.  Most  fun  any- 
body's had  with  an  Apple  since 
Eve!  These  27  games  range  from 
the  simple  to  more  advanced 
games  such  as  Numconvert, 
Wumpus,  and  Biackbox. 
582521-X  S19.95 


POWERFUL 


POWERFUL 
SAVINGS! 

Take  any  3  books  for  only 


$d|00 


each* 

Values  up  to  $79.90 


LEARNING  WITH  LOGO  By  D. 

H,  Watt.  230  pp.,  spiraibound. 
softcover.  Makes  LOGO  come 
alive!  This  introductory  Byte  Book 
teaches  basic  LOGO  program- 
ming, offers  numerous  fascinat- 
ing projects  that  reveal  the  pow- 
erful ideas  underlying  this  dynamic 
language,  and  shows  how  to  avoid 
common  bugs  and  pitfalls, 
685/703  $14.95 

MICROPROCESSOR  APPLI- 
CATIONS HANDBOOK.  Ed- 
ited by  D.  F.  Stout.  472  pp.,  284  il- 
lus. This  BIG  book  on  SMALL  chips 
will  help  you  make  your  systems 
timely,  versatile,  and  cost-effec- 
tive. The  16  expert  contributors 
provide  in-depth  treatments  of  both 
hardware  and  software  so  you  can 
completely  analyze,  design,  con- 
struct, and  program. 
617/988B  $39.95 

(Counts  as  2  of  your  3  books) 


COMPUTER  PERIPHERALS 
FOR  MlNICOMPinERS,  MI- 
CROPROCESSORS, AND  PER- 
SONAL COMPUTERS  By  C.    L. 

Hohenstein 

294/518  $23.95 

THE  SMALL  COMPUTER 
CONNECTION:  Networks  for 
the  Home  and  Office.  By  N.  L. 

Shapiro.  256  pp.  Shows  you  how  to 
use  existing  hardware  and  soft- 
ware to  link  your  small  computer  to 
other  computers — large  and  small — 
and  to  a  vast  universe  of  databases, 
564/124  $15.95 

ELECTRONICS  ENGINEERS' 
HANDBOOK.  2/e  By  D.  C.  Fink 
&  D,  Christiansen 

209/812A  $79,90 

(Counts  as  3  of  your  3  books) 
STRUCTURED  PROGRAM- 

MING: Tlieory  and  Pracdoe  By  R. 
C.  Unger,  H.  D.  Mills  &  B.  I.  Witt 
788/S37B  $26.95 

(Counts  as  2  of  your  3  books) 


DATA  COMMUNICATIONS 
FOR  MICROCOMPUTERS: 
With  Practical  Applications 
and  Experiments  By  E.  A.  Ni- 
chols. J.  C.  Nichols,  and  K.R.  Mus- 
son.  352  pp.,  103  illus.  If  your  mi- 
cro lacks  the  "installation  support" 
needed  to  establish  data  com- 
munications between  equipment 
within  a  system  as  well  as  be- 
tween separate  systems,  you'll 
welcome  this  information-packed 
guide!  It  covers  everything  from 
corvstructing  a  simple  cable  to 
writing  1/0. 

464/804  $16.95 

Z80  USERS  IHANUAL.  By  J. 
Carr.  326  pp..  with  diagrams,  charts, 
and  tables.  Takes  you  through  every 
opportunity  the  ZAP  can  offerl  It 
covers  Z80  pin  definitions,  CPU 
control  signals,  support  chips,  in- 
terfacing peripherals,  and  much 
more. 
582336-5  121,95 


THE   BUSINESS  GUIDE   TO 
SMALL  COMPUTERS  By  L. 

Calmus.  230  pp.,  22  illus.  Written 
by  a  long-experienced  computer 
consultant,  this  is  a  treasury  of  in- 
formation on  both  hardware  and 
software — requirements,  costs, 
maintenance,  implementation, 
and  systems  design. 
096/627  $19.95 

MICRCXIOMPt/TER  INTERFAC- 
ING By  B-  Artwick 
789/436B  $28.00 

(Counts  as  2  of  your  3  books) 
ELECTRONICS  DICTIONARY. 
4/eflyJ.  Markus 

404/313B  $32.95 

(Counts  as  2  of  your  3  books) 
MICROPROCESSOR  DATA 
BOOK.  By  S.  A.  Money.  350  pp., 
220  illus.  A  truly  awesome  collec- 
tion of  data  about  virtually  every 
Chip  available  today! 
427/062B  $42.50 

(Counts  as  2  of  your  3  books) 


ANNOUNCING:  The  Most  Important  Computer  Handbook 


Ever  Published! 


The  McGRAW-HlLL  COMPUTER  HANDBOOK. 
992  pp..  475  illus.,  edited  by  Harry  L.  Helms,  with 
over  24  world-reknown  contributors,  is  by  far  the 
most  useful  and  comprehensive  reference  yet 
designed  for  today's  computer  user.  Crammed 
with  easy  to  get  at  information,  ranging  from 
design  concepts  to  programming  techniques, 
from  data  bases  to  interfacing,  networking, 
speech  synthesis  and  recognition  to  mention  just 
a  few  of  hundreds  of  entries,  this  one  volume 
reference  does  it  all — in  language  and 
presentation  everyone  can  understand. 
Invaluable  for  home,  office,  and  school  use,  The 
Computer  Handbook  "can  be  helpful  to  users  in 
solving  many  mysteries,  while  opening  new  doors 
for  exploration  and  serving  as  a  continuing 
reference,"  writes  Thomas  C.  Bartee  of  Harvard 
University. 

279/721A  S79.50 

(Counts  as  3  of  your  3  books) 


3  books  for  only  $1.00  each ...  if  you  join  now  for  a  trial  period  and  agree  to  purchase  three  more 
books — at  handsome  discounts — during  your  first  year  of  membership.  (Publishers'  prices  shown) 


PRINCIPLES  OF  INTERAC- 
TIVE COMPUTER  CltAPH- 
1C5.  By  W.  M.  Newman  and  R. 
Sproull.  2nd  Ed..  544  pp.,  illus.Now 
in  a  revised,  updated  Second  Edi- 
tion, this  volume  has  long  been  THE 
standard  source  of  information  for 
designers!  Now,  as  before,  it  is  ut- 
terly comprehensive  and  up  to  the 
minute  in  its  coverage. 
463/3878  S35.50 

(Counts  as  2  of  your  3  books) 

VIC  20  PROGRAMMER'S 
REFERENCE    GUIDE     By   A. 

Finkel 

582736-0  316.95 

MICROCOMPUTER  BUY- 
ER'S   GUIDE,     2/e.    By    T. 

Webster.  351  pp.,  UO  illus.  soft- 
cover.  In  one  handy  source — all 
the  facts  you  need  to  pick  the  right 
small  computer  for  your  needs!  In 
addition  to  guidance  on  selecting 
any  micro  or  software  package, 
the  book  has  an  illustrated  survey 
of  each  of  more  than  500  micro- 
computers and  microcomputer 
systems  from  some  180  major 
suppliers. 

689/598  SI  9.95 

WORD  PROCESSING  BUY- 
ER'S GUIDE.  By  A.  Naiman.  340 
pp.  aius.  Here  is  a  personal  guide 
that  leads  you  out  of  the  jungle  of 
competing  word  processors.  Which 
one  is  best  for  you?  Find  out  BE- 
FORE you  buy! 
458/693  SI  5.95 


TRS-80  GRAPHICS  FOR  THE 
MODEL  1  AND  MODEL  Hi  By 

D.  Kater  and  S,  Thomas.  204  pp., 
88  Was.  While  this  Byte  Book  is 
tailored  to  the  TRS-80,  it  is  appli- 
cable to  almost  any  personal  com- 
puter since  it  is  written  in  stan- 
dard Microsoft  BASIC. 
333/033  S14.95 

HANDS-ON  BASIC  For  the 
IBM  Personal  Computer  By 
H,  Peckham.  308  pp.,  spiral- 
bound,  softcaver.  Learn  BASIC 
programming  right  at  the  com- 
puter! Step  by  step,  this  manual 
gives  you  hands-on  experience 
with  BASIC  through  a  series  of 
guided  activities.  Each  of  the  12 
chapters  requires  at  least  one  hour 
at  the  computer  and  at  least  one 
hour  studying  the  text. 
49-1/78X  S22.95 

HANDS-ON  BASIC  FOR  THE 
Atari    400/800/1 2XL     By    H. 

Peckham 

491/941  S19.95 

APPLE  PASCAL:  A  Hands-On 
Approach.  By  A.  Luehrmann  and  H.. 
Peckham,  426  pp..  spiralbound.  Fi- 
nally— a  how-to-use-PASCAL  book 
for  Apple  computer  users  that 
makes  a  complete  language  as  easy 
as  (forgive  us!)  applesauce.  Takes 
you  from  "total  ignorance"  all  the 
way  up  to  a  very  impressive  com- 
petence in  the  use  of  that  rather 
complex  language,  PASCAL. 
491/712  S18.95 


THE  C  PRIMER.  By  I.  Hancock 
&  M.  Kreider.  256pp..  25 illus..  soft- 
bound.  This  is  the  only  book  on  the 
market  that  describes  the  C  lan- 
guage clearly  and  simply  from  the 
novice's  point  of  view. 
259/SlX  S14,95 

HOW   TO    BUY    (AND    SUR- 
VIVE!)   YOUR    FIRST   COM- 
PUTER   By  C.N.  Kolve 
351/309  S14.95 


SOFTWARE  DEBUCCINC  FOR 
MICROCOMPUTERS  By  R.  Bruce 
582075-7  $18,95 

MICROPROCESSOR-BASED 
ELECTRONIC  GAMES:  De- 
sign, Programming,  and 
Troubleshooting.  By  W. 
Buchsbaum  and  R.  Mauro.  293 pp.. 
illus.,  softcaver.  Turn  your  TV  into 
a  home  arcade  with  the  first  tech- 
nical guide  dedicated  to  fun'. 
087/229  S9.95 


I—  Consider  tKese  Byte  Books  as  well!— r 


MICROCOMPUTER       OP- 
ERATING SYSTEMS  By  M. 

Dahmke 

150/710  S16.95 

TRS-80  GRAPHICS  FOR 

THE      MODEL      1      AND 

MODEL  III  By  D.  Kater  &  S. 

Thomas 

333/033  S14.95 

THREADED     INTERPRE- 
TIVE LANGUAGES  By  R.  G. 

Loeliger 

383/60X  S20.75 

THE    BRAINS    OF   MEN 
AND  MACHINES  By  E,  W. 

Kent 

341/230  S20,95 

BASIC    SCIENT1RC    SUB- 
ROUTINES, Vol.  II  By  Dr. 

F.  R.  Ruckdeschel 

542/0238  S26.95 

(Counts  as  2  of  your  3  books) 


CIARCIA'S  CIRCUIT  CEL- 
LAR, Vol.  2  By  S.  Clarcla 
109/63X  S15.95 

BYTE  BOOK  OF  PASCAL 

By  B.  W.  Liffick 

789/673B  S27.50 

(Counts  as  2  of  your  3  books) 

BASIC    SCIENTIFIC    SUB- 
ROUTINES, Vol.  I  By  Dr,  F, 

R.  Ruckdeschel 

542/01 5B  S27.95 

(Counts  as  2  of  your  3  books) 
CIARCIA'S  CIRCUIT  CEL- 
LAR, Vol.  HI  By  S.  Garcia 
109/656  S15.95 

MICROCOMPUTER    DISK 
TECHNIQUES  By  P.  Swan- 
son 
625/824  $15.95 

BUILD   YOUR  OWN  Z-80 
COMPUTER  By  S.  Ciarcia 
109/621  Si  8.95 


Why  YOU  should  join  the  Byte  Book  Club"  now! 


#  Best  and  newest  books  from  ALL  publishers!  Books  are  se- 
lected from  a  wide  range  of  publishers  by  expert  editors  and  con- 
sultants to  give  you  continuing  access  to  the  best  and  latest  books  in 
your  field. 

9  Big  savingsl  Build  your  library  and  save  money  too!  Savings  range 
up  to  30%  or  more  off  publishers'  list  prices — usually  20%  to  25%. 

#  Bonus  Itooksl  You  will  immediately  begin  to  participate  in  our  Bo- 
nus Book  Plan  that  allows  you  savings  up  to  80%  oft  the  publishers' 
prices  of  many  professional  and  general  interest  books! 

4  Convenience!  14-16  timesayear  (about  once  every  3-4  weeksjyou 
receive  the  Club  Bulletin  FREE,  It  fully  describes  the  Main  Selection 


and  alternate  selections.  A  dated  Reply  Card  is  included.  If  you  want 
the  Main  Selection,  you  simply  do  nothing — it  will  be  shipped  auto- 
matically. If  you  want  an  alternate  selection — or  no  book  at  all — you 
simply  indicate  it  on  the  Reply  Card  and  return  it  by  the  date  speci- 
fied. You  will  have  at  least  10  days  to  decide.  If.  because  of  late  deliv- 
ery of  the  Bulletin  you  receive  a  Main  Selection  you  do  not  want,  you 
may  return  it  for  credit  at  the  Club's  expense. 

As  a  Club  member  you  agree  only  to  the  purchase  of  three  additional 
books  during  your  first  year  of  membership.  Membership  may  be  dis- 
continued by  either  you  or  the  Club  at  any  time  after  you  have  pur- 
chased the  three  additional  books.  Orders  from  outside  the  U.S.  can- 
not be  accepted. 
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Fill  out  the  card  and  mail  today!  If  the  card  is  missing,  write  to: 

BYTE  BOOK  CLUB;"  P.O.  Box  582,  Hightstown,  New  Jersey  08520 
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REM  -TEXT  WINDOW  WRITE- 
GRflPHICS  a:SETCDLOR  2,0,0 
PRINT  "Bpeed= '■  ;  K  +  1  :  ?  "Radius=";R 
-13:?  "Spin=" ; Z; POKE  752,1:PRINT 
"Movement  or  Decrement  (E;/E)="; 
X$  • 

RETURN 


Program  4: 

Spiralizer  -  Color  Computer  Version 

10  CLS  0 

20  PRINT3200, "SPIRALIZER" ; 

25  FDRT=1TO1000: NEXT 

30  CLS  3 

35  K  =  5 

40  INPUT  "SPEED  < -50  TO  50>";K« 

41  K=VALCK*) 

42  IF  K«=""THEN  K=5 

45  IFK<-50ORK>50THEN40 

47  K=K-1 

48  R=35 

50  INPUT  "RADIUS  <1-60)";R* 

51  R=VAL(R«) 

52  IF  R*=" "THENR=35 

55  IF  R<1  OR  R>60  THEN50 

57  R=R+13:S=1 

60  INPUT  "SPIN  1-18"; Z* 

61  Z=VAL(Z«) 

63  IF  Z*=""THENZ=1 

65  IF  Z<10R  Z>1BTHEN  60 

70  A=l/ZsIF  Z>1AND  Z<9THEN200 

80  SM=1:M=2 

85  INPUT  "MOVEMENT  OR  DECREMENT " j X* 

90  IF  LEFT* < X*, 1 ) <>"M"  ANDLEFT«(X*, 

1 ) <>"D"THENM  =  0; SM  =  0 ; PR  I  NT : PR  I  NT 

"NONE" ; :GOTO200 
95  IF  LEFT*(X*, 1 )="M"THENSM=0:eOTOl 

90 
100  IF  LEFT*<X*, 1 )="D"THENM=0:GDTO1 

90 
190  PRINT  X* 

200  print: input"clear  (y/n)";t* 
205  if  left* <t«, 1 ) <>"n"thenprint"ye 

s"? :e=0:remput  clear  of  hires 
210  if  left* (t*, 1 ) ="n"thenprint"no" 

{26  spaces:- 
220  w=1:z=139:if  m=2  then  z=b0:if  a 

=1  THENW=5: M=l: Z=122 
230  IF  SM-A=0THENW=5 
235  IF  A<1THENK=K+A 

238  C=0. 00  1: IFA< 1 /9THENM=M/2 : C=C/2 
240  J=R; I=79-R 
250  X0=Z:  Y0  =  20{:10  SPACES> 
260  REM  MAIN  LOOP 
270  FDR  T  =  0  TO  6.2831/A*W  STEP  '0.06 

283 
280  IF  SM  THENJ=R«S   : I =79«S-J : S=S- 

C 
290  X1=Z+T»M-SIN «T> «J+SIN<T«K) «I 

i9    SPACES! 
300  Yl=79-COS(T) *J-COB<T«K) «I; Y1=Y1 

+  20 
310  GOSUB  1000: X0=X1 : Y0=Y1 
320  NEXT 

330  A*=1NKEY*:IF  A*=""THEN330 
340  GOTO30 
1000  SCREEN  1 , 1 
1010  IF  LEFT* (T*, 1 ) ="Y"ANDE=0THENPC 

LS: E=l 
1020  LINE  (X0,  Y0)  -  (XI  ,  YD  ,  PSET 
1030  RETURN 

1W     COMPUTE!     October  1983 


"Spiralizer."  Color  Computer  version. 

Program  5: 

Plot  And  Drawto  Routine  (64  Version) 

by  Gregg  Peeie,  Editoriol  Programmer 

10  1=49152 :CK=0 

20  READA:CK=CK+A:PRINT"[CLR)",-CK:IF  A=256 

THEN40 
30  POKE  I,A;I=I+1:G0T0  20 
40  IFCK0167356  THENPRINT" ERROR  IN  DATA  S 

TATEMENTS" 
49152  DATA  173,234,207,141,236,207,173 
49160  DATA  232,207,141,238,207,173,235 
49168  DATA  207,141,237,207,173,233,207 
49176  DATA  141,239,207,173,236,207,56 
49184  DATA  237,230,207,141,240,207,173 
49192  DATA  237,207,237,231,207,141,241 
49200  DATA  207,176,24,173,240,207,73 
49208  DATA  255,141,240,207,173,241,207 
49215  DATA  73,255,141,241,207,238,240 
49224  DATA  207,208,3,238,241,207,173 
49232  DATA  238,207,56,237,228,207,141 
49240  DATA  244,207,173,239,207,237,229 
49248  DATA  207,141,245,207,176,24,173 
49256  DATA  244,207,73,255,141,244,207 
49264  DATA  173,245,207,73,255,141,245 
49272  DATA  207,238,244,207,208,3,238 
49280  DATA  245,207,56,173,236,207,237 
49283  DATA  230,207,141,192,207,173,237 
49296  DATA  207,237,231,207,13,192,207 
49304  DATA  240,15,144,24,169,1,141 
49312  DATA  222,207,169,0,141,223,207 
49320  DATA  76,169,192,169,0,141,222 
49328  DATA  207,141,223,207,76,169,192 
49335  DATA  169,255,141,222,207,141,223 
49344  DATA  207,56,173,238,207,237,228 
49352  DATA  207,141,193,207,173,239,207 
49360  DATA  237,229,207,13,193,207,240 
49368  DATA  15,144,24,169,1,141,246 
4937S  DATA  207,169,0,141,247,207,76 
49384  DATA  224,192,169,0,141,246,207 
49392  DATA  141,247,207,76,224,192,169 
49400  DATA  255,141,246,207,141,247,207 
49403  DATA  173,230,207,141,248,207,1-73 
49416  DATA  228,207,141,250,207,173,231 
49424  DATA  207,141,249,207,173,229,207 
49432  DATA  141,251,207,56,173,244,207 
49440  DATA  237,240,207,141,211,207,173 
49448  DATA  245,207,237,241,207,13,211 
49456  DATA  207,176,15,173,240,207,141 
49464  DATA  252,207,173,241,207,141,253 


ADVERTISEMENT 


Orange  Plus  Educational  News  located  at  23801  Qilabasas  Road/Suite  2050/Calabasas,  CA91302/|213]  999-5210 

Legal  Apple'"'^  Compatible 

New  Computer  runs  CP/M  &  Apple'''' Software 


CALABASAS  —  Now  instrunlors  tan 
teach  Apple-type  programs  such  as 
LOGO  in  one  class  Jind  professional-style 
word  processing  in  another  without  any 
hardware  changes.  Dual  microprocessors 
(Z80-A  &  6502,  two  cDinputers  in  one 
case),  with  the  radical  new  Orange  Plus 
development  the  "EuroROM",  allows  the 
machine  to  read/ write/work  with  Apple- 
type  software  as  well  as  CP/M  programs 
and  access  either  CPU  via  the  keyboard. 

The  "ORANGE+TWO""'  is  a  brand 
new  direction  in  the  evolution  of  the  per- 
sonal computer.  ORANGEFORTH-83,  a 
derivative  of  Fig-FORTH  —  a  readily 
available  public  domain  language,  is  resi- 
dent in  the  ROM*.  Also  included  is  CP/M 
3.0,  Digital  Research's  latest  CP/M  ver- 
sion. There  is  also  a  built-in  disk  drive 
controller  for  two  Apple-type  drives,  a 
cassette  interface,  joystick  port.colorgra- 
phics  and  ASCII  keyboard  with  numeric 
keypad.  For  expert  word  processing,  the 
keyboard  features  upper  and  lower  case 
(lower  case  characters  are  true  descen- 
ders) with  auto  repeat. 

This  new  breed  of  computer  is  a  break- 
through for  educators  and  school  systems 
ihrnughoul  the  world.  The  ability  to  run 
both  Apple-type  and  CP/M  software  on 
the  same  machine  relieves  financially- 
pressed  educators  from  expensive  equip- 
ment burdens,  allowing  them  to  spend 
more  money  where  it  counts,.. on  the 
teachers. 

•Aviiihililfi  nil  tlisk  (11  oxliiii  CDSI. 

THE  LEASING 
ALTERNATIVE 

CALABASAS  —  Through  select  leasing 
companies,  Orange  Plus  Computer 
Systems  will  offer  the  following  lease 
programs  to  qualified  corporations  and 
educational  institutions:  An  "ORANGE+ 
TWO'"'  computer  with  a  green  monitor 
and  one  disk  drive  for  only  $59.55  per 
month. .  .36  month  closed  end  lease.  Also 
included  is  a  full  maintenance  program 
and  all  revisions  and  upgrades  that  may 
be  available  during  the  term  of  the  lease. 
Subject  tn  credit  approval.  Call  for 
additional  information. 

DISTRIBUTORS: 
CALL  (213)  999-5210 


CALABASAS  —  Due  to  the  tremendous 
amount  of  individual  inquiries  and  dealer 
applications,  qualified  stocking  distribu- 
tors are  needed.  Select  areas  available! 


MORE  FOR  LESS 

The  "ORANGE +TWO""'  fi4K  computer  includes  these  standard  features: 

Built-in  CP/M  2.2  compatibility no  charge 

Digital  Research's  CP/M  3.0 no  charge 

Built-in  disk  drive  controller  for  two  Apple-type  drives  no  charge 

Numeric  keypad  with  separate  return  key   no  charge 

110/220  volt  switch  selectable  power  supply,  50-60  Hz no  charge 

Full  function  ASCII  keyboard  with  auto  repeal no  charge 

Cassette  interface  no  charge 

Fully  grounded  metal  base  plate  no  charge 

Adjustable  audio  volume  control no  charge 

ORANGEFORTH-83,  ZflO-A  FORTH  language,  resident  in  ROM  ...  no  charge 

Z80-A  CPU,  a  second  computer no  charge 

6  slot  double  sided  logic  board no  charge 

Bank  switchable  RAM,  fully  socketed,  expandable  to  256K no  charge 

Programmable  2764  EPROMs   no  charge 

TOTAL:  "ORANGE+TWO'"' $1095.00 

Comporc  t/u!,s(!  features  inc.luckd  on  (he  "ORANGE+TWO""  with  the  competi- 
tion's over  S2000  for  equivoJeni  /)roduct. 

MORE  PRODUCTS  FROM  ORANGE  PLUS  COMPUTER 

SYSTEMS  TO  ENHANCE  YOUR  "ORANGE+TWO""', 

APPLE  ll/ll  PLUS,  OR  FRANKLIN  ACE  1000 

Disk-based  ORANGEFORTH-83  language  with  full  documentation  ....  $99,95 

Digital  Research's"  CBASIC  with  disk  and  documentation $49,95 

Orange  Plus  KoalaPad"  Touch  Tablet  w/Micro  Illustrator™  $124.95 

Orange  Plus  Joystick  (works  on  "ORANGE+TWO".  Apple  II,  II+,  &  //e| $29,95 

Orange  Plus  self-centering  joystick $39.95 

10MB  (Formatted]  5V4"  half-height  Winchester  Hard  Disk  Drive $1495.00 

Controller  &  Interface  for  Hard  Disk** $395.00 

■■JiitJuclfs  everything  Jtuciwsary  [o  be  JnslaMed  in  "Ormngu+Two",  Appk  or  FrntiMin  Oimiiuter 

The  above  are  suggested  retail  prices.  Prices  may  vary  from  state  to  state. 

Collins  International  Trading  Corporation, 

23801  Calabasas  Road,  Suite'2D50,  Calabasas,  CA.  91302 
(213)999-5210 


49472 

DATA 

49480 

DATA 

49488 

DATA 

49496 

DATA 

49504 

DATA 

49512 

DATA 

49520 

DATA 

49S28 

DATA 

49536 

DATA 

49544 

DATA 

49552 

DATA 

49560 

DATA 

49568 

DATA 

49576 

DATA 

49584 

DATA 

49592 

DATA 

49600 

DATA 

49608 

DATA 

49616 

DATA 

49624 

DATA 

49632 

DATA 

49640 

DATA 

49648 

DATA 

49656 

DATA 

49664 

DATA 

49672 

DATA 

49680 

DATA 

49688 

DATA 

49696 

DATA 

49704 

DATA 

49712 

DATA 

49720 

DATA 

49728 

DATA 

49736 

DATA 

49744 

DATA 

49752 

DATA 

49760 

DATA 

49768 

DATA 

49776 

DATA 

49784 

DATA 

49792 

DATA 

49800 

DATA 

49808 

DATA 

49816 

DATA 

49824 

DATA 

49832 

DATA 

49840 

DATA 

49848 

DATA 

49856 

DATA 

49864 

DATA 

49872 

DATA 

49880 

DATA 

49888 

DATA 

49896 

DATA 

49904 

DATA 

49912 

DATA 

49920 

DATA 

49928 

DATA 

49936 

DATA 

49944 

DATA 

49952 

DATA 

49960 

DATA 

49968 

DATA 

49976 

DATA 

49984 

DATA 

49992 

DATA 

50000 

DATA 

50008 

DATA 

50016 

DATA 

50024 

DATA 

50032 

DATA 

50040 

DATA 

207,76,40,193,173,244,207 

141 , 252 , 207 , 173 , 245 , 207 , 141 

253,207,173,252,207,141,254 

207,173,253,207,141,255,207 

56,173,252,207,237,244,207 

141,211,207, 173,253,207,2*^7 

245 , 207 , 13 , 211 , 207 , 208, 17 

173,255, 207, 74, 141 , 161, 207 

173,254,207,106,141,160,207 

76,104,193,173,255,207,74 

141,227,207,173,254,207,106 

141,226,207,173,252,207,13 

253,207,240,27,173,253,207 

48,22,24,173,160,207,109 

240,207,141,160,207,173,161 

207,109,241,207,141,161,207 

76,142,193,76,45,194,56 

173,1*0,207,23  7,254,207,141 

211,207,173,161,207,237,255 

207,13,211,207,144,38,56 

173,160,207,237,254,207,141 

160, 207 , 173 , 161 , 207 , 237 , 255 

207 , 141 , 161 , 207 , 24 , 173 ,  248 

207,109,222,207,141,248,207 

173 , 249 , 207 , 109 , 223 , 207 , 141 

249,207,24,173,226,207,109 

244, 207 , 141 , 226 , 207 ,  173  ,  227 

207 , 109 , 245 , 207 , 141 , 227 , 207 

56,173 , 226 , 207 , 237 , 254, 207 

141,193,207,173,227,207,237 

255 ,207,13,193,207, 144, 38 

56,173,226,207,237,254,207 

141,226,207,173,227,207,237 

255,207,141,227,207,24,173 

250 , 207 , 109 , 246 , 207 , 141 , 250 

207,173,251,207,109,247,207 

141,251,207,32,46,194,206 

252,207,173,252,207,201,255 

240,3,76,104,193,206,253 

207,76,104,193,96,173,251 

207,240,8,173,250,207,201 

65,144,1,96,173,248,207 

201,199,144,1,96,173,249 

207,240,1,96,173,250,207 

141,212,207,173,251,207,141 

213,207,173,248,207,141,214 

207 , 173 , 249 , 207 , 141 , 215 , 207 

173,215,207,74,141,217,207 

173,214,207,106,141,216,207 

173,217,207,74,141.217,207 

173,216,207,106,141,216,207 

173,217,207,74,141,217,207 

173,216,207,106,141,216,207 

173,213,207,74,141,219,207 

173,212,207,106,141,218,207 

173,219,207,74,141,219,207 

173,218,207,106,141,218,207 

173,219,207,74,141,219,207 

173,218,207,106,141,218,207 

173,214,207,41,7,141,220 

207,173,216,207,10,46,217 

207,10,46,217,207,10,141 

210,207,46,217,207,173,217 

207,141,211,207,173,210,207 

10,46,217,207,10,46,217 

207,109,210,207,141,216,207 

173,211,207,109,217,207,141 

217,207,173,216,207,10,46 

217,207,10,46,217,207,10 

46,217,207,141,216,207,173 

218,207,10,46,219,207,10 

46,219,207,10,46,219,207 


141,218,207,24,173,216,207 

109 , 218 , 207 , 141 , 208 , 207 ,17  3 

217,207,109,219,207,141,209 

207 , 24, 173 , 220, 207 , 109 , 208 

207,141,208,207,169,0,109 

209 , 207 , 141 , 209 , 207 , 24, 169 

32 , 109 , 209 , 207 , 141 , 209 , 207 

173,208,207,133,251,173,209 

207,133,252,173,212,207,41 

7,141,225,207,56,169,7 

237,225,207,141,225,207,169 

0, 141 , 206 , 207 ,56,173, 225 

207,45,206,207,206,225,207 

16,245,160,0,177,251,13 

206,207,145,251,96,169,147 

32,210,255,169,0,162,0 

157,0,32,157,0,33,157 

0,34,157,0,35,157,0 

36,157,0,37,157,0,38 

157,0,39,157,0,40,157 

0,41,157,0,42,157,0 

43,157,0,44,157,0,45 

157,0,46,157,0,47,157 

0,48,157,0,49,157,0 

50,157,0,51,157,0,52 

157,0,53,157,0,54,157 

0,55,157,0,56,157,0 

57,157,0,58,157,0,59 

157,0,60,157,0,61,157 

0,62,157,0,63,232,208 

157,169,16,162,0,157,0 

4,157,0,5,157,0,6 

157,0,7,232,208,241,96,256 

Pragram  6:  Spiralizer  -  64  Version 

Translated  by  Gregg  Peele,  Editorial  Programmer 
10    POKE53281,l:PRINT"{CLRJ{9    DOWN} 

{7    RIGHT}"; 
20    PRINT"{BLK} £2    SPACES }UCCCCCCCCCCCCCCCI" 
30    PRINT"  1 9    SPACES  }_B{  15    SPACES  }B" 
40    PRINT" {9    SPACESJB12    SPACES} SPIRALIZER 

{3    SPACES }B" 
50    PRINT" [9    SPACES }b{ 15    SPACES }B" 
60    PRINT" [9    SPACES }Bf 15    SPACES }B" 
70    PRINT" {9    SPACES } JCCCCCCCCCCCCCCCK " 
80    PRINT" [7    down} {12    RIGHTjPRESS    SPACE";; 

POKEl 98 , 0 ; FORT=lTO300  tNEXT 
100    WAIT197,64,64;POKE53  272,21;POKE53  265, 
27 ; PRINT" {CLR}"; 


50048 

DATA 

50056 

DATA 

50064 

DATA 

50072 

DATA 

50080 

DATA 

50088 

DATA 

50096 

DATA 

50104 

DATA 

50112 

DATA 

50120 

DATA 

50128 

DATA 

50136 

DATA 

50144 

DATA 

50152 

DATA 

50160 

DATA 

50168 

DATA 

50176 

DATA 

50184 

DATA 

50192 

DATA 

50200 

DATA 

50208 

DATA 

50216 

DATA 

50224 

DATA 

50232 

DATA 

50240 

DATA 

50248 

DATA 

50256 

DATA 

50264 

DATA 

50272 

DATA 

50280 

DATA 

50288 

DATA 

50296 

DATA 

50304 

DATA 

Complex  designs  are  possible  with  "Spiralizer,"  64  version. 
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UNICORN  TREASURES 

MAKE 
LEARNING  A  PLEASURE 


E^ch  Unicom  educational  game  teaches  as  it 
entertains.  AU  our  treasures  have  been  developed 
and  tested  at  The  Computer  Learning  Center  for 
Children.  Written  by  experts  who  malte  them 
educational  and  fun,  our  games  feature  colorful, 
high-resolution  graphics,  multiple  difficulty  levels, 
beautiful  music,  and  are  completely  user-friendly 
with  simple  on-screen  Instructions. 

Unicorn's  educational  games  are  unique  in  their 
flexibility.  Parents  will  be  delighted  to  be  able  to 
use  them  year  after  year  as  their  child's  educational 
needs  change.  No  need  to  spend  a  lot  of  money  on 
software  that  children  will  master  in  a  short  time 
and  not  use  again.  Our  superior  packaging  will 
protect  our  treasures  for  years  to  come. 


10  LITTLE  ROBOTS  —  Ages  2-7.  The  most 
delight  Tul  way  to  introduce  your  young  learner  to 
the  computer.  10  Little  Robots  has  four  different 
games  to  keep  your  child's  avid  attention.  There  is 
upper  and  lower  case  letter  recognition,  counting 
the  robots,  robot  addition,  and  an  interactive 
storybook  tale.  The  storybook  tale  introduces  the 
concept  of  subtraction  and  serves  as  a  motiva- 
tional tool  for  the  beginning  reader. 


Available  for  Alar!  400/800/1200, 
48K  RAM  and  one  disk  drive. 

Soon  to  be  available  for 
Commodore  64  and  IBM  PC. 


FLINBUNCH  —  The  most  flexible  language  arts 
program  on  the  market  today.  Available  on  three 
levels,  elementary  (grades  1-6),  intermediate 
(junior  high  school),  and  college  board 
preparatory  (high  school).  Each  level  includes 
over  2000  words  and  phrases.  Within  the  elemen- 
tary level  the  word  list  can  be  accessed  by  grade. 
The  program  also  allows  you  to  enter  your  own 
words  and  phrases.  You  can  adjust  the  length  of 
time  the  words  and  phrases  are  displayed  on  the 
screen,  malting  Futibunch  an  excellent  tool  for 
speed  reading  as  well  as  remediation.  There  is  a 
built-in  printer  option  which  allows  you  to  list  the 
vocabulary  for  further  review.  Funbunch  also 
contains  a  computer  doodle  drawing  game  for 
creative  fun.  Please  specify  Funbunch  (elemen- 
tary), Funbunch  (intermediate)  or  Funbunch  (col- 
lege board  preparatory)  when  ordering. 


SHIPS  AHOY  -  Ages  5-13.  Out- 
standing graphics  and  sotind  makes 
this  program  an  entertaining  way 
for  children  to  practice  their  basic 
math  facts.  The  object  of  the  game 
is  to  sail  your  ship  across  the  ocean 
avoiding  the  treacherous  mine  hid- 
den beneath  the  sea.  Ships  Ahoy 
allows  you  to  select  beginner,  inter- 
mediate or  advanced  levels  within 
the  four  basic  math  functions.  The 
flexibiiily  of  this  program  lies  in  the 
option  of  choosing  to  be  timed  or 
not  enabling  the  academically 
talented  student  to  practice  speed 
malh. 


RACE    CAR    'RITHMETIC"'- 

Ages  5-Adtilt.  .A  math  game  that 
the  entire  family  can  play  together. 
Each  person  can  compete  on  their 
own  level  in  a  race  to  the  finish 
Une.  Children  and  adults  alike  will 
have  hour  upon  hour  of  education- 
al fun  together  and  can  practice  the 
four  basic  math  functions,  each 
choosing  their  own  operation,  dif- 
ficulty level  and  optional  time  fac- 
tor. Race  Car  'Rithmelic  fully 
utilizes  your  Atari  computer's 
superb  graphics  and  sound  capabil- 
ities. From  1  to  4  players. 


Available  at  your  local  computer  .store. 
If  you  can't  find  them  there,  you  can 
order  directly  from  Unicorn  Software. 
All  programs  539.95,  Please  enclose 
S2.(X)  for  .shipping  and  handling. 
Visa  and  Mastercard  welcomed. 


Atari,  Commodore  64,  and  IBM  PC  arc 
Iradanarks  of  Atari  Inc.,  Commodore 
Electronics  LTD  and  International  Business 
Machines  Corp.,  respectively. 
Cop>Tighi  1983  by  Unicorn  Sflfiwarc  Company 


.All  rigtlts  reserved 


UNICORN 


ssipirwaEii 


DEALER  INQUIRIES  INVITED 

UNICORN  SOFTWARE 

1775  East  Tropicana  Avenue 

Las  Vegas,  Nevada  89109 

(702)  798-2727  or  (702)  798-3085 


TM 


110  Z=5  :PRINT"SPEED(-50  TO  50)7  ";" 

[3  SPACES) {4  LEFT]"; :GOSUB500:K=Z 
115  IFZ<-50OR  Z>50  THEN110 
125  K=K-1 
127  Z=35; PRINT "RADIUS  (1  TO  60)?  ";" 

{3  SPACES} [4  LEFT] "; :GOSUB500:R=Z 
130  IFZ<1ORZ>60THENI27 
133  R=R+13:S=1 
135  Z=l : PRINT "SPIN (1  TO  18)?  ";" 

{3  SPACES} {4  LEFT}"; :GOSUB500 
137  IFZ<10RZ>18  THEN135 
140  A=1/Z:IFZ>1ANDZ<9THEN200 
143  SM=1;M=2: PRINT "MOVEMENT  OR  DECREMENT 

(SPACE) (M/D)?  ";"{3  SPACES) {4  LEFT]"; 
145  GETX?:IfX$=""THEN145 
148  IF  X?=CHR$(13)THEN  M=0: SM=0 : PRINT :PRI 

NT "{DOWN) NONE"; :GOTO200 
150  IFX5="M"THENSM=0:GOTO190 
160  IF  X$="D"THEN  M=0:GOTO  190 
170  GOT0145 
190  PRINTX$ 

200  PRINT:PRINT"CLEAR  {y/N)7 

201  GETT$:IFT$=  ""THEN  201 

203  IFT?<> "N"THENPRINT "YES " : PRINT " { CLR) " ; 

:  s  Ys  aaoi  s  azr^^ 

205  IF  T$="N"THENPRINT"NO"  :SYS^9&SSSt>l^ 

210  W=1:Z=139:IF  M=2  THEN  Z=80iIF  A=l  THE 

N  W=5:M=1:Z=122 
215  IF  SM-A=0THENW=5 
220  IF  A<1THEN  K=K+A 

230  C=0.001:IF  A<1/9THENM=M/2:C=C/2 
240  J=R:I=79-R 

250  X0=Z+20  :Y0=30:REM:SYS49152 
260  REM  MAIN  LOOP 

270  FORT=0TO6.2831/A*WSTEP0. 06283 
280  IF  SMTHENJ=R*S:I=79*S-J:S=S-C 


290  X1=Z+T*M-SIN(T)*J+SIN(T*K)*I  :Xl=Xl+2 

0 
300  Yl=79-COS (T) *J-COS (T*K) *I : Yl=Yl+30 
308  GOSUB1000:X0=X1:Y0=Y1 
310  NEXT  :GOTO100 
500  L0=0:L1=1:B$="" 
510  PRINTH$; 

520  GETA$:IF  A$=""THEN520 
530  IF  A$="-"AND  L0=0THENPRINTA$; :B$=A$ :L 

0=ltLl=2 :GOTO510 
540  IFA$=  CHR$(13)AND  L0>0THENZ=VAL(B? ) : P 

RINT: RETURN 
550  IF  A?=CHR$C 13 )THENPRINTZ: RETURN 
560  IF  A$=R5ANDL0>1THEKPRINTA$; :B$=LEFT?C 

B$,LEN(B$)-1 ) :L0=L0-1 :GOTO510 

570  IF  A?=R$AND  L0=1THENPRINTA5 ; : B$=" " :L0 

=0:GOTO510 
580  IFL0>L1THEN510 
590  IFA$<"0"ORA?>"9"THEN510 
600  PRINTA$; :B$=B?+A$:L0=L0+1:GOTO510 
900  POKE53272,21:POKE53265,27:PRINT"[CLR] 

" ; : END 
1000  POKE532 72, PEEK ( 53272 )OR8:POKE53265,P 

EEK{53265)OR32 
1005  X0=INT(X0):IFX0<=255THEN  POKE53220,X 
0:POKE53221,0 

1010  IF  X0>255THENPOKE53220, (X0-256) :POKE 

53221,1 
1030  POKE53222,Y0:POKE53223,0 
1040  X1=INT(X1) :IFX1<=255THEN  POKE53224,X 

1:POKE53225,0 
1050  IF  Xl>255THENPOKE53224, (Xl-256):POKE 

53225,1 
1060  P0KE53226,Y1 :POKE53227,0 
1200  SYS49152  : RETURN  © 


_    .  UJE  mflKE  fl  GREAT  CASE 
^%^  FOR  VOUR  COmPUTER. 


One  size  does  not  fit  all.  Our  cases  are  designed  forspecific  hardware 
configurations.  When  you  put  your  computer  in  our  case,  it  fits  hand-in-glove. 
Once  your  equipment  is  safely  tnsidB  the  attache-style  carrying  case,  it  never  has 
to  betaken  out  again.  To  operate,  simply  remove  the  lid  and  connect  the  power. 
To  store  your  computer,  disconnect  the  power,  enclose  your  disks,  working  papers, 
and  manuals  In  the  compartment  provided,  and  attach  the  lid.  It's  as  easy  as  that. 

•  AP101    Apple  II  with  Single  Drive $109 

•  AP102    Apple  I!  with  Two  Disk  Drives :..  ng 

•  AP103    Apple  II  9-Jnch  Monitors  Two  Drives 129 

•  AP104    Apple  III,  Two  Drives  SSilentype  Printer 139 

•  AP105    l3"Black&  White l\i1onitorwith Accessories 99 

•  AP106    AmdekColorl.liorill  Monitor 119 

•  FR152    FranklinAce  1000  or  1200  with  Two  Drives 119 

•  FR153  Franklin  Ace  1000  or  1200  with  Two  Drives  &  9"  Monitor. ..  139 

•  RS201    TRS-80  Model  I  Computer,  Expansion  Unit  &  Drives 109 

•  RS204    TRS-80  Model  III 129 

•  AT301     ATARI  400  orSOO  Computers  with  Peripherals 109 

•  P401      Paper  Tiger  Printer  (400/445/460) 99 

•  P402      Centronics  730/737  &  Radio  Shack  Printer 89 

•  P403  Epson  MX70  or  MXao,  Microline82A  Printer  or  Color 

Computer 89 

•  P404      Epson  MX1 00  Printer 99 

•  P405      IDS  560  or  Prism  132  Printer 109 

•  P406      C.ltohStarwriter/PrintmasterF-10  Printer 119 

•  P407      OkidataMicrolineBSA  or  84  Printer 99 

•  P408      C.ltohProwfiter2  Printer 99 


IB502 


IB501 


•  P409  C.  Itoh  Prowriter  (Apple  Dot  Matrix)  or  NEC  PC8023  Printer 

•  IB501  IBM  Personal  Computer  with  Keyboard 

•  IB502  IBM  Monochrome  Monitor 

•  HP501  HP41  with  Accessories 

•  CM702  Commodore  64  (or  Vic  20)  with  One  Drive 

•  CM703  Commodore  Model  64  with  Two  Drives 

•  CM704  Commodore  Model  64  with  Dataset 

•  NS010  North  Star  Advantage 

•  CC80  Matching  Attache  Case  (5") 

•  CC90  Matching  Attache  Case  (3") 

•  CC91  Matching  Accessories  Case  (S'/v  Diskettes.  Paper,  etc.) . . . 

•  CC92  5.25"  Diskette  Case  (Holds  75  Diskettes) 

•  CC50  Case  Cart . , 


89 

129 

99 

99 

119 

129 

109 

139 

85 

75 

95 

49 

79 


CALL  TOLL  FREE:  (800)  848-7548 
Computer  Case  Company,  5650  Indian  Mound  Court,  Columbus,  Otiio  43213  (614)  868-9464 


ipj3M-(mmmwM}^^ 


COM  64 

Any  3  for  $«0^ 
Any  One  lor  $32M 

TempeJ  ol  fifaf^i  (0/C ) 

Ci^opttnef  (Rom)       Gndrunrier  (^om) 

||    Sooopa-  Trcc^a  *1  (D)       Critlcol  Mois  (D) 

FiaTTO  Ball  (Rom)       Serpentine  (Rom) 

Seofox  (Bom)       Jump  Man  (D/C ) 

Turmoil  (D)       Repton(D) 

Renabaancs  (C) 


^^' 


JOY  STICK  SPECIALS 

ENJOYSTICK 

Com  M  Retail  S29.95  Special  $i  1» 

Atari  r>elail$349S$p«:lal$>3JO 

AWLE 

Select -A-Port 
Rota.1  S5595  5p*«:lol  M2  JO 

JovJtlck 
Relali  SS9.9S   SpKlal  tU^ 

Track  Ball 
Retlal  S64  VJ  St>«kil  VUro 


^  VIC  20 
Any  3  tor  $«0J)0 
Any  OTW  for  S30^ 

Temple  of  Apshai  (cass) 

^      Scorpkx^CRom)       Turmoil  (Rom) 

Nflt^t  Strike  (Rom)       f^lver  Rescue  (Rom)1 

S^  Blazer  ( f?om)       Srxjke  evte  C^orri) 

Astrobllts  (Rom)       Choplllter  (Rom)  ■ 

Drolds  (Rom)  .     Shomus  (Rom)    .■ 

AE(Rom) 


ATARI 

Any  3  tpr  SSSJ» 

Any  On*  for  S20JX) 

Crujtt.  Cmmble.  Chomp  (D/C) 

Apqfo  Panic  (D/C)       Jowtsreoker  (0/C) 

'  Raster  aaiter(D)       Canyon  Climber  (D/C)  I 

Generic  Drtft  (D/C)       Trock  Attock(D) 

MoTcti  Racer  (D/C)       Sky  Blaier  (D) 

Sorpentlne  (D/C)       LoOyrlnlti  ( D/Cl 

■   CornpuJJeotl  (D/C) 


CALL  TOIL  FREE  1-600-828-2836 


(Fof  Placing  Orders 
QutsicJe  Colifomig) 


For  Inside  California  and  Ofheririquifies  Coll  1-Pl6-9aP-3l74 


APPLE 

Any  3  for  $S5iX> 
Anv.Onetor^ZIXM 

DtrAdi  Midnight  Mogte 

CXxXitief        Sftfpontine 

Geoetlc  Drift       Spoce  Qucsk 

Canyor^  CilmDef        Raster  EBoitef 

STor  Blaiw        Snock  Aftoch 

SeaFo9t 


MAIL  ORDEfiS:  For  fasr  oairvery.  send  certttiecJ  cfieck. 
rrK)iwv  orders,  or  Viso  or  MasterCard  number  QOd 
eitpiraiion  date.  lor  lolal  purchose  price  plus  1%  or  S2 
minimum  (w  postoge  QrKJ  hondlir>g  Add  S5  for 
shiipmer»t  ojtside  tT%e  con'inental  US.  ColrtomiQ 
Residents  odd  6%  jaJ#s  tax 

CotQiog  tree  with  any  order  &  »rvd  S2  pestoge  Oftd 
handling  ond  please  specify  computer  type 
SuDject  fo  stock  on  hofid,  Prrces  suD>ect  to  change. 


*"®\-connection- 


5^33  VISTA  DEL  ORO  WAY 
FAIR  OAKS,  CA  95628 


0) 

c 
(1) 

E 


Program  Your  Own  EPROMS 
IW:  $99.50 


promenade 

MQDfL    ^1 


PLUGS  INTO  USER  PORT. 
NOTHING  ELSE  NEEDED. 
EASY  TO  USE.  VERSATILE. 

•  Read  or  Program.  One  byte  or 
32K  bytesi 

OR  Use  like  a  disk  drive.  LOAD, 

SAVE,  GET.  INPUT,  PRINT,  CMD, 

OPEN,  CLOSE— EPROM  FILES! 

Our  software  lets  you  use  familiar  BASIC  commands  to 

create,  modify,  scratcfi  files  on  readily  available  EPROM 

chips.  Adds  a  new  dimension  to  yourcomputing  capability. 

Works  with  most  ML  Monitors  too. 

•  The  promenade"  01  gives  you  4  programming  voltages, 
2  EPROM  supply  voltages,  3  jntelligenl  programming 
algorithms,  15  bit  chip  addressing,  3  LED's  and  NO 
switches.  Yourcomputer  controls  everything  from  software! 

•  Textool  socket.  Anti-static  aluminum  housing. 

•  Extension  cable,  cartridge  PC  boards,  etc.  at  extra  charge. 

•  Some  EPROM  types  you  can  use  with  the  promenade" 

2758      2532      462732P    27128     5133      X2816A" 
2516      2732      2564      27256      5143      52B13- 
271S      27C32     2764      68764     2815'      4B016P' 
27C16     2732A     27064     68766     2616- 

'Darwtss  slecfiically  eiaseabls  types. 
^  "  C<inmaMrB  Busn«u  Uicfwnn 

Check  or  Money  Orders. 
NO  COD'S. 


Call  Toll  Free:  800-421-7731 
In  California:  800-421-7748 

En  JASON-RANHEIM 
Zj  580  Parrott  St.,  San  Jose,  CA  951 12 
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For  All 
Walks  of  Life 


MtRAGE  COMCEr      offeri  you  a  ilep  in  «ht  right  direction  by 
presenting  tht  All  New  DATABASE  MANAGER  and  ... 
WORD  PROCESSOR  programs,  the  nvoH  powerful  and  eaiy  to 
"=-  •oftware  avairable  for  the  Cammodore  M. 


DATABASE  MANAGER 

Itic  Mast  Powerful 

Oatibne  Manasctncnt  Syitcm 

■  loo's.  Mactilne  Lansuose 

■  Free  Form  Design  atid  Input 

•  Sort  on  Any  Field/Any  Level 

•  Calculated  Fields 

•  Max.  Record  size  =  9J3O0 
Oioracters 


WORD  PROCESSOR 
to  Colinnn  Screen  Display 
Without  Additional  Hardware 

•  lOO^fi  Mactitne  LanguflSE 

•  Over  70  Sinsic  Keystroke  Commands 

•  Printed  Poge/tlne/CtiaraUer  Counters 

•  True  Word  Wrap 

•  Search,  lieplace  and  Block 
Operations 


FOR  THE  COMMODbRE  64 


#^    liiRAGE  concEPLX  inc. 

•  '  '      ■'  :]  "A  step  Aheadf 


2519W.  Shaw,  Suite  106/Ffesno,CA  93711  /  Customer  Support:  (209)  227-8369 
Order  Number:  (800)  441-1441  OrcJer  Number  (In  Calif.):  (800)  641-1442 


Commodore  EXEC 


Edwin  King 


There  are  times  when  you'd  benefit  from  being  able  to 
access  subroutines  directly  from  a  disk  file.  They're  not 
in  your  program  (taking  up  space),  but  they  can  be 
accessed  from  a  main  program,  executed,  and  then  the 
main  program  continues.  Called  the  EXEC  command 
on  those  few  versions  of  BASIC  which  have  if,  this 
technique  is  worth  adding  to  your  programmer's  bag  of 
tricks.  For  all  Commodore  machines.  We'll  go  through 
the  process  step  by  step  so  you  can  try  the  technique 
and  watch  it  in  operation. 


Here's  a  way  to  store  all  of  your  favorite  sub- 
routines on  disk  and  have  programs  call  them 
when  they're  needed,  without  having  to  retype 
or  append  or  use  up  memory  space. 

The  Technique 

The  idea  behind  the  EXEC  command  (as  found  in 
Applesoft  BASIC;  Commodore  Microsoft  has  no 
such  thing)  is  to  execute  a  subroutine  from  disk  as 
if  it  were  typed  directly  into  the  computer.  Just 
call  a  command  from  the  disk,  in  the  form  of  a 
character  string,  and  start  POKEing  to  the  dynamic 
keyboard. 

For  those  not  familiar  with  the  dynamic 
keyboard  concept,  let  me  review.  Every  time  a 
key  is  pressed,  the  computer  stores  the  ASCII 
code  representation  of  it  in  a  place  called  the 
"keyboard  buffer."  It  keeps  doing  this  until  you 
press  RETURN  (which  also  goes  into  the  buffer), 
then  it  goes  back  to  evaluate  and  execute  what 
you  just  typed  in.  Lest  the  computer  forget  some 
of  the  things  you  typed,  it  also  keeps  track  of  how 
many  characters  you  typed  before  (and  including) 
RETURN. 

Now,  if  we  are  in  immediate  mode,  we  can 
make  the  computer  think  we  typed  something  in 
by  PRINTing  it,  then  RETURNing  over  what  was 
printed  on  screen.  The  dynamic  keyboard  routine 
involves  PRINTing  a  command  on  the  screen  and 
then  POKEing  a  few  carriage  returns  (13)  into  the 
buffer  to  make  the  computer  think  we  typed  in 
the  command  and  the  carriage  returns.  This  way 
we  only  need  to  POKE  one  carriage  return  for 
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every  line  we  want  entered. 

There  are  a  few  drawbacks  to  this  system. 
First  of  all,  it  only  works  in  immediate  mode,  not 
as  an  executing,  RUNning  program.  So,  we  have 
to  PRINT  the  command  and  PRINT  a  GOTO  to 
get  us  back  into  the  program.  This  requires  the 
cursor  to  be  very  carefully  positioned  each  time 
we  execute  a  command  -  which  means  no  PRINT 
statements  can  be  anywhere  in  our  EXEC  file. 
Second,  INPUT,  INPUT#,  GET,  and  GET#  are 
illegal  in  immediate  mode  and  therefore  cannot 
be  used  in  our  EXEC  file.  And  last,  since  typing 
in  a  line  with  a  line  number  causes  that  line  to  be 
added  to  the  program,  our  EXEC  file  will  have  no 
line  numbers.  This  means  that  any  use  of  GOTOs 
or  GOSUBs  will  call  lines  in  the  program,  not  in 
the  EXEC  file.  Be  very  careful  if  you  use  these 
commands. 

The  Program 

"EXEC-file"  was  written  on  a  VIC-20  and  will  also 
run,  as  is,  on  a  Commodore  64  (you  may  want  to 
change  the  "22"  in  line  85  to  "40").  It  can  easily 
be  modified  to  run  on  other  Commodore  machines 
(more  on  this  later). 

Lines  Function 

40-60  get  input  and  store  file  to  disk 

70-100         call  and  execute  the  file 
1000-1002  check  for  disk  error 

When  creating  an  EXEC  file,  be  sure  to  type 
in  the  EXEC  file  commands  loithout  line  numbers. 
Numbers  will  almost  guarantee  a  crash  when  you 
later  EXEC  the  file.  The  file-call  routine  (lines  70- 
100)  can  easily  be  lifted  and  relocated  to  be  used 
in  another  program. 

Modifications 

Users  of  other  Commodore  machines  should  find 
this  program  very  easy  to  modify  for  their  system. 
There  are  only  two  changes  to  be  made. 

First,  change  the  exit  code  (the  key  you  press 
to  stop  creating  the  file  and  get  on  to  other  things). 
The  exit  code  is  in  quotes  on  line  55;  change  the 
prompt  in  line  40  accordingly. 


HERE'S  SOME  GREAT  GIFT  IDEAS  FOR  YOUR 


•-  • 


fit 


OR  VIC-20  Computer 

Every  ABACUS  SOFTWARE  Package 
Includes  an  attractive  outer  carton,  a 
manual  and  a  disk  or  cassette. 


YOU  CAN  COUNT  ON 


HSoftwane" 


CHABTPftK  64 

Lin!>  ill'''     •■     - 
PS II  ion 

ft"    ^dil  '■iie  md 
"  '•"n  f  liJ- 

^  r* 


S4Z  9501SK  ONLY 


SKIER  84 


"  3  diHtreni  gjtnes 
■  J  dit'p'enl  Icvfls 

•  $14  35  FOR  TAPE 
»  Vy  95  FOR  DfSK 


TSNY  FORTH 

iBdSidinfgFORTH 
■  LornmodDie  64  or 
Vk  20  w/8k  exp 
SI  9  95  FOn  TAPE 
S22  SS  FOR  DISK 


6RftPH¥!CS      , 
Hiiss  'and  muitsoiO' 

Of  JpftiCS 

Fast  pic-ting  fll  ■ 
machine  lajiguaqe 
sptfd 


T  vo  ■ 


S19  95  FOB  TAPS: 
S22.95  FOR  DISK 


tlSTRlBUTOnS        G«B8!  arttein 


'«s!  Gaimany:        SwcBon: 
I      DATA  8ECKEH  TIAL  TRADING 

i-  /3j4 


Gsiada  Ek!; 

-  HSCt^O.WfiE  LTD     : 
Cote  des  Neiges 
r  H-eai  QjeSec  H3S  1Z6 
514/737-9335 

Australia: 

CW  ELECTRONICS 

416  Logan  Road 

Bris&ans  Oteens 

07-39?-Q80S 


Canada  West: 
LS.I.  Distributors  Ltd.  ■ 
810  W  Bfcaawav  «'t63 
VaiKOUver.  8C  V57  4C9 
SC4/733-0211 

New  Zealand: 

VISCOUNT  ELECTRONICS 
30B-30S  Chureft  Street 
Palmsrston  Nortti 
63-B&6S6 


TO  ORDER  NOW:  Write  Abacus  Software 
P.O.  Box  7211  Grand  Rapids,  (WIch.  49510 

For  postagis  &  handling,  add  $1.50  {U.S.  and 
Canada),  add  $3.00  for  foreign.  Make  payment  in 
U.S.  doJIars  by  check,  money  order  or  charge  card. 
(Michigan  Residents  add  4%  sales  tax). 
^»  POR  QUICK  SeitVICEFHONl  61S/241-5910  -« 


NAME. 


ADtwess. 
crrY 


-STATE. 


-ZIP. 


CHARGE  CARD. 


-NUMBER 


FREE  CATALOG  Ask  for  a  listing  of  other 
Abacus  Software  forCommodore-64orVic-20 


Next,  the  keyboard  buffer  and  the  "how- 
many"  (number  of  characters  currently  contained 
in  keyboard  buffer)  location  are  in  different  places 
on  different  machines.  The  chart  below  should 
assist  you  in  changing  this  (in  line  90). 


VIC/64 


Original 
ROM  PETs 


BASIC 
4.0  PETs 


buffer         631-640        527-536 


623-632 


how-^nany     193  525  158 

Thus,  on  a  PET  4032,  line  90  would  become: 

90  POKE  623,13:POKE624,13:FOKE625,13:POKE 

626,13:FOKE158,4:STOP 

VIC  and  64  owners  may  also  wish  to  make 
the  print  color  the  same  as  the  screen  color  before 
calling  this  routine,  so  the  user  is  unaware  of  the 
EXEC  taking  place  on  screen. 

Testing  The  EXEC 

The  program  here  contains  both  the  filemaking 
and  EXEC  routines.  To  test  the  EXEC  function, 
you  must  first  answer  YES  when  asked  if  you 
want  to  "Create  A  File?"  and  then  type  something 
like  A  =  51  :B  =  1 7:F$  =  "Mirabelle"  or  whatever 
you  want  to  pass  to  the  program  from  the  disk.  It 
could  be  a  POKE  to  change  screen  color  or  to 
change  the  character  set,  anything  you  like. 

Then,  the  special  file  will  be  on  your  disk 
under  whatever  name  you  gave  it  during  the 
filemaking  phase.  To  try  out  the  file,  RUN  the 
program  again,  but  answer  NO  when  asked  if 
you  want  to  create  a  file.  This  time,  the  program 
will  move  down  to  line  70  and  EXEC  the  file.  When 
you  use  the  EXEC  function  in  a  program,  you'll 
probably  want  to  replace  F$  in  line  70  with  the 
actual  name  of  the  file  you  want  to  EXEC:  OPEN2, 
8,2,  "NAME, U,R".  The  technique  oi adding  a  string 
to  a  quoted  name  (F$  +  ",LJ,R")  is  the  way  to 
specify  variable  file  names,  but  in  a  real  program 
you'll  know  in  advance  the  file  name  that  you 
intend  to  EXEC. 

Pay  special  attention  to  the  key  in  quotes  in 
line  55.  If  you  are  using  a  PET/CBM,  for  example, 
you'll  want  to  change  this  to  the  back-arrow  key 
or  something.  PET/CBM  has  no  function  keys  so 
you  could  never  signal  the  end  of  your  INPUT 
when  creating  an  EXEC  file. 

EXEC-file 

REM    *COMMODORE* 

REM    *EXEC-FILE* 

K$="":A$="":F$="" 

INPUT"lCLR)l2  DOWNlCREATE  A  PILE";A$ 

INPUT" {2  DOWNIfILE  NAME";P$ 

IFLEFT$ ( A$ , 1 ) <> "Y"THEN70 
-w  REM**CREATE  EXEC  FILE  ** 
40  PRINT"  {CLRH3  D0WN}£rVS}{6  SPACES}F1 

TO  end!?  spaces}" 

202    COMPUTE!    October  1983 


10 

15 
20 
25 
30 
35 
38 


45  OPEN2,8,2,"@0:"+F$+",U,W":OPEN15,8,15 

:GOSUB1000 
50  GETA$:IPA$<>""THENPRINTft$; :PRINT#2,A$ 

55  IFA$<>"{F1]"THEN50 
60  CL0SE2:CL0SE15 

66  REM** (3  SPACES} EXECUTE  FILE{2  SPACES} 

** 

70  0PEN2  ,8,2,  F?+"  ,.U  ,  R"  :  OPENl 5  ,8,15:  GOSUB 

1000 
75  PRINT"{CLR}  {4  DOWN)  "  :GET#2  ,  A$  .-IFA?  <>C 

HR$  ( 13  )  AND  ( ST064  )THENK$=K$+A$  :  GOT075 
80  IF  tST}AND64  THEN  100 
85  PRINTK$"{3  DOWN} ": PRINT" GOT075" : PRINT 

"{10  UP}"+LEFT$C't7  UP}",INT(LEN{K$)/ 

22)) :K$="" 
90  POKE631, 13:POKE632, 13:POKE633, 13:P0KE 

634 ,13: POKE198 , 4 ; STOP 
100  CLOSE2:CLOSE15-.END 
911  REM..E3  SPACES} CHECK  DISK  ERROR 
[2  SPACES}.. 

1000  INPUT#15,EN,EM?,ET,ES 

1001  IFDS>20THENPRINTEN,  EM$':  STOP 

1002  RETURN 

63003    A=PEEK(B)+256*PEEK(B+1):1FA=0THENC 
LR:END  d 


SUPER  DISK 


Floppy  Disk  Drive  For 
VlC-20    &  Commodore  64 


Super  Disk'  is  a  Commodore  compatible  disk  drive  design- 
ed to  interface  to  the.  various  Commodore  computers  such 
as  t^ie  PET,  VIC-20' and  the  Commodore  64\  The  disk  drive 
is  compatible  to  the  model  4040,  2031, 1540,  and  the  1541 
disk  drives  and  recognizes  programs  generated  on  any  of 
these  disk  drives.  The  capacities  are  comparable  to  those 
found  on  the  Commodore  drives,  and  Super  Disk^ 
recognizes  the  full  instruction  set  of  the  Commodore  drives. 
Super  Disk' offers  RAM  area v/ithinthediskunit,aserialandan 
IEEE  bus  interface.  (Software  programs  included.) 

Call  Toll  Free  1-800-527-7573  For  Latest  Price  Information. 

In  Texas  Call:  (214)  484-7836 

Also  Availabfe: 

S399    V3KRAM  15. 

65    V8K  RAM  39 

25    V16K  RAM  (Switctiable)      69. 
55    V24K  RAM  99 

65    CIE  (IEEE  for  C64)  85. 

CATALOG  OF  OTHER  HARDWARE  &  SOFTWARE  AVAILABLE  ON 
REQUEST.  We  accept:  VISA,  Mastercharge,  and  AE 

Southwest  Micro  Systems,  Inc 

2554  Southweri  •  Dallas,  Texas  75229 

Trademark  of  Commodors  Int.       ^Tradamark  of  MSD 


Gemini-10  w/lnterface 
CPI  Parallel  Interface 
Expandoport  3  VIC 
Expandoport  6  VIC 
Expandoport  4  C64 


Victory  Software 


Programs  for  me  VIC-20  and  ttie  COMMODORE  64 
All  games  available  on  TAPE  or  DISK  and  are  packed 
lull  of  MACHINE  CODE.  


The 


HTBODUGES 


HrifTTHUMTER  sims 


EBlTH  WARMOR  SEMES 


]||grAWHIRPHOSlS        $19.96 


$ia95 


You  stumbled  into  Itie  nest  of  ttie  Cyglorx 
and  find  yourself  fighting  off  robot  tanks 
guarding  tfie  Cyglorx  eggs,  You  ttiinl<  you 
tiQve  everything  under  control  ond  Itien 
ftie  eggs  start  hatching.  Commodore  64 
version  features  4  different  screens. 
Available  for  COMMODORE  64  and  VIC-2a 
Played  with  JOYSIICK. 

A  CREATOR'S  RE¥EHOE 

"^  The  creator  assembled  a  massive  army  of  robots  and 
insects  to  take  revenge  on  the  earth.  Destroy  insects,  get 
treasures,  and  get  the  neutron  bomb  diactivQtor.  Battle 
robots  and  destroy  the  neutron  bomb  before  it  annihilates 
your  city.  N/liss  and  you  must  lace  the  mutants.  Features  4 
different  screens- 
Available  lor  COMMODORE  64.  Played  with  JOYSTICK. 

A  LAEYRMTH  OF  TRE  CREATOR  $1995 

^^       Journey  into  the  most  complex  and  dangerous  fortress 
ever  build  by  the  creator.  You  will  encounter  deadly  robots, 
skulls,  lakes,  avalanches,  false  creators,  and  a  creature 
who  roams  256  rooms  relentlessly  pursuing  you. 
Available  for  COMMODORE  64.  Played  with  JOYSTICK. 


^^^W^  An  adventure  in  the  Old  West.  Journey  back 
^^wlth  us  into  the  days  of  Jessie  Jomes  and  Billy 
Ihe  Kid  where  the  only  form  o1  justice  was  a  loaded 
revolver  and  a  hangman's  noose.  In  this  full-lengtfi 
text  adventure,  you  play  ttie  role  of  Bounty  Hunter, 
batlllng  against  ruttiless  outlaws,  hostile  Indians,  wild 
animals  and  the  elements  of  the  wilderness  with  only 
your  wits  and  your  six  gun.  Average  solving  time:  20- 
30  hours,  If  you  love  adventures,  this  one  is  a  real 
treat. 

Available  for  COMMODORE  64  or  the  VIC-20  (with  SK  or  16K 
expander).  Ployed  with  KEYBOARD. 

^^^^Cllmb    ladders,  avoid    the    barrels    the    crazy 
^^^ape  is  rolling  at  you,  and  rescue  the  damsel. 
Commodore  64  version  features  4  different  screens! 
Available  for  COMMODORE  64,  Played  with  JOYSTICK  or 
KEYBOARD. 


uroogoBO 


SOM 


HTE  BOOKS 


$14.>S 


^^^^  Eorth's  surfoce  is  threatened  by  collapse  from 
^^o  strange  group  of  creatures  who  bore  ouJ  the 
earth's  crust  to  make  their  dens.  Your  obiecllve  is  to 
enter  ttie  creature's  habitat  and  spin  the  invaders  to 
death. 
Avaiiable  for  COMMODORE  64.  Played  with  JOYSTICK. 

Check  your  locol  deoler  or  atder  difecityOWEHIHG  We 
^^^^^    occQpt  p«isonol  Checks,  money  oiQ&n.  VISA,  ond  MASTER- 
V/SA         CHARGE  ChargootdoiiDieawinciudonuiTibe^andojffHia- 

^ Hondaie  OverteoiOfderj  ptKiso  uia  chatgeor  have  check 

payoDle  trough  a  US    bank    Add  S1.50  poilogo  ond 
honillirvQ  pSF  oi'dar.  PA  laslContt  pleoio  add  6%  loies  tax 

VICTORV  SOFTWARE  INC. 

7  Valley  Brook  RooO.  Paoll.  PA  19J01 

{J15)  294-3787 


't^l\ 


SOFTWARE  DEVELOPMENT  SYSTEMS 

to 

Help  vou  develop  your  skills  and  the  power  of  vour  comouter. 

These  complete  development  systems  for  the  VIC  20  and  the  Commodore  64  computers  are  tools 
for  the  professional  and  learning  aids  for  the  developing  programmer.  A  must  for  anyone  who  wants 
to  understand  ttie  internal  workings  of  the  computer  or  who  wants  to  design  fast-action  graphics  or 
other  powerful  machine  language  programs. 

The  Full-featured  Assembler,  Screen  editor.  Loader,  Decoder  and  Debugger  are  accompanied  by  a 
tutorial  on  machine  language,  graphics  progrannming  and  sound  generation  programming.  The  book 
also  guides  you  through  step-by-step  instructions  for  the  use  of  the  tools  and  contains  the  most 
complete  memory  map  available.  A  complete  list  is  included  of  all  the  internal  programs  in  ROM  and 
the  means  by  which  you  can  call  them  from  your  own  programs.  Sample  programs  are  fully 
explained. 

All  programs  support  disk,  tape  and  printer  output.  A  special  limited-feature  version  is  available  for 
the  5K  VIC  20. 

Ask  for  Develop-20  and  Develop-64  at  vour  local  software  store. 

To  order  direcl  send  $49.95  U.S.  funds  plus  J2.00  pSti  to 
French  Silh.  PC  Box  207,  Cannon  Falls,  MN  55009. 
V!5A'MC  cr^arges  accepted  (please  include  expiration 
datel.  Please  specify  Deve'op-20  or  Develop,64  and  the 
5K  version  for  Itie  VIC  20  if  so  desired  Programs  are 
distributed  on  cassette  or  diskette.  Please  specify  your 
preference. 

Dealer  enquiries  invited. 


■^(^m^ 


m 


A 


»B8^ 


VIC  20  and  Commoflore  64  are  registered  TM  ol  Commodore  Business  Machines  Inc. 


Atari  Master 
Disk  Directory 


Joseph  M.  Apice 


With  this  program  you  create  n  single  disk  "library" 
incorporating  the  contents  of  all  your  directories.  The 
menu  gives  you  six  options  -  the  program  is  truly 
multipurpose. 


Master  directories  are  an  essential  part  of  any 
computer  system.  We  often  take  them  for  granted 
in  the  larger  minicomputers  simply  because  they 
exist.  These  multi-user  systems  utilize  some  kind 
of  central  library  containing  a  list  of  all  the  user 
directories  and  their  files. 

In  our  smaller  home  computers,  we  do  not 
have  this  luxury.  And  after  working  on  a  mini  all 
day,  I  find  it  difficult  to  do  without  a  master  di- 
rectory so  I  decided  to  incorporate  some  of  the 
nicer  features  of  the  larger  system  into  my  personal 
computer.  Though  it  is  impossible  to  exactly 
duplicate  the  features,  I  found  I  could  make  a 
reasonable  addition. 

I  had  read  several  articles  dealing  with  various 
iypes  of  master  directory  programs.  All  of  them 
were  good,  but  many  required  the  constant  swap- 
ping of  disks.  I  needed  something  that  could 
quickly  display  the  contents  of  any  directory  in 
my  library  as  well  as  locate  any  file  that  1  wanted 
to  use  without  searching  through  my  entire  library. 

With  this  in  mind,  I  used  the  Atari  forced 
read  mode  to  load  the  contents  of  every  directory 
in  my  library  as  a  series  of  DATA  statements  in 
the  "Master  Disk  Directory"  program.  I  could 
then  use  the  program  to  examine  the  contents  of. 
any  disk,  search  for  any  file,  and  even  print  labels 
for  my  disks  without  loading  anv  other  disk. 

The  program  is  menu  driven  and  structured 
so  that  each  menu  function  is  a  subroutine.  This 
allows  the  user  to  follow  what  is  being  done  and 
to  make  any  desired  changes. 
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Running  The  Program 

After  you  load  the  program  and  type  RUN,  a  menu 
will  display  the  six  options  available.  Enter  the 
number  preceding  your  selected  option  and  press 
RETURN. 

1.  Directory  Update.  This  first  option  is  selected 
each  time  you  enter  a  new  disk  or  update  the 
listing  of  a  previous  disk  into  the  master  directory. 
At  the  prompt,  simply  enter  the  disk  name  or 
label  and  press  RETURN.  Any  additional  files 
which  may  have  existed  in  the  previous  disk  are 
automatically  deleted  when  the  most  recent  copy 
is  installed. 

2.  Disk  Search.  Use  this  option  to  review  the 
contents  of  any  disk  directory  previously  installed. 
Enter  the  name  of  the  disk  you  wish  to  view,  and 
the  contents  of  that  disk  directory  will  be  displayed 
to  the  screen. 

3.  File  Search.  One  interesting  feature  of  the 
program  is  that  it  can  quickly  locate  any  named 
file  and  its  resident  disk.  The  wild  card  feature  is 
always  active  if  the  full  name  is  not  specified. 
Multiple  hstings  of  any  file  will  be  displayed  along 
with  their  disk  locations.  The  message  NO 
MATCH  FOUND  will  be  displayed  if  the  named 
file  does  not  reside  on  any  disk. 

4.  Print  Labels.  Those  of  you  who  own  a  Ge- 
mini 10  or  Epson  MX-80  compatible  printer  can 
use  this  option  to  print  directory  labels.  The  pro- 
gram will  allow  up  to  24  files  and  one  header  on 
any  standard  (4  x  1-7/16  inch)  label.  Additional 
files  are  printed  on  the  next  label. 

5.  Install  Update.  When  you  have  completed 
the  transfer  of  all  the  directories,  use  this  option 
to  install  the  most  recent  update  into  the  Master 
Disk  Directory  program.  The  SAVE  feature  is 
automatic;  when  it  is  completed,  the  program  will 
return  you  to  the  main  menu. 


'Compa  t^hilitu 


TM 


That  Pays  You  A  Dividend!  ! 


ATARI 


ATARI  800  48K CALL 

ATARI  800X L  64K CALL 

ATARI  810  DISK  DRIVE CALL 

ATAR1 1 050  DISK  DRIVE CALL 

ATARI  850  INTERFACE CALL 

ATARI  1010  RECORDER 77.00 

HOME  MANAGER  KIT 64.95 

ATARI  1027  PRINTER 289.00 


MOSAIC 

64K  Ram/400 1 49.00 

64K  Ram  +  Cable  Kit  /400/800 1 69.00 

48K  Ram  Kit 94.00 

1 6/32  Expander 64.95 

32  K  Ram 77.95 

Mosaic  Adaptor 49.95 


DISK  DRIVES:  PERCOM,  RANA,  TRAK,  ASTRA CALL  FOR  PRICES. 


Suncom  Joysensor... 34.95 

30  day  money  back  guarantee 


PRINTERS 

PROWRITER  851  0  AP  . . .  CALL 

Seikosha 

W/Parallel  Port CALL 


BLUE  MAX 

$22.95   DISK/TAPE 


SUPER  SPECIALS 

ZORK  I  JUMPMAN  JR.  WITNESS  RIVER  RESCUE 

$26.95  DISK     $26.95  CARTRIDGE     $33.95  DISK     $26.95  CARTRIDGE 

PRICES  EFFECTIVE  NOW  THROUGH  OCTOBER  31,  19B3 


AE 

$22.95   DISK 


FREE*  SOFTWARE  AND  ACCESSORIES 


ATARI 

Conversational  Languages-T.  ..43.9S 

Programming  2  i  3  •  T 21  95 

Music  Composer  -  C 32.95 

My  First  Alptiabet  -  D 26.95 

Touch  Typing  -  T 1 9,95 

Home  Filing  Manager  -  D 37.95 

Mailing  List  -T 19.95 

Asleroids  -  0 26.95 

Caverns  Of  l^ars-  D 28.95 

Computer  Chess  -  C 26.95 

Missile  Command  -  C 26.95 

Super  Breakoul  -  C  ... : 26.95 

Star  Raiders  -C 32.95 

Assembly  Editor  -  C 44,95 

Basic  -C 39.95 

Macroassembler  -  D 65.95 

Microsolt  Basic  ■  D 65,95 

Pilot  (Home  Packagel  -  C 58  95 

In  viialion  To  Programming  I -T...  18,95 

Speed  Reading  •  T 55,95 

Baskelball-C 26.95 

Graph-it -T 15.95 

Juggles  House  -  D/T 2295 

Pilot  (Educator)  -  C 97,^5 

Video  Easel -C 26.95 

Defender  -  C 32,95 

Galaiian  -  C 32,95 

Oi»-C 32.95 

Dig  Dug  -  C . . ; . , 32,95 

ET-C 37,95 

Timewrse  ■  D 23,95 

Atariwriter  -  C 74.95 

Donkey  Kong  -  C 37.95 

Ms.  Pac-Man-C 39.95 

Tennis-  C 35.95 

Eastern  Front  -  C 32.95 

Donkey  Kong  Jr.  -C 39.95 

Pengo  -C... .35.95 

Logo-  C ,79.95 

i^lobilron  -C 35.95 

Pole  Position  -  C 39,95 

Microsoft  Basic  II  -C 65,95 

Painl  -  D 33.95 

Caverns  at  Mars  ■  C ,  - ,   -  3295 

FIRST  STAR 

Astro  Chase  -  D/T 23.95 

Bristles-D/T 23.95 

Flip  Flop  -  D/T 23-95 

RentWars-D/T 23.95 

BIG  FIVE 

Miner  2CW9'er  -  Cart 39.95 

Scraper  Caper-  C  39.95 


COMPUTABIUTY     DIVIDEND    COUPON     PREMIUMS 

3  H  Blank  Disk  -Box  of  10   27.00  or  10  Coupons 

Elephant  Disks  -  Box  ot  1 0 22.00  or  B  Coupons 

Flip  'n  File  Disk  Holder 20.95  or  6  Coupons 

Flip  'n  File  Cartridge  Holder 20.95  or  6  Coupons 

tvlonitor  Stand 27.95  or  1 0  Coupons 

VU-Case  Disk  Holder  W/Lock   24.00  or  10  Coupons 

Heavy  Plastic  Dust  Cover  800  or  810   9.95  or  3  Coupons 

First  Book  ol  Atan  Software  1983 17.95  or  6  Coupons 

Kids  &  The  Atari 1 7.95  or  6  Coupons 

The  Atari  Assembler   12,95  or  5  Coupons 

Atan  Games  &  Recreation 1 4,95  or  6  Coupons 

Atari  Pilot  for  Beginners 1 4,95  or  6  Coupons 

The  Visicalc  Book  Atari 14,95  or  6  Coupons 

Atari  Basic 12,95  or  5  Coupons 

Atan  Sound  4  Graphics 9,95  or  3  Coupons 

StarJighter  1 2,99  or  5  Coupons 

Slik  Stik 9,95  or  3  Coupons 

Extension  Cable  -  6  ft 6.95  or  3  Coupons 

Lefty  Adaptor 9,95  or  3  Coupons 

Stik  Stand 6.99  or  3  Coupons 

Suncom  Tac  It   1 9.95  or  8  Coupons 

Suncom  Game  Switch 6.95  or  3  Coupons 

Tl  Adaptor   1 2.95  or  5  Coupons 

Kraft  Switch  Hitter  Joystick 1 7.95  or  7  Coupons 

Kraft  Joystick  1 5.95  or  6  Coupons 

Maxell  2  Pack  Disks 8.95  or  3  Coupons 

I  nside  Atari  Basic  1 2.95  or  5  Coupons 

Compute's  First  Book  of  Atari  1  2.95  or  5  Coupons 

Compute's  Second  Book  of  Atari 1 2,95  or  5  Coupons 

De  Re  Atari  17,95  or  6  Coupons 

Wico  Joystick 24,00  or  1 0  Coupons 

S24.00  Worth  of  Software 10  Coupons 


•COUPON  PROGRAM 

Tfie  purchase  of  each  program  (with  the  exception  of  Super 
Specials,  Atari  and  APX)  will  earn  you  1  COMPUTABILITYDIVIDEND 
COUPON,  Save  10  coupons  and  redeem  them  for  your  choice  of 
any  program  we  Sell  for  S24.00  or  less.  Less  than  1 0  coupons  may 
be  redeemedfor  premium  itemsasindicaled.  You  pay  only  a  $2.50 
shipping  &  handling  charge. 


DATASOFT 

Pooyan  -  D/T 23.95 

Moon  Shutlie  -  D/T 23,95 

Sands  of  Egypt  -  D -  - .  23-95 

Texl  Wizard  -  D 37.95 

Spell  Wi;ard  -D 37.95 

Basic  Compiler  -  D 59-95 

Teletalk  ■  D  37,95 

Canyon  Climber  ■  D/T 20,95 


SIRIUS 

Bandits  ■  D 27.95 

WayOul-D 31.95 

Rspton  -  0 31.95 

Twerps  -  D 27.95 

Blade  of  Slackpoole  -  D 31.95 

Type  Attack-  D 31.95 

Beer  Run  -  D 27.95 

Critical  Mass  -  0 31 .95 


ADVENTURE 
INTERNATIONAL 

Preppie-  0/T 23,95 

S A.G.A.  Attventures  -  D 31 .95 

Sea  Dragon  -  D/T 27.95 

Siralos  -  D/T 27.95 

BugofI  -  D/T 23,95 

Preppie  II  -  D/C 27,95 

Stone  of  Sisyphus-  D 31,95 

Eliminator  -D/T - ,  20.95 

Rally  Speedway  -  Carl 37,95 

Ultra  Disassembler  -  D 39,95 

Diskey-  D 39.95 

Triad-D/T 27,95 

SYNAPSE 

Dimension  X  -  D/T 27,95 

St>adow  World  -  0/T 27,95 

Rainbow  Walker-  D/T 27,95 

Drelbs-  D/T 27,95 

Shamus  II  -  D/T 27,95 

BtueMax-  D/T 27,95 

Fort  Apocalypse  -  D/T 27,95 

Necromancer  -  D/T 27.95 

Pharoahs  Curse  ■  D/T 27.95 

Survivor  -  D/T 27,95 

PARKER  BROS. 

Q-Bert 

Frogger Please 

Astro  Chase  ,,.  - call 

Popeye for 

Tuiankhamen Prices 

Risk 

Chess 

MISCELLANEOUS 

Night  Mission  ■  D/T 23-95 

Jumpman  -D/T 31.95 

Juice-  D/T 23.95 

Castle-Wollenstein  -  D 23,95 

Financial  Wizard  -  D 44.95 

PM  Animator  -  D 27.95 

Teletari-  D 31,95 

Slarbowl  Football  -  0/T 25.50 

Alt  Baba  -  D 26,50 

Ultima  II  -  D 44,95 

Crisis  Mountain-  D 27.95 

Star  League  Baseball  ■  o/T 25.50 

Home  Accountant  -  D 54.95 

Mountain  King  -  Cart 31.95 

D  ■  DItk  T- Cauatte    C- Cartridge 


MastercardA^lSA 
Order  Toll  Free 


ATARI  is  a  trademark  of  ATARI.  Inc. 

We  Carry  Hundreds  of  Items  for  ATARI  400/800,  Ask  for  Our  FREE  CATALOG. 


(itatarCatl) 


800-558-0003 

No  surrharqe  for  credit  cards 


In  Wise.  Call 

414/351-2007 


COf^PUTABILITY 
P.O,  Bo«  1  7882 
Milwaukee,  Wl  53217 


ORDERING  INFORMAT10N:Toorderbymail,sendmoneyorder.  certified  ctieck,  or  personal  check  (allow 
1 4  daystoclearl  toCOMPUTABILITY,  Include  $2,00  stjipping  on  ail  software  orders.  Include  3%  shipping  on  all 
hardware  orders,  minimum  $2,50,  Mastercard  and  Visa  please  include  card  number  and  expiration  date,  Wl 
residents  please  add  5%>  sales  la*,  Canadian.  APO  S  FPO  software  orders  include  5%  shipping  minimum  $5.00, 
All  other  foreign  software,  please  add  1  5%  shipping,  minimum  $7,00  (US  Fynds  only).  Prices  subject  to  change 
without  notice. 


ORDER  HOURS 


Mon-Fri  12-9PW 
Sat  12-5  PW 


(CSTI  I 
{CST)J 


6.  Ej/f.  This  option  allows  you  to  exit  the  560  dline=lincnt+filcnt 

program  and  return  to  BASIC.  A  word  of  caution  ^^^  for    i  =  filcnt-i    to   n 

here:  This  option  should  be  used  after  option  5  if  ^^®  1^   chr*(125) 

any  updates  are  being  made  as  it  will  erase  the  ^^^  GOsijE°470^ 

Master  Disk  Directory  program  from  memory  610  dline  =  dline  +  i 

when  it  is  selected.  620  next    i 

VNATA   I  «■  ^^^  "^     CHRS(  125)  :PDSITION     B,6:?     "ANY 

DATA  Locations  MORE     DISKS";  :  INPUT     A* 


640     IF     A*="Y"     OR     A«="YES"     THEN     320 

'E 


Each  directory  group  Of  DATA  Statements  is  al-  ^^^    position    6.12  =  7    "remo.e    disk    pre 

lowed  a  maximum  of  64  lines.  This  corresponds  ss > hmeihi"  ,  :  i  n p u t    t. 

to  the  maximum  number  of  data  files  allowed  by  660   lincnt=first  :  return 

DOS  on  any  one  disk.  t;7(?    rem    **    disk    search    routine    *« 

Line  2000  will  be  the  first  DATA  line.  Do  not  ^^^'    Z^^hr*  <  125)  =  pdsi  tidn    2,2:?    "aanE 

.         ,,  -ii  ,  ,  ■  ,       u  iivji  ^j.    ymj;-^     DISK--;  ";:  INPUT     LB* 

renumber  the  program  without  making  the  nee-  ^,90    ?    chr*  ( 1 25 ) 

essary  changes  to  the  variables  UNE,LINCNT,  700    sp*="       "tLiNCNT=FiRST:  trap    750 

and  FIRST.  730    restore    lincnt:read   a*,n 

740     IF     A*=LB*     THEN     760 

Mnctor  nicL- nir<»>»Aru  '^^^^     L  I  NCNT  =  L  I  NCNT+ STF  :  G QT D     730 

Master  Disk  Directory  7^^   l=len  <a*>  =cent=20-int  (l/2) 

120  DIM  A* (20) , F* ( la ) ,R* C 1 ) , SP* C2) , L  770  POSITION  CENT,0:?  A*:POSITION  CE 

B* (20) , TAB* (8)  NT, 1 

130  STP=65: FIRST=2000: TAB*="  790  FOR  1=1  TD  L:7  "-";:NEXT  I 

C6  spaces;-"  B00  POSITION  13,4:"^  "DISK  DIRECTORY" 
150  GRAPHICS  0:PQKE  710,146-PDKE  712         =  "^ 

,146:P0KE  752,1  810  FOR  1=1  TD  N 

160  POSITION  9,4:?  "MASTER  DIRECTORY  ^^0  IF  I>=10  THEN  SP$="  " 

FILE"  830  IF  1=17  OR  1=34  OR  1=51  THEN  930 

190  FOR  PAUSE=1  TD  500:  NEXT  PAUSE  '^'^^     READ  A* 

200  ?  CHR*  (  125)  :  POSITION  13,2:^  "05131  ^^^  ^^  A*(4,5)="  F"  THEN  9  10 

II  aaHMassni"  860    if  ft*(i,2)<>"*    "    then  390 

210     POSITION     13,5:?     "  1  .  ,  DmsamiEi    [IE  ^^^     PRINT     TAB*  ;  SP*  ;  I  ;  "     "  ;  A* 

[3aja"  880     6QT0      900 

220     POSITION     13,7:-^     "2.  ■  ftygSTTi    rfdilrlrfy"  ^'^^     PRINT     TAB* ;  3P4  ;  I  ;  "  ( 3     BPACES>";A* 

230     POSITION     13,9:?     "3.  .  rJTWii    U-iJ:1:Tri:"  '^^^     "^^XT     I 

240     POSITION     13,  ll:-:*     "  4  .  .  [aiECij    |gi1.TJ»  "^  ^^     '^     ="     TAB*;"C3     SP  ACES }  "  ;  A*  :  GOTO     9 

a"  40  

250  POSITION  13,13:7  "5.  ■  n:.:*i:l««  QnE  '^■--^'  "?  —   "PRESS >  l:1MiilJ;:;:  TD  CONTIN 

[HO":?  UE";:  INPUT  R*:?  "  C  CLEAR  J  ":  GOTO  3 

260  POSITION  13,15:?  "6..[33Mj"  ^^' 

280  ?  :?  :?  "ENTER  CHOICE >"--INP  '^'^^  ?  :  ^  :  ■;'  "PRESS >  IH^riTITTr  TO  CON 

UT  CHOICE  TINUE" ;: INPUT  R*:RETURN 

290  ON  CHOICE  GOSUB  3  10,670.980,1180  ^^^     TRAP  40000 

,1540,1620  "^^^     '^     CHR*<125>:?  :?  :?  "DISK >  " 

300  GOTO  200  ;LB*;"<5  SPACES  :[.■{■>■  J.1IJ:E" 

310  REM  «*  DIR.  UPDATE  ROUTINE  *«  '^'^^     "^  = '^  "PRESS  rTr^itJ:i:  TO  CONTINUE-- 

320  ?  CHR*(125)  :POSITION  2,6:-:'  "INSE         >".;:INPUT  A*:RETURN 

RT  DISK  TO  CATALOG  IN  DRIVE  1"  ''S©  REM  *«  FILE  SEARCH  ROUTINE  *» 

330  POSITION  2,10:?  "DISK  LABEL >  '''^  ^     CHR*  (  1  25  )  :  PCS  I  T  I  ON  2,2:?   'SEAR 

";:  INPUT  LB*  CH  WHICH  F I LE- - >  "  ;  :  1 NPUT  F* 

340  TRAP  390:LINCNT=FIRST  1000  L I NCNT=2000 : ?  CHR*(125) 

360  RESTORE  LINCNTiREAD  A*,N  1010  RESTORE  LINCNT:TRAP  1150 

370  IF  A*=LB*  THEN  390  1020  READ  A*,N 

380  LINCNT  =  LINCNT  +  STP:  GOTO  360  1030  PRINT  "  H  ^:1  :Trf :  fc  < :  Tt^  >■>  ».-Tr >  ";At: 

390  LINE  =  LINCNT:  TRAP  520  "^ 

410  FILCNT=1  : OPEN  « 1 , 6 , 0 ,  " D :  * . »  "  1040  FDR  1  =  1  TD  N 

420  INPUT  »1,A*  1050  READ  A* 

430  ?  CHR«(125)  1060  IF  A*(1,2><>"1!  "  THEN  1090 

440  ?  :?  LINCNT+FILCNT; "  DATA  ":A*:6  1070  IF  A* < 3 , LEN ( F« ) +2 > =F*  THEN  PRIN 

OSUB  470  T  "FILE  LOCATED >  ".;A*:?  :FLA 

450  FILCNT=FILCNT+1 : GOTO  420  G=l 

470  ?  :?  :7  "CDNT"  10S0  GOTO  1100 

480  POSITION  0,0  1090  IF  A* ( 1 , LEN < F* ) ) =F*  THEN  PRINT 

490  POKE  842,13:ST0P  "FILE  LOCATED >  ";A*:?  : FLAe= 

500  POKE  842, 12  1 

510  RETURN  1100  NEXT  I 

520  TRAP  40000:CLDSE  #1  1120  L I NCNT=L I NCNT +BTP : GOTO  1010 

530  7  CHR«(125):?  :?  LINE;"  DATA  ";L  1140  GOTO  1020 

B«; " , " ; FILCNT-1  1150  IF  FLAG  THEN  1170 

540  GQSUB  470  1160  "^     CHR*  (  1  25 )  :  POS I  T  I  ON  8,16:7  " 

550  IF  FILCNT>=N  THEN  630  NO  MATCH  FOUND — " 
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1  170 

1  180 
1  190 

1200 

12l!il 

1  22.0 

1230 
1240 
12S0 
1260 
1270 

1280 


FLA6=0: ? 

REM  **  D 
7  CHR* ( 1 
D  PRINTE 
POSITION 
CE-ON  LI 
PDS I T ION 

LINE-" 
PDHT I  T  ION 
HEN  READ 
TRAP  152 
CLOSE  #2 
LPRINT  C 
PUT  tt2,2 
?  tt2;CHR 
Rt (33) ; : 
?  CHRS ( 1 
NT  LABEL 


?  "LIST  EXHAUSTED  

:  INPUT  R*:  RETURN 
ISK  LABEL  ROUTINE  *t 
2S>:P0SITI0N  8,4:?  "LDA 
R  WITH  LABELS" 

7,6:7  "PUT  850  INTERFA 
NE-" 
10,7:7  "PUT  •='RINTER-ON 


1300 
13  10 
132  0 
1330 
1340 
1350 
1360 
1  37  0 
13B0 
1390 
1400 
1410 
1420 


LINE 
REST 
IF  A 

LINE 
PUT 
?  #2 
PUT 
GOSU 
ROW  = 
FOR 
READ 
IF  A 
IF  A 


=  F  IR 
ORE 

*  =  LB 

=  LIN 
#2,  2 
;  "  D 
#2  2 
B  12 
ROW  + 
1  =  1 
A* 

*  (4, 

*  C  1  , 


8, 
Y"  ; 
0:  R 
:  OP 
HR* 
7:  P 
*  (  1 
RET 
25) 
S  F 
;  :  I 
ST: 
LIN 
S  T 
E  +  S 
7:  P 
ISK 
7:  P 
60: 


10 
:  I 
OW 
EN 
<  2 
UT 
5) 
UR 
:  P 
OR 
NP 
TR 
E: 
HE 
TP: 
UT 

UT 

PR] 


7  "PRESS  i:)=<i<li;3:  W 

IPUT  A* 

'0: CQL=0: INC= 12 
tt2, B, 0,  "P:  " 

' ) ; "3" : GOTO  1280 
tt2, 51 : PUT  «2, la 
: ?  #2; CHRt (27) ; CH 


SITION  2,4; 
WHICH  DISK 
T  LBS 
P  1530 
EAD  A9.,N 

1340 
GOTO  13  10 
«2,  71 
;  AS 
#2,  64 
NT  #2 


'PR  I 


TO  N 

5)  ='■ 
2  )  <  >  ' 


F"  THEN  1480 
•*      "     THEN  1453 


1430 

1440 
14  50 


1  460 

1  470 
1430 
1490 
1500 

1510 
1520 
1530 
1540 

1550 


1560 

1570 

1580 
1590 

1600 
1610 
1620 


7  #2;fl«;"    " ; : COL=CQL+ 1 : ROW=ROW 

+1:IF  COL=3  THEN  PRINT  *2:COL=0 

GOTO  1460 

7  tt2;"    ";A*;"    '■  ;  :  COL  =  COL+ 1  :  RO 

W=R0W+1:IF  cbL=3  THEN  PRINT  «2: 

COL  =  0 

IF  R0W=24  THEN  RaW=0:PRINT  #2:P 

RINT  tt2 

NEXT  I 

PRINT  #2; "    " ; A* 

SKIP=INT (Raw/3) 

FOR  1=1  TO  INC-SKIP: PRINT  #2:NE 

XT  I 

RETURN 

TRAP  40000:GDTO  1190 

TRAP  40000:GDTO  1280 

REM  ««  EXIT  TO  BASIC  Zt     SAVE  UPD 

ATED  PROGRAM  *« 

-7     CHRS  (  125)  :  POSITION  3,8:7  "INS 

ERT  DISK  CONTAINING  ffT;-M*i4:*i.>i<:." 

rPOSITION  14,10:7  "IN  DRIVE  «1" 

: POSITION  3, 13 

7  "PRESS >  r:laKIJ:];<:5  SPACEB>W 

HEN  READY" ;: INPUT  A* 

7  CHR$(125):?  :7  "SAVE  ";CHR*(3 

4) ; "D: MASTER, DIR " 

6DSUB  470 

7  " -CCLEAR:  ":  POSITION  12,4:7  "HE 

FDR  PAUSE=1  TO  500:NEXT  PAUSE 

RETURN 
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Runway  180 

Using  Sprites  In  Tl  Extended  BASIC 


James  Dunn 


The  cfficioit,  rcuiarkahk 
'  spritc-haiidliii;^  ahilih/  of  77 
Extended  BASIC  is  clenrh/ 
evident  in  this  game.  Tlie 
author  discusses  creating 
sprites  ami  explores  sprite 
niaiiipulatioii.  Tliere  are 
several  valuable  pointers 
here  for  those  interested  ijs 
graphics,  animation,  or 
<^awe  pro>^rauiinini^  0}i 
)he  Tl 


Using  Sprites  In  Tf 
Extended  BASIC 


One  of  the  biggest  prob-    Your  plane  is  on  final  approach 
lems  in  designing  an 
arcade-tvpe  game  in 
BASIC  is  that  BASIC  can 

move  only  one  character  at  a  time,  usually  slowly 
and  usually  not  very  smoothly,  ideally,  we  need 
the  ability  to  move  an  object  independently  of  the 
operation  of  the  main  program.  Once  set  in  mo- 
tion, the  object  would  continue  in  motion  until 
acted  upon  by  a  new  command  from  the  main 
program.  Sprites  accomplish  this. 

Although  a  sprite  is  a  type  of  subprogram 
that  runs  concurrently  with  a  main  program,  the 
main  program  first  must  create  the  sprite,  define 
its  shape,  and  set  it  in  motion.  A  sprite  then  con- 
tinues its  motion  without  requiring  continuous 
control  from  the  main  program,  except  that  the 
main  program  may  at  any  time  test  the  sprite  for 
position,  change  the  color  or  pattern,  delete,  or 
change  its  motion. 

Included  in  TI-99/4A  Extended  BASIC  are  11 
commands  to  control  sprites:  CALL  COLOR, 
CALL  CHAR,  CALL  SPRITE,  CALL  PATTERN, 


.  "RnrruHiij  ISO,"  Tl  version. 


CALL  MAGNIFY,  CALL 
MOTION,  CALL  POSI- 
nON,  CALL  LOCATE, 
CALL  DISTANCE,  CALL 
COINC,  and  CALL 
DELSPRITE.  To  illustrate 
the  use  of  these  com- 
mands, we'll  look  at  an 
airplane  landing  game, 
"Runway  180."  Try  some 
examples  for  yourself 
to  get  a  feel  for  sprite 
programming. 

Creating  Sprites 

Certain  considerations 
must  be  taken  into  ac- 
count before  sprites  are 
created.  If  a  special  graph- 
ics character  is  to  be  used 
for  the  sprite,  the  character  must  be  created  by 
use  of  CALL  CHAR.  For  example,  in  the  game 
there  are  three  special  characters  defined  for  the 
aircraft.  One  is  with  the  wheels  up  (lines  430)-460), 
one  is  with  the  wheels  down  (lines  510-540),  and 
one  is  debris  after  a  crash  (lines  550-580). 

To  create  a  special  character,  it  is  necessary  to 
redefine  an  existing  standard  character.  The  stan- 
dard characters  correspond  to  the  numbers  30 
through  143  (part  of  what's  called  the  ASCII 
number  code).  The  new  pattern  is  created  bv  using 
CALL  CHAR  and  is  referenced  by  its  ASCII 
number. 

Before  we  choose  which  ASCII  number  to 
use,  we  must  examine  some  other  factors.  CALL 
MAGNIFY  can  enlarge  a  sprite  to  one  of  four 
magnification  factors.  Factor  four  is  used  in  the 
game  (line  630).  This  enlarges  the  sprites  to 
double-size  pixels  and  uses  a  block  of  four 
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sequential  characters.  The  ASCII  number  used  to 
define  the  sprite  must  be  evenly  divisible  by  four 
and  represents  the  upper-left  character  in  the 
block  of  four.  The  next  three  ASCII  numbers  rep- 
resent the  lower-left,  upper-right,  and  lower-right 
characters  respectively  in  the  block  of  four. 

The  sprite  may  be  colored  independently  of 
the  other  characters  in  the  same  character  set.  In 
addition,  the  sprite  with  the  lower  sprite  number 
(this  is  a  different  number  than  the  ASCII  number) 
will  pass  in  front  of  (that  is,  oner)  the  higher  num- 
bered sprite.  Since  the  aircraft  should  pass  in  front 
of  the  tower,  it  should  have  a  lower  sprite  number 
for  each  of  its  three  configurations  (line  610). 

To  set  up  a  list  of  sprites,  first  number  the 
lines  on  a  sheet  of  paper  from  30  to  143.  Then, 
beside  each  number,  write  what  set  it  belongs  to 
(set  0  to  14).  Since  you  may  want  to  use  letters  or 
numbers  in  a  screen  display  at  the  same  time, 
mark  out  ASCII  numbers  48  through  57  and  65 
through  90.  The  remaining  ASCII  numbers  can  be 
used  to  define  special  characters  for  graphics  and 
sprites. 

For  sprites,  using  CALL  MAGNIFY  (4),  select 
four  sequential  numbers  starting  at  one  of  the 
numbers  evenly  divided  by  four.  Now  you  are 
ready  to  use  CALL  SPRITE. 

CALL  CLEAR  will  not  remove  a  sprite  from 
the  screen.  To  completely  clear  the  screen,  you 
must  also  use  CALL  DELSPRITE  (line  1350). 

Sprites  In  Motion 

Now  that  the  sprite  has  been  created,  there  are 
two  ways  of  moving  it  around  the  screen.  Let's 
call  these  two  methods  absolute  and  relative.  The 
absolute  method  uses  exact  row  and  column  posi- 
tions via  the  CALL  LOCATE  command.  The  rela- 
tive method  uses  row  and  column  motion  values 
via  the  CALL  MOTION  command. 

The  absolute  method  uses  a  loop  with  CALL 
JOYST  to  increment  row  and  column  variables, 
and  then  a  CALL  LOCATE  to  move  the  sprite  one 
step  each  time  the  loop  is  executed.  This  is  analo- 
gous to  nonsprite  methods  of  animation.  The 
drawback  in  using  this  method  is  that  the  sprite 
does  not  move  independently;  the  main  program 
causes  the  move,  A  modified  form  of  this  method 
is  used  for  the  stall  subroutine  (line  1470)  and  the 
new  approach  routine  (line  1380). 

The  relative  method  is  similar,  using  a  loop 
with  CALL  JOYST  to  increment  row  and  column 
motion  variables  which  are  used  in  a  CALL 
MOTION  command.  This  allows  the  sprites  to 
continue  moving  independently  of  the  main  pro- 
gram. By  this  method,  the  runway  stripe  is  moved 
horizontally  only  (line  680)  and  the  aircraft  verti- 
cally only  (also  line  680). 

The  sprite's  shape  may  be  changed  anytime 
during  the  program  by  using  CALL  PATTERN  to 


substitute  a  different  ASCII  character  number  and 
therefore  a  different  pattern.  When  the  fire  button 
is  depressed  (line  1130),  the  aircraft  landing  gear 
comes  down  (line  1190).  The  pattern  is  changed 
again  if  the  aircraft  crashes  (line  1720). 

Testing  For  Game  Conditions 

During  the  operation  of  the  program,  it  may  be- 
come necessary  to  test  for  certain  conditions.  For 
example,  we  see  if  the  aircraft  has  touched  down 
on  the  runway  (line  690),  if  the  tower  has  reached 
the  left  side  of  the  screen  (line  700),  or  if  the  aircraft 
is  going  off  the  top  of  the  screen  (line  710).  CALL 
COINC  is  used  to  test  for  these  conditions. 

However,  there  is  a  problem  with  this 
method.  Since  the  main  program  tests  for  coinci- 
dence only  when  CALL  COINC  is  executed  and 
since  the  sprite  moves  independently  of  the  main 
program,  it  is  quite  possible  to  miss  an  exact  coin- 
cidence when  it  occurs.  For  this  reason  a  tolerance 
factor  is  included  in  CALL  COINC.  So  the  test  is 
really  for  a  range  of  -I-  or  -  tolerance.  If  the  toler- 
ance is  too  large,  coincidence  can  be  returned  too 
early.  If  the  tolerance  is  too  small,  coincidence 
can  be  missed  altogether.  How  large  the  tolerance 
should  be  depends  upon  two  things:  the  speed  of 
the  sprite  and  the  speed  of  the  loop  which  is  testing 
for  coincidence. 

The  test  for  the  tower  reaching  the  left  side  of 
the  screen  is  in  both  the  main  loop  (line  700)  and 
the  stall  loop  (line  1480).  The  tolerance  in  the  stall 
loop  is  much  smaller  because  the  execution  speed 
is  so  fast  and  the  sprite  moves  so  slowly  that  coin- 
cidence is  actually  read  twice  before  the  sprite 
leaves  the  tolerance  range.  Trial  and  error  is  the 
only  way  to  find  out  how  large  the  tolerance 
should  be. 

However,  after  programming  this  game,  it  is 
obvious  that  very  fast-moving  sprites  will  require 
tolerance  ranges  that  will  make  arcade-style,  fast- 
action  games  nearly  impossible  in  Extended 
BASIC.  The  problem  is  that  the  coincidence  test  is 
executed  from  the  main  program.  If  it  were  part 
of  the  sprite  subprogram  instead,  it  would  be 
possible  to  keep  the  tolerance  very  small. 

CALL  POSITION  and  CALL  DISTANCE 
both  suffer  from  the  same  problem  as  CALL 
COINC.  By  the  time  a  position  or  distance  can  be 
computed  and  returned  to  the  main  program,  the 
sprite  has  moved  elsewhere.  But  it  is  possible  to 
stop  the  sprite  by  using  a  CALL  MOTION  before 
using  CALL  POSITION  or  CALL  DISTANCE 
(line  1330),  then  to  restart  whatever  motion  is 
required. 

Despite  a  few  shortcomings,  the  sprite 
capabilities  in  Extended  BASIC  are  remarkable. 
For  true  arcade-type  play,  machine  language  is 
still  necessary,  but  Extended  BASIC  sprites  wiU 
carry  the  programmer  a  lot  closer  to  this  goal. 
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Runway  180  320  call  key  (0, RS, S8)  :  :   if  S8<  ; 1  th 

130  CALL  CLEAR  ::  CALL  SCREENO)::  EN  320  ELSE  RETURN 

CALL  COLOR ( 1 , 16. 1 ,2. 16, 1 , 3, 16, i  330  Al=l 

,4,16,1,5,16,1,6,16,1,7,16.1,8,  340  REM  INITIALIZE 

16,1)  350  A=0  ::  B=-75  ::  LG=0  ::  CALL  SC 

140  DISPLAY  AT < 10, 9) : USING  "RUNWAY  REEN(2) 

1S0"  360  CALL  CLEAR  ::  CALL  CHAR C 33 . " FFF 

150  FDR  B=0  TO  30  STEP  2  ::  CALL  SO  FFFFFFFFFFFFF " ) : :   CALL  COLOR < 1 , 

UND(-10,  110, 30,  110. 30, 2  500, 30,  -  S,  1  ) 

B.B)::   CALL  SOUND <- 1 0 ,  1  1 0 , 30 ,  1  1  370  LC  =  0  ::   FOR  Z=l  TO  16  ::  CALL  H 

0. 30, 4000, 30, -8, B)  :  :  NEXT  B  CH AR < Z ,  1  , 33 , 32 )  :  :   NEXT  Z 

160  CALL  CLEAR  ::  DISPLAY  AT(10,9):  380  CALL  CHAR < 42 , " FFFFFFFFFFFFFFFF " 

USING  "PRESS"  ::  DISPLAY  AT(12,  '==  CALL  COLOR ( 2 , 1 3 , 1 ) 

7):USING  "I-FQR  INSTRUCTIONS"  390  FOR  Z=17  TO  20  ::   CALL  HCHAR ( Z , 

170  DISPLAY  AT  <  14,  14)  :  USING  "OR"  ::  1,42,0.2)::  NEXT  Z 

DISPLAY  AT  (  16, 9)  iUSING  "G-FOR  ^^^  RANDOMIZE 

GAME"  ^10  REM  DEF  CHAR 

180  CALL  KEY{0,K,5)::   IF  SOI  THEN  ^^^  CALL  CHAR  ( 96  ,  "  00000000FFF  FFFFFF 

180  FFFFFFF0000000000000000FFFFFFFF 

190  IF  K=71  THEN  330  FFFFFFFF") 

200  IF  K  =  73  THEN  220  "^30  CALL  CHAR  (  1  20  ,  "  0030  1  8  1  C3F  i  F0700 

210  PRINT  "ALPHA  LOCK  MUST  BE  ON"   :  "^ 

:  PRINT  ::   PRINT  "TRY  AGAIN"   ::  "^"^^  CALL  CHAR  (  1 2  1  ,"  000000 "  ) 

FOR  DELAY=1  TO  200  ::  NEXT  DEL  ^^^  CALL  CHAR < 1 22 , " 00000000FCFF8000 

AY  : :  SOTO  160  " ' 

220  CALL  CLEAR  ::   PRINT  "YOU  ARE  PI  '*<^^  ^ALL  CHAR  (  1 23 ,"  00000000 "  ) 

L0TIN6  A  JET"  ::  PRINT  ::   PRINT  ^^^  CALL  CHAR ( 1 04 ," 0000000007 1 F 1 5 1 F 

"AIRCRAFT  WHICH  HAS  BEEN  "   ::  "' 

PRINT  ::  PRINT  "CLEARED  TO  LAND  "^90  CALL  CHAR  (  1 05 ,"  0203030203030203 

230  PRINT  "RUNWAY  180."   ::  PRINT  ::  ''''^  ^^'-'-  CHAR  <  1 06 ,  "  00008080E0F8A8F8 

240  CA^L^'cLEAR^^fpRJi?  "USE  YOUR  J  ^^^  "^.^^^     CHAR  C  1  07 ,  "  C040C0C040C0C0C0 

°PR™^-S?NK°RA?^^;Ni)^^^^^LD:  -  ^  C  ALL  CHAR  <  1  24  ,  "  0030  1  8  1  C3F  1  F0705 

„  0000  ) 

243  PrInT  "JOYSTICK  CONTROL-"  ::  PR  ^^^  CALL  CHAR < 1 26 ," 00000000FCFF88B4 

INT  0000  > 

■z,A-=      DOTM-r       ..  1    irrr-r  /\r- i- m    ir  tD /^t  tr  ..  r^  d  ,  ^30  CALL      C  H  A  R  (  1  25  ,   "  00  0  0  00  00  "  ) 

245  PRINT   LEFT:   ACCELERATE    :;  PRI  —  >.  „  ^„.  .   „ ., 

NT  "RIGHT-   SRAKF"   ■■   PRINT  "HP-  ^^^  ^ALL  CH AR ( 1 27 ," 00000000 " ) 

JeCREASe's?nK  RATE"  ^^^  ^,^^^     CHAR  (  1  28  ,"  0000000002  1  F3B00 

247  PRINT  "DOWN:   INCREASE  SINK  RATE  ^,„  "',  ,  r^^^^  ,  ,  ^r.     „  ^« 

■■  ..  PRINT  ^^^  CALL  CHAR  (  129,  "000000000E56E300 

250  PRINT  "FIREBUTTON  CONTROLS  LAND  ^_,^  "i.  .       „, 

IN6"  ::  PRINT  ::   PRINT  "GEAR."  ^^^  ^'^^'-  CHAR  C  1 30 ,"  00000000 "  ) 

::  PRINT  ::  PRINT  ::  GOSUB  310  ^^^  ^^^^^  CHAR  (  1 3 1  ,"  00000000 "  ) 

::  CALL  CLEAR  5^0  REM  DRAW  DISPLAY 

260  PRINT  "TO  RECOVER  FROM  A  STALL"  ^^^  CALL  SPR I TE  ( # 1 ,  96 , 2 ,  1  80 ,  1  , 0 , B )  : 

::   PRINT  ::  PRINT  "INCREASE  AI  -  CALL  C0L0R(«1,16) 

R5PEED  ABOVE  60."   ::  PRINT  ::  610  CALL  SPR I TE ( #2 , 1 20 , 2 , 1 0 , 245 , A , 0 

PRINT  "IF  YOU  CANNOT  STOP  BEFO  )::   CALL  C0L0R(#2,7) 

RE":   :  620  CALL  SPR I TE ( # 3 ,  1  04 , 2 ,  1 10 , 250 , 0 , 

270  PRINT  "TOWER  REACHES  LEFT  SIDE  -2) 

OF"  ::   PRINT  ::  PRINT  "SCREEN,  630  CALL  MAGNIFY<4> 

INCREASE  AIRSPEED"  ::  PRINT  640  FOR  C5=l  TO  40  ::  CALL  LOCATE(# 

280  PRINT  "TO  60  AND  LIFT  OFF  FOR  "  2,10,C5)::  NEXT  C5  ::  GOSUB  870 

::  PRINT  ;:  PRINT  "ANOTHER  PAS  650  REM  MAIN  LOOP 

S."  ::   PRINT  ::  PRINT  ::   GOSUB  660  GOSUB  1120  ::   60SUB  890 

310  ::   CALL  CLEAR  670  IF  J=0  THEN  690 

290  PRINT  "YOU  MAY  HAVE  FOUR  PASSES  680  CALL  MOT  I  ON  C tt 1  , 0 , B , «2 . A , 0 ) 

"  ::  PRINT  ::  PRINT  "AT  THE  RUN  690  CALL  CO  I NC ( tt2 ,  1 70 , 40 . 9 ,  T ) 

WAY "   ::  PRINT  ::  PRINT  "BE  700  CALL  CO  I  NC  ( It  3  ,  1  1  0  ,  1  ,  4  ,  DA  ) 

WARE  OF  THE  WIND  SHIFTS!"   ::   PR  710  CALL  CO  I NC ( *2 ,  240 , 40 , 9 , E )  :  :   IF 

INT  ::  PRINT  E=-l  THEN  A=l   ::  GOSUB  B90  ::  G 

300  PRINT  "GOOD  LUCK  I  !  !  !  "  ;:  PRINT  OTD  680 

::  PRINT  ::  PRINT  ::  PRINT  ::   G  720  IF  DA=-1  THEN  1320 

OSUB  310  ::  60  TO  330  730  IF  T<>-1  THEN  660 

310  PRINT  ::  DISPLAY  AT  (  24  ,  1  )  :  US  I  NG  740  CALL  MOT  I  ON  (  t*2  ,  0  ,  0  ) 

"HIT  ANY  KEY  TO  CONTINUE"  750  IF  A>1  THEN  6QSUB  920  ::  GOSUB 
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710 

920 

930 

940 

950 

960 

970 

980 

990 

1000 

AT<3,  10)SIZE<20)  :USINB 


10) SIZE (20) : USINB 


AT  (7,  5) SIZE  (20)  : USINB  8 


AT(7,5>SIZEC20) BEEP: US  I 

AT (9, 5) SI ZE (20) : USING  " 

: :  RETURN 

AT (9, 5) SI ZE (20) : USING  8 


960  : :  BOTO  1660 
760  IF  LG=0  THEN  1660 
770  6DT0  1760 
780  REM  UPDATE  DISPLAY 
790  IMABE  SINK  RATE:  ### 
300  IMAGE  RUNWAY  ENDS  ###  YDS 
810  IMAGE  AIRSPEED:  ##« 
820  IMAGE  TOUCH  DOWN 
830  IMAGE  SINK  RATE  TOO  HIGH 
840  IMAGE  AIRSPEED  TOO  HIGH 
850  IMAGE  CRASH  LANDING 
860  IMAGE  STALL  WARNING! 
B70  DISPLAY  AT ( 1 , 10) SIZE <20) : USING 

"ATTEMPT  NO.  # "  :  A  1 
880  RETURN 
890  DISPLAY 

790:  A 
900  DISPLAY  ATC 
810: -B 
RETURN 
DISPLAY 
30 

RETURN 
DISPLAY 
NG  840 
DISPLAY 
BOUNCE" 
DISPLAY 
50 

RETURN 
CALL  HCHAR (7, 5, 33, 27) : :  DISPLAY 

AT (9, 5) SIZE (20) : USING  820 
RETURN 
DISPLAY  AT (9,5) SIZE  (20)  : USINB 
"WARNING  " 
1010  DISPLAY  AT ( 1 1 , 5) SI ZE (20) : USING 

800: RE 
1020  RETURN 

1030  CALL  HCHAR (7, 5, 33, 27) ; 
1040  CALL  HCHAR (9, 5, 33, 27) : 
1050  CALL  HCHAR ( 1 i , 5, 33, 27) 

N 
1060  DISPLAY  AT (9, 5) SI ZE (20) 

"LIFT  OFF"   ::  CALL  HCHAR ( 1 1 , 5 , 
33, 27) : :  RETURN 
1070  DISPLAY  AT (3, 10) : USING  "END  OF 
RUNWAY  "  ::  DISPLAY  AT(5,10): 
USING  "NEW  APPROACH"  : :  DISPLA 
Y  AT (7, 10) : USING  "NECESSARY" 
1080  RETURN 

1090  PRINT  "THAT'S  5  PASSES  AT  THE" 
::  PRINT  ::   PRINT  "RUNWAY.   TU 
RN  IN  YOUR"  ::  PRINT  ::  PRINT 
"PILOT  LICENSE  AND  PUT":   : 
1100  PRINT  "SOMEONE  ELSE  IN  THE"  :: 
PRINT   ;:   PRINT  "COCKPIT"   ::   P 
RINT  : :  RETURN 
1110  DISPLAY  AT(7,9)BEEP  SIZE(20):U 

SING  860  : :  RETURN 
1120  REM  JDYST/  LANDING 
1130  CALL  KEY  (  1  , RV,  ST)  : 

ND  LG=0  THEN  1190 
1140  CALL  JOYST ( 1 , X, Y) : :   IF  X=0  AND 
Y=0  THEN  GOSUB  1210  : :  RETURN 
11S0  A=A-Y/4  ::  B=B+X/4 
1160  IF  ABS(A)>127  THEN  A=127«SGN(A 

) 
1170  IF  B>-50  THEN  1430 
1 180  J=l   : :  RETURN 


RETURN 

RETURN 

RETUR 

USING 


GEAR 
IF  RV=18  A 


1  190 
1200 

1210 
1220 
1230 

1240 

1250 

1260 

1270 
1280 

1290 
1300 
1310 
1320 
1330 

1340 

1350 

1360 
1370 

1380 


1390 
1400 

1410 
1420 

1430 
1440 

1450 
1460 
1470 
1480 

1490 


1500 
1510 
1520 
1530 
1540 

1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 

1680 
1690 
1700 


CP=6  THEN  B=B+1 


CP=10  THEN  A=A-1 


CP=15  THEN  A=A+1 


CALL  PATTERN<«2, 124) 
A=A+3  : :  B=B+20  : :  LG 
0  1  160 

REM  COMPLICATIONS 
CP=INT  <RND« 16) 
IF  CP=1  THEN  E=B-1  :: 
0 
IF 
0 
IF 
80 
IF 
80 

J=0  : :  RETURN 
IF  ABS(A)>i27 
) 

GOTO  1310 
IF  B<-127  THEN 
J=l   : :  RETURN 
REM  NEW  APPROACH 
CALL  MOTION (#2, 0, 0> : ; 
ITION (#2,R4, C4) 
IF  Al>4  THEN  1400 
CALL  DELSPRITE  (#1 , «3) 
LEAR 

GOSUB  1070 
CALL  PATTERN(#2, 
FOR  X=C4  TO  255 
(#2, INT (R4) , X) : : 
5-C4) ) : :   NEXT  X 
A1=A1+1   : :  GOTO  340 
CALL  DELSPRITE  (ALL)  : 
AR 

GOSUB  1090 
FDR  DELAY=1 
AY  : :   GOTO 


a  : :  GOT 

GOTO  130 

GOTO  130 

GOTO  12 

GOTO  12 


THEN  A=127»S6N<A 


B=-127 


20) 
:  CA 
R4  =  R 


TO  700 

1970 


CALL  PDS 


CALL  C 


LL  LOCATE 
4- (R4/ (25 


CALL  CLE 


NEXT  DEL 


REM 

GDSU 

CALL 

CALL 

CALL 

CALL 

CALL 

DE  = 
70  : 
IF  T 
SR  =  S 
CALL 
IF  R 
CALL 

Y  =  0 
B  =  E!  + 
REM 
IF  B 
CALL 
GDSU 
GOTO 
CALL 
A  =  A~ 
GOTO 
GDSU 
RETU 
REM 
CALL 
,  0,  # 
CALL 
FDR 
CALL 


STALL 

B  111 

MOTI 

POSI 

LOCA 

COIN 

COIN 

-1  TH 

:   IF 

=  -1  T 

R+4 

KEY  ( 
V=18 
JOYS 
THEN 
X/4 


0 

ON (#2, 0, 0) 

TIDN  (4*2,  SR,  SO 

TE  (#2,  SR,  SO 

C (#2, 170, 40, 2, T) 

C (*3, 110, 1,2, DE) : : 

EN     A1=A1+1      : :      BDSUB 

Al>4     THEN     1400 

HEN  1660 


IF 
8 


1  ,RV, ST) 
AND  LG=1  THEN 
T ( 1 , X, Y) : :   IF 
1470 


1610 
X=0  AND 


THEN  1640 
: DN (# 1 , 0, B ) 


"ERN (#2, 120) 
B=B-22  : :  LG=0 


<-60 

MOTH 
B  890 

1470 

PATTE 
3 

1560 
B  1030 
RN 
CRASH 

MOTI ON ( tt  1  , 0 , 0 , #2 , 0 , 0 , #3 , 0 
4,0,0: 

SOUNI 
P=l     T« 

SCREI 


i) 

ID ( 1000, -7,0) 

"0     10 

:en  (2) 
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1710 

1720 
1730 

1740 
1750 
1760 
1770 

1780 
1790 
1S00 

1810 
1820 

1830 

1840 

1850 


0 

1860 

1870 


1880 
1890 

1900 

1910 
1920 


CALL 

LL  S 

CALL 

FDR 

AY 

CALL 

GOTO 

REM 

GOSU 

0 

CALL 

IF  B 

CALL 

CALL 

IF  D 

10  : 

CALL 

RE=I 

:  GO 

CALL 

ND  B 

A-2 


SCREEN ( 16) : :   NEXT  P 
CREEN  <2) 

PATTERN(»2, 128) 
DELAY=1  TO  400  : 


CA 


NEXT  DEL 


DELSPRITE (ALL) 

1970 
TOUCHDOWN/ BRAKE /T&G 
B  980  ::   IF  B<-53  THEN 


194 


JQYST  t  1  ,  X  ,  Y)  :  :   B  =  B-t-X/2 
>-l  THEN  1880 

MOTION (»1 , 0, B) 

C0INC.C#3,  110,  1,4,  DA) 
A=-l  THEN  RE=0  ::  60SUB  10 
;  GOTO  1660 

DISTANCE(»3, 1 10, 1 ,RQ) 
NT ( SQR (RQ) ) : -  60SUB  1000  : 
SUB  900 

KEY (1 , RV, ST) : :  IF  RV=1B  A 
<-60  THEN  GOSUB  1060  ::  A= 
: :  GOTO  187 


GOTO  17B0 

CALL  M0TI0N(#2, A,0) s :  FOR  DELA 

Y=l  TO  200  ::  NEXT  DELAY  ::  GO 

TO  650 

REM  SCORING 

CALL  MOTION (ttl ,0,0, «2, 0, 0, #3,0 

,  0,  tt4,  0,  0) 

CALL  DELSPRITE (ALL) : :  CALL  CLE 

AR 

PRINT  "CONGRATULATIONS  !":   : 

PRINT  "YOUR  SCORE  IS  :";(RE/A1 


)  *  10:   : 
1V30  GOTO  1990 
1940  A  =  A-2  ::  CALL  MOT  I  ON ( #2 , A , 0 )  :  : 

GOSUB  940 
1950  FOR  DELAY=1  TO  20  : :  NEXT  DELA 

Y 
1960  A=A+2  ::  GOSUB  1030  ::  GOSUB  1 

040  1 :   GOTO  650 
1970  REM  PLAY  AGAIN 
1980  CALL  CLEAR 

1990  PRINT  "PLAY  AGAIN   (Y/N)?" 
2000  CALL  KEY(2,RV,SV) 
-2010  IF  SV  =  0  THEN  2000 
2020  IF  RV=15  THEN  2050 
2030  IF  RV=iB  THEN  330 
2040  GOTO  1990 
2050  END 


COMPUTERIZED   GIVEAWAY 

*^py  A  Q    QTVI    C   ^  Contest  for  Tl  99/4A  Owners 

HQWOYPARDNER!  Howwould  you  like  a  chance  to 
£Kpar>d  your  compuler  sysrem  or  solfware  liOrary 
ABSOLUTELY  FREE''  Foi  the  mete  cosr  ol  a  slamp  and 
poslcard,  you  cowboys  arid  ccwgrrls  can  have  a  chance 
lowing  valuable  peripheral  or  hundreds  of  dollars  iM^rlh 
cl  software  Be  sure  lo  throw  your  t-at  into  the  nng  lo 
round  up  one  ol  these  iabtjious  prizes  Entet  as  ollen 
as  you  like  DonldeJay'  For  an  olliciai  eniry  form  send 
your  name  and  address  lo  TEXwarti  Assocsales.  350 
F  irst  Norlh  Si .  WeKirigton.  IL  60973,  or  circle  the  reader 
service  card  number 
RETAIL  VALUE  OF  PRIZES  IS  OVER  $1,750.00 


tvoniXiM  By 

It  Coopeialior  Wiin 


The  Doryt  Connection: 
Because  you  shouldn't 
have  to  pay  for  something 
you  don't  need. 

Paraprint  18A  can  saveTI-99/4A 
users  up  to  $300. » 


Our  Paraprint  18A  interfaces 
between  the  TI-99/4A 
and  any  parallel  printer, 
eliminating  the  need  for  the  Tl 
Peripheral  Expansion  Box 
and  the  RS-232  Interface 
Card.  It  plugs  directly  into  the 
TI-99/4A ,  is  fully  compatible 
and  provides  daisy  chain 
connection  for  Tl  peripherals. 
And  our  price  is  only  $1 05,  so 
you  save  up  to  $300  in  the 
bargain!  =     I 


Dor/t  also  provides  savings 
on  additional  32K  memory. 
Ours  costs  only  $1 75  and  you 
don't  have  to  buy  the 
Peripheral  Expansioh  Box. 
Plus  it  plugs  directly  into  the 
TI-99/4A,  is  fully  conjipatible 
with  all  Tl  software  ^nd 
provides  daisy  chain  connection 
for  peripheral  units. 

As  a  further  service,  Doryt 
can  provide  an  economical 
printer  for  the  system,  j 


Buy  the  Doryt  18A,  32K 
memory,  printer,  and  our 
interconnecting  cable 
and  save  an  additional  $50 
on  the  total  package! 
Call  collect  (516)  676-7950. 


Doryt 
Systems,  Inc, 

14  Glen  Street 

Glen  Cove,  N.Y.  11542 
(516)676-7950. 

Dealer  nquiries  Invited. 


How  To  Create  A 
Data  Filing  System 

Part  4:  The  Main  Program 


Jim  Fowler 


In  the  final  installment  of  this  series,  the  author  looks 
at  ways  to  approach  the  overall  logic  of  a  final  system. 
Safeguards  and  auxiliary  programs  are  also  discussed. 


Now  you  have  most  of  the  detail  work  on  your 
data  file  system  finished.  You  know  what  kind  of 
files  you  want  and  how  they  are  formatted.  The 
nature  of  the  output  functions  (and  searches)  has 
determined  the  coding  and  index  files  needed, 
and  this  has  pretty  much  dictated  the  input  part 
of  the  program.  Now  we're  ready  to  put  it  all 
together. 

Moke  If  Modular 

You  probably  already  know  the  advantages  of 
writing  programs  with  lots  of  subroutines,  each 
doing  a  single  task.  In  data  filing  systems  this 
advantage  is  particularly  obvious.  A  subroutine 
to  input  a  string  from  a  particular  device  is  much 
more  useful  than  one  to  input  a  string  from  the 
keyboard  and  another  to  read  a  string  from  the 
disk.  That  subroutine  can  be  used  in  other  sub- 
routines, to  input  an  author's  name,  and  again  to 
input.the:.title  of  a  work,  the  date  of  publication, 
and  so  on.  The  subroutine  to  input  an  author's 
name  and  encode  a  part  for  the  index  file,  can  also 
be  used  to  input  a  key  used  to  search  for  a  par- 
ticular author.  This  can  go  on  and  on.  Whenever 
possible,  make  subroutines  so  all-purpose  that 
they  can  be  called  throughout  the  program. 

In  the  accompanying  flowchart,  I  have  illus- 
trated the  design  for  my  author-subject  file  of 
books  and  articles.  How  you  want  your  data  dis- 
played, what  you  want  printed,  and  what  you 
want  on  the  screen  will  depend  on  your  individual 
situation.  Some  people  want  a  printout  of  their 
input  as  well.  It  is  also  easier  for  some  people  to 
proofread  text  on  paper  than  on  a  screen,  so  cus- 
tomize it  for  your  needs.  Your  requirements  will 


differ  from  mine,  so  your  flowchart  will  be  dif- 
ferent, too.  However,  you  probably  should  use 
subroutines  in  a  modular  fashion. 

Preventing  Disaster 

You  should  include  fail-safe  methods  to  prevent 
disastrous  errors.  For  instance,  suppose  you  have 
just  finished  entering  a  hundred  records  and  you 
turn  off  the  system  without  saving  the  index  files. 
This  disaster  breaks  down  into  two  problems: 
reminding  the  user  to  save  the  file  before  quitting, 
and  reconstructing  the  lost  files  from  the  data  on 
disk  in  the  main  recordsL.  Both  are  easy  to  solve, 
but  you  must  solve  them  -  preferably  in  advance. 
Even  if  your  method  of  reconstructing  files  is  crude 
or  your  warning  to  the  user  lacks  elegance,  the 
important  thing  is  to  have  these  provisions  in  the 
program. 

You  cannot  prevent  certain  disasters,  al- 
though you  can  reduce  the  seriousness  of  the 
damage.  These  include  a  power  interruption, 
hardware  failure,  or  a  bad  spot  on  a  disk.  To 
minimize  the  damage  from  these  troubles,  you 
need  good  operating  procedure.  For  data  files, 
this  means  making  backup  copies  frequently.  You 
could,  for  example,  make  backup  copies  after 
every  twentieth  entry  into  the  file,  then  put  a 
counter  in  the  program.  When  it  "goes  off,"  have 
the  program  tell  you  to  insert  a  disk  into  drive  X 
and  "press  return"  -  and  there  is  your  backup. 

Satellite  Programs 

You  may  find,  as  I  did,  that  you  will  need  one  or 
more  other  programs  to  augment  your  data  file 
system .  For  example,  you  probably  will  have  to 
write  a  program  to  prepare  the  disk  for  therecords 
to  be  written.  It  should  allocate  (and  fill  with  nulls) 
perhaps  one  thousand  relative  records.  These 
nulls  (zeros)  are  then  replaced  as  real  data  is  writ- 
ten into  the  system.  A  program  that  does  this  is  a 
satellite  program.  It  is  not  part  of  the  main  system 
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Initialize 
Load  Index 

Files  +  NEXT 
RECORD  (NR) 


MENU 


Get  response 


to 
^    next 
page 


Flowchart  For  Main  Author-Subject  Program 


Save  Index  Files 

+  NRondisk 


GOSUB 

Input  Author 
Input  Title 
Input  Subjects 


I 


'Current  Record' 
=  NR 


Add  1  to  NR 


INPUT  NR  of 
Record  to  Change 


Menu  has 
F  =  FiIe  data 
A  =  Add  data 
C  =  Change  data 
L  =  Look  for  author 
S  =  Subject  search 


Display  "Current 
Record" 


Ask  what  part  to 
change  or  is  it  OK? 


Get  response 


GOSUB 
Input  Author 


GOSUB 
Input  Title 


GOSUB 
Input  Subjects 


PRINT  Record 
on  Disk 
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COMMODORE  64^89 

COMMODORE  64  Computcr-onlv  51B9.9b*  ^**^r 


95* 


COMMODORE  64 

SU9.85 

with  thf  purctMM  dI 

1    1S4I         Disk  Drin 

$299.95 

1     liZSE        hinni 

S2!9.9S 

ALL  FOR 

$779.BS 

C0MM[)D0fl££4 

Mithihe  ptirchjHof 
I  IS41  Oiih  Dnvf 
1     1701 


14"ccilar  monjtoi    X299.9b 
ALlFQR i?89.85 


COMMODORE  64  i\i9,9i 

wiifi  thi  puichiv  of 
1     154t  DiiVQrivi  S29S.9S 

1     1526         Flit  prinm  includes      S^49.9S 
IF  C/cibli  diifrct  cannccl  to  E4 

ftLLFDR SB39.B& 

CDMMODOnE  B4Compuiir  $239.^5 

1541    Djik  drjvi  273.55 

ISZSEPiintur/dirftEl  conntct  m  64  269.96 

1EZG    Priniir/dirtcl  connvft  tc  64  339.9B 

1701     14"  color  iTionrior  289.96 

3530    Oi1i»rti  prognm  ncordH  T9.9B 

1600    Tthphema  mad»m  lor  VIC-20/CD>n.  64  69.96 

1SS0    Modtin,  nfw-iuio.  ddl/tnswti  109.95 
Softw>rt  far  CommodOFj  64  &  VIC'ZD  iLdrttauni!  Cill  ui! 
DAiTA  ?0  Accnidrid 

■  Z-BOcird  For  CDmmado'cU  S269.9S 
•  80  column  cird  Fd' Cammodoi*  C4  169. 9'5 
-  40  cahmirt  cird    Fof  VIC-2D  99.95 

■  40  column  card  w^aK  mem  buittinfor  VICZQ  139.95 
'  VcdK  PiEh64K  FufVIC-SD  329.95 

'FR£E  wnh  ilM  puicln*»ol  eich  ol  ihe  ibove  [') 
piodacti-Wofi  Mailrr/wOrd  piociuing  ultwjii. 


NEW  ROYAL  64K  ALPHATRONIC  Computer 
CP/M,  color  graphics,  3  video  outputs- 
RG  B  for  hi  fbs  80  col  color  displays 
composite  videa:usg  with  any  regular 
monitor;  modulated  RF  lor  u$e  with  your  TV. 
Centronic  printer  port,  40/BO  col  display, 
KC  std  audio  cass.  port  RE:$6d5.00  Your  cost: 

Optional  320  5'/*"  disk  drive,  $379.95    ^^^^■^'^ 


COMMOOORE  VlC-20 

1       'wilh  tht  ptiichstf  of 

1  DitlseitB  program  rtcordff       $69.95 

Gonck  eduatianil  loFiwirt     S2d.95 

AlMoi  $169.35 


TI  COMPACT  COMPUTER  CC-40  or^iy  SIQQ95 

Moit  idvinEHJ  poTtihle,  lili  in  your  biitlclit!         Iv J 
Will  fttioTtt  11  welt  »  the  SlODO  urn* 
Ofi»  i>i  of  A  bltlerjit  '^  l^a  hauTi.  d\  oplnlior  (ippxl 
HX  10D0  Prmur/pIoilK  $139.95 

HX-?0D0  Waf*rtipt  Idiqitil  tape  diivi^)  S124.9S 
RS232  IniMljce  89.95 

HX30Da  RS-232int.w/piiAh?IIFi;        109.95 
Scplid  tlJtP  loltwiit^wilr'tipf  ujlmira-utl  ui! 


Olympic  Sales 


SEHVWG  YOU 
SINCE  1907 


Telli    67  34  J7    TollFict   Phone  Oidus: 
Toll-free  f,«  m;  80D-Z52Z153     8D0-421  8045  (oui  ol  CAl 
Oide'  Dssksopen  ediysa  week'  7:00  AM  to  6:00  PM  MonSii 
P.O.  Boi  74S45     216So.  Oxto.d  Ave,     Loj  Angclis.  CA  90004 
Phone:  12131  7391130     Csble    "OLYRAV"LSA 


OlSKETTfS 
Mtmorix  S'/. 


Miitll 


Inpack^ol  10 
SS/DD    S2a.3S 
SSfOO      29.45 
SS/DO      33.95 


COMPUTER  PRINTERS  8i  MONITORS 

OiibiD  620        LtMer  quility,  25  cps  S  999.95 

Oiibln820        Lemrquililv.  40cps  1799.95 

N£Ca023A       lOOcpswilhlfinar  499.95 

TiBnsTli            Color  printer.  30  shiilei.  50  cpi  499.95 

OkirlitiSZA      Gr)phi«l2acpsbidirtctiDnll  424.95 

OkidiliBSA      Pir/Ser..  120  i:p>,  tnctiDn/tnctor  664.95 

Dkidita92P      160  cpt.  graphics.  bidirecTiDnai  539.95 
akidiu93P      IGQcps.iriphiH.'ritl/tract.  letter  quihly     889.95 

Slir  Gemini  10  100  cpi.  2  3K  buHer.  Epson  comp.  369.95 

Stir  Gemini  15  100  cps.  IB".  136  col,  2.3K  boiler  489.95 

Zenith               12"  green  monrlort.  gapdreiolotion  99.95 

Sanyo               15"  h/«v  mrynitor.  high  resbelowconl  169.95 

IDS                        Muriel  43D  529.95 

IDS                     SO  colrjmir  calur  prmieriill  spiions  1S95.Q0 

IDS                        l32cQiumriscDl{ir.'il]opiiori  1695.00 


DON'T  BUY  ANY  PORTABLE  COMPUTER 

UNTIL  YOU  SEE  THE  NEW  COMMODORE! 

**  *  COMMODORE'S  SX-1  00  PORTABLE!  *  »  * 

*  Full64K  COMPLETELY  PORTABLE! 

*  Color  Monitor  built-ixi 

*  Disk  drive  built-in 

*  FREE  software  package 

*  Completely  compatible  with 
the  Commodore  64 

*  LOTS  OF  SOFTWARE  AVAILABLE' 


$995 


GO 


MKBDFT      EPSON 

$449« 


FXBO 
RX-80 
MX-IOD 


16Dcps  call  for  price 

100  cps  call  for  price 

call  for  price 


0  SANYO 


Texas  Instruments 
Homed 

ri-99MA 


*99 


We  carry  class  lo 
SS.OOO.OOO  inventor^  91  ^!> 

times.  Corp.  aCCTi.  'n^.Ted. 

Gooii  i[/ii/ffcr  ro  avtilibiiity,  this  xt  supercedei 
aU  (itev'out  ids.  fob  our  wtfFhoute.  pi'ic&i  sub- 
ject to  cftange  wifftoyr  fiOXice:  not  fwtpomttjle 
tor  typograpHicm>  Sffon.  tl>  arffen  iubiectfo 


r  lye' 
rtdca 


Stf{f  i2  {ar  SS  fomgn} 


•mum  iftpg  &  findlg  S5-9$. 
'orrign}  'Of  Oiir  farrXtul  Cat 


Cat  Hog. 


NET  alter  S50  rebate  from  TI 


Pidphiiil  •xpin^pon  boK 

RS732  cird 

□iili  conirQlkr  card 

EKpiniion  Syi.  dijik  d>ivf 

Memorv  txpin.  c*rd   |32K) 

P  Code  cJrd  (ih).  txp.ctrd) 

Ttltphonf  modem 

CqIdi  monrlor 

Eitindtd  Ba»c 

LOGO 


$199.9^ 
139.95 
199 .96 
319.35 
229 .9S 
199.95 
159.95 
339.95 
79.95 
S9.95 


m 


HEWLETT 
PACKARD 

Handheld  camp.     S719.9S 
Scientific  lalc  59.°S 

Scieniificcalc  76.90 

FIruncial  calc  99.95 

Scientific  calc  99.95 

Piog.  see  scien.  calc     99.95 
Pros,  scien.w/prinl  595.00 
HP-41C  Prog,  alculilor  169.95 

HP-41CVPt0j.cllcultlor 219.95 


HP-75C 
KP-1DC 
HP-llC 
KPIZC 
HP-15C 

HPiec 

HP-97 


NEW  FABULOUS  SANYO  COfi/IPUTER 

IVIBC-&55  IBM  PC  Compatible,  uses  IBM 

software,  8088  CPU,  12SK  memory,  1  BOK  disk  storage,  color  graphics, 

centronic  port,  BO  column.  MS/DOS  Basic,  tliagoostics.  utilities,  speaker 

joystick  port,  worii  processiog  8i  spread  sheet  software  included. 

RetaihSSSS.OD  call  for  best  price!  Optional: 

12BK  RAM  expansion,  320K  id  e40K  drivcs,8087  number         

cruncher,  RSZ32  hard  disk  available  &  morel 


TIMEX 

TS-1000 

^4495 


lEK  RAM  4S.9S 

Prmitr  by  Timen  S9.95 

Ciil  ui  loi  Timfx  Vfh>Nt!t 'buy  H 
ioh^ivefqtt  1  wftWjrBfie*! 


txother 


PersorrtJ  Eieelfontc  Typewrlrei 

"■".         I  net,  hatt 
FITSINA       -.,^— —  nr 
BRItFCASE     SI  CfTat) 
-AC/DC 


159' 


SOFTWARE  for 
ALL  MICROCOMPUTERS 
3000  titles  available  at  great  prices 


1-2-3  Lotus  for  IBM 

PFS:File 

PFS  Report 

Multiplan 

D  Base  II 

Wordstar  and  more 

Recreation-   and  more 

Zaxxon 

Miner:  2e49er 

Frojger 

Deadline-—-  • 

Zork  II 

Zork  III 


S397.0a 
114.00 
99.95 
213.00 
529.00 
397.00 

37.95 
36.95 
34.95 

46.35 
39.95 
39.95 


COMPUTER  CASSETTES 
100%  Error-Free  •  Fully  Guaranteed 


LENGTH 
C-05 
C-10.. 
C-20  . 
Boxes 


PACK  PACK 

79<P  69<P 

.89<P  79<P 

.99$  89<P 

26<f  21  <f 


UPS  $3.00  Pkg.  $18.00  Case 


C-10's  39C 
(Min.  500  Case  Lot) 
wflabels  ADD   4«, 
w/boxes  ADD  13« 


FOR  ORDERS  ONLY 

\       1-800-528-6050      - 

Extension  3005 

MICRO-80 "  INC. 

2665-C  Cusby  Road 
Oak  Harbor,  WA  98277 


Educational  Software  Catalog 
for  Your  Family 

Just  Released!  Sunburst's  new 
catalog,  featuring  the  best  home  edu- 
cational software  ...  for  all  ages  . . . 
selected  from  the  nation's  top  pub- 
lishers. Reading,  math,  programming, 
problem  solving  and  more ...  to  moti- 
vate your  children  and  make  learning 
come  alive. 
Call  Toll-Free  800-431-1934 

D  RUSH  MY  FREE  CATALOG 


Name  _ 
Address 
C'ti  __ 
Slale  _ 


Zip 


Type  of  compuler  _ 


SUNBURST 

Depl  YK  7 

39  Washington  Ave, 

Pleasantville,  NY  10E70 


APPLE /ATARI /COMMODORE 

MEASURE  &  CONTROL 
TEMPERATURE 

DISPLAY  GRAPHICS 

HARD  COPY  OUTPUT 

ALARMS  &  SETPOINTS 

DISK  FILE  DATA  STORAGE 

1-256  Sensors 

Precise  to1/10Q  Degree 

Complete  Software 

$129.00  Package 

American  Data  Cable,  inc. 

2864  Ray  Lawyer  Drive,  #205 
P.O.  Box  2212 '  Placerville,  CA  95667. 
(916)  622-3465 


Ask  for  KEY: 

GOSUB 
Input  Author 


Author  search 
"BEGIN"  (Put  key 
in  Buffer) 
Decrement  Pointer 
(DECPTi 


Ask  for  KEY: 

GOSUB 
Input  Subjects 


Yes 


Display  record 

having  NR  in 

register 


Subject  search 

"BEGIN" 

"DECPT" 


Display  record 

having  NR  in 

register 


Yes 


program,  but  has  no  function  except  in  that  sys- 
tem. You  can  simply  inckjde  this  program  on  the 
same  disk  as  the  main  program  where  it  is  handy. 

I  had  to  create  a  satellite  program  when  my 
main  data  file  forced  me  to  make  a  second  data 
system.  Many  of  the  records  I  entered  were  titles 
of  magazine  or  journal  articles.  There  is  no  point 
in  spelling  out  The  Journal  of  Embryology  and  Ex- 
perimental Morphology  when  everybody  in  the  busi- 
ness knows  it  as  "JEEM."  Every  periodical  has  an 
official  abbreviation,  but  how  to  remember  them 
all?  I  had  to  make  a  dictionary  of  journal  names 
and  their  abbreviations.  Of  course,  that  meant 

216    COMPUTE!    October  1983 


another  data  file.  If  I  had  had  the  foresight,  I 
could  have  incorporated  the  dictionary  into  the 
main  system.  Fortunately,  my  half-megabyte  disks 
have  lots  of  room,  but  I  really  do  not  need  a  second 
system  with  its  files  and  program  when  it  could 
be  ancillary  to  the  main  one.  Maybe  you  will  think 
far  enough  ahead  and  avoid  the  rather  clumsy 
solution  I  had  to  adopt. 

As  we've  stressed  throughout  this  series, 
ingenuity,  careful  planning,  and  foresight  are  the 
key  ingredients  to  a  good  system.  Although  it 
may  be  frustrating  at  times,  writing  the  system  is 
almost  as  worthwhile  as  using  it.  © 


PRODUCTS  FOR  ATARI'  400/800 
FROMELCOMP 


[books  for  ATARI  Computers 

I  ATARI  BASIC  -  tMrning  bv  UliflQ 

I  An  L-»cd!crit  DQOfc  tor  l»ie  upginner.  Mafiy  ^^OfX  programs 
I  and  Itiiirning  exHrci£i«  All  importaoi  (eaiures  of  ihe  ATARI 
IcompuiGrs  am  descntjed  (screen  drawmgri.  special  sounds, 
1  keys,  paddles,  jovsticks,  iptjoaliied  xta^r  routines,  ftiraphici, 
I  sound  applications,  (MtiH.  pukei,  and  special  ilutll  AIto 
.ut)BB5l«oni  are  made  that  ctwHengp  yOu  To  thdnge  and  Wilt- 
I  pro^jrijm  roL)lin«, 
I  Order  #164  87.95 

I  Gamsi  for  th»  ATARt  CompuiBi 

1  Th.is  boolt  acscibes  JdvanceO'  progfammmg  lechniQues  'iku 
I  plavflrmi&sMe-ijrapniCS  and  use  ot  llie  harOwarKrasisteri. 
I  Contdins  manv   roadv   lu   run  pfograms   in  SASlC  end  or* 

r.ilits)  GUNFIGHT  in  machine  Idnguagu 
I  Older  #162  £7-95 


How  to  program  your  ATARI  in  6502  MachXang. 
1-."    .::.■;■  j^   tj ''Mtt'nie  idigujge  for  t+h;  BASIC  O'l'gT-*"^'^-^' 

Order  =^1G9  S9.95 

FORTH  on  the  ATARI  -  Learninn  by  Ujina 

ill'      :      ■  riii  ApBli^ralioni.  Iiurning  Hhh'cih;^ 

Order  "170  £7.95 

.-.     1  ■                 ■  ^  rjk  No    I7Don  ilriK 

Orde-  No.  73lfl  $22.00  onlv! 


A  Look  into  the  Future  -  ATSTROLOGY 
■  ,:v»i  ATAfli  S05 

Order  ^  171         Inet.  lilting  o*  the  progiam  £9,95 


I  Our  catalog  is  free  wrtK  every  order.  Setid  £1.00  and 
SASE  lor  catalog  only. 


SUPERMAIL 


FORTH    Coft  fl^  en  .juilotjuul 
disk!.  No  cjrriog*.  rm  DOS 

n:>      FOPlTt-      L.in;5  jjlii.'      f 

6'rder-7312         £49.00 

SUPERINVENTOBV 
<  lona  iteTisoy'  Jisii' 
.    Complewly  i\r(tteri  r 

FORTH.  Same  as  Jl^L^rT. 
iDiik  onlv) 

I  Order#732C        £49.00 
BUSIPACK-1 

h-.riltu'i    in    FORTH!     Cort. 
pliMP  order  onirv.  InvenTOrv 
I   mailing  (ind  Invoiclfig. 
(Qiskynlvl 

I  Order  #7313       £98.00 


ATAMEMO 

DaiaQiock   lo  keep  track  (3'  | 

vaur  apPDinliTiei-H5    ID+Cl 

Order  #7310       £29.95  j 

ATCASH 

Coiv.t:    \r,L^T     ATAHl     3.00  | 
itun  .1,  portif  tul  ca^i^  n^i'^\ 
IDilkonlyl 

Order  #7307       £49.95  | 

Invoicing  progr.  i.  BASIC  I 
Order  =^720HC1E29.95 
Order  =7200  |D)£39.95  [ 

Mailing  Lisi  in  BASIC 
Order  -  7212  IC)  £19.95  I 
Older  =7213  (D)E24.95  I 

Invantorv       conirol 

BASIC 

Order  =7214  lO  £19.95 

Order  =  7215  |D)fi24.95 


MicfOCOmpottr     'Hiidwir* 
Handbook  IB'l'i  pageil 
I'^scrjpiKins.   pinoiils  dnd   I 
sOKitiCation*       13^        thi! 
(  -noil  popular  rruc'ooro 

Jl     i^'essoii      and      suppori   | 
T^     chips. 
pQ     A  MUST  tat  ihe  riard 


Order-No.  29 
S14.95  I 


.•. 


1    f 


PAYMENT;    cheek,   money  order,  VISA,  MASTER 
CARD,  Eurocheck,  ACCESS,  Interbank 
Prepaid  orders  add  £3.50  for  shipping  (USA) 
S5.00  hjndling  for  C.O.D. 

All  orders  outside  USA:  add  15  %  shipping,  Califor- 
nia residents  add  G. 5  %  sales  tax. 

ATAR I  jl «  r*gi»t«(ad  trsdEmjrk  of  A  TARUfW. 
VIC-20,  CBM  in  leaiiltrnl  tradsmathi  ol  Commodore 
Af^LE  h  a  iHistsrftd  trademarlt  o4  Apf^LE  Compuur,  Inc. 


SOFTWARE  IN  MACHINE  LANGUAGE  for  ATARI 

ATMONA-1 

This  li  a  machine  lariguagQ  monttor  Thai  providas  you 
wiih  the  nioil  imporiant  commands  ^or  programming 
in  rriach ire  language,  Diwisenible,  dump  (hex  and 
ASCMl,  change  mernory  location,  block  iransfer.  fill 
memory  block,  save  and  load  machine-language  pro- 
grams, start  programs.  Prinier  option  via  three 
different  inieriaces, 

Order  -7022  caiwne  verjion  S19.9S 

Order  =7023  ditk  version  $2A.9S 

Order  -  7024  carUidge  vernon  553.00 

ATMONA-2  I 

This,  is,  a  uacsr  fdebuggerl  that  Jets  you  explore  the 
ATARI  RAM/ROM  area.  You  can  jtop  at  previously  ' 
selected    address,    opcode,   or    operand.    Also    very  ; 
valuable    in    understandir^g    the    microprocessor,    Ai 
each  Slop,  all  registers  of  the  CPU  may  be  changed, 
includes  ATMONAl. 

Order  =7049  cat$«tte  venion  £49.95 

Order  =705^"  diik  vemon  S&4.D0 

ATMAS 

Macro-Assembler   for  -ATARh80O/4ak.   One  of  the 

most    powerful    editor    assemblers   on    the  market. 

Versatile  edttoi-  with  scrolling.  Up  to  l7k  of  source^ 

Code.  Very  fast,  translates  5k  source-code  in  about  5 

seconds  Source  code  can  be  saved  on  disk  or  cassette 

{Includes  ATMONA-1 1 

Order  =7099  disk  version  £89.00 

Order  =7999  canridge  version  S129.00 

ATAS 

Same    as    ATMAS    but    without    macro-capability. 

Cassette- based 

Order  =7098  32k  RAM  S49.95 

Ofder=7998  48k  RAM  »49.95 

ATEXTl 

This    wordprocessor    is    an   excellent    buy    for   your 

j  mon«v  It  features  screen  oriented  editing,  scrolling, 
strmg  search  leven  nestedl,  left  and  right  margin 
jutlification.  Over  30  commands,  Text  can  be  saved 

I  on  disk  or  cassette, 
Order -7210  casseite  venJon  SZ9.95 

Order  =  7216  disli  version  S34.95 

Order  =7217  cartridge  version  S69.00 

I  GUNFIGHT 

j  This  game  |8k  machine-languaga)  needs  two  joystieks. 
Animation    and   sound.   Two  cowboys  light   against 
each  other.  Comes  on  a  bootatjie  cassette . 
Order  =7207  $19.95 


FORTH  for  the  ATAR  I 


FORTH  from  Elcomp  Publishing,  Inc.  is  an  extended 
Fig-Forlh. version.  Editor  and  I '0  package  included, 
Ulilitv  package  includes  decompiler,  sector  copy, Hex- 
dump  lASCIII,  ATARI  Filehandling,  total  graphic 
and  sounti,  jaystick  program  and  player  missile. 
Extremely  powerful' 

Order  =  7055  disk  S39.95 

Floating  point  package  with  trigonometric  functions 
(0  -90°! 

Order  =7230  disk  S  29.95 

Learn-FOflTH  from  Elcorrtp  PuhNshing,  Inc. 
A    suti^el    of    Fig  Forth    for    Ihe    tjeginner.    On  disk 
132k  RAM)  or  on  cassette  (IBk  RAM)- 
Ofder  =4  7053  S19,B5 


Expansion  boards  for  the  APPLE  M 


TkiE  Cuttam  AppI*  *  Oltitr  Myst^rlH  | 
'■'  corTiplfie  gjitJe-  to  tusEamiiina  fte  \ 
■\bCi'^  Sotfrta'e  und  H^rdwatp  I 

Ordar-No.  eaO  SZ4.96 

.'J.'  .!liu  3.Eock  Ihe  Doa'ds  which  jrp 
jit'J  in  the  Gqqk  The  CusUni 
Apple  *'  ItHfetjorcJil. 

6523  I/O  Bojrd  No.  605  (39.00 

EPROM  EUirnx  No.  607  t49.0{>  ' 

BKEPROM/RAM  Boird 

No   609  !29  00 

Prototyping  board  for  the 
Apple  II  No.eoa  J29.00 

Dt  r4p«at«ir  board  for  th«  Apple  II  Na    606  S49  00 


tlic  niGtani  nppic 


W   i 


[  Care  and  Feeding  of  the  Cojnmodore  PET 
Eight    chapters    exploring    PET    hardware     Includes 

I  repair     and    interfacing    information.    Programmrng 
tricks  and  schematics, 

I  Order  #150  S9.95 


i  n 


ELCOMPPUBLISHINGTINC 

53  Redrock  Lane 

Pomona,  C A  91766  . 

Phone:  (714)623  8314 


ATARI 

VIC-20 

OS! 

SINCLAIR 
.  TIMEX 


Hardware  -  ADD-ONS  for  ATARI 

I  PRINTER  INTERFACE 

This  construction  article  comes  with  printed  circuit 
j  board  and  software.  Vou  can  use  the  EPSON  printer 
{without  the  ATARI  pfinier  interface.   (Works  *ith 
I  gameporis  3  and  4). 
Order  *7211  t^9.9S 

HS-232  Interface  for  your  ATARI  400/800 
I  Software    with    ccnnector    and   construction   article., 
I  Order -7291  ISVTTL-Levell  J19.9S  | 

I  EPROM  BURNER  for  ATARI  400/BOQ 

(works  with  gameports.  No  additional  power  supply 

I  needed.    Comes    compt.    assembled    with    software 

112716.2732,2532), 

I  Order  =7042  S179.00 

]  EPROM  BURNER  for  ATARI  400/800  KIT 

Printed    circuit    board    incl.   Software  and  extensive 
I  construction  article. 

Order  i^2S2  W9-00 

I  EPROM  BOARD  (CARTRIDGEI 

I  Holds  two  4k  EPROMs  125321.  EPROMs  not  mcluded. 

I  Order  =7043  S29.95 


I  EPROM  BOARD  KIT 

I  Same  as  above  but  bare  board  only  with  description. 

I  t-rder  =  7224  *1t-95 


ATARI.  VIC-20,  Sinclair.  Timex  and  OSI 


NEW  -  tor  your  ATARI  400/aOO 

Ajiiolosv  and  Biorfiyrtim  I  u.  A I  AH  I  1  Diih  only!  I 


I  Order  r^O.  ^373 
J  Birth  uontio! 
I  Ordtir-Nii.  7Z22 


„  ATARI  IKnausOoir 
Disk  Drily! 


Books  +  Software  for  VIC-20  (requires  SKRAflfl  Exp.) 


I  No.a87|).';o'33--C5H 
1  No.  4S33 


VICJQ.SeRAV 
mo.  41WJ  .J  'i  ^•-  -  »IC20.  I5K  RAV 
No.  176   Tricks  (or  VICs  (book,  IIS  pages! 

Ihftiniawembler  (or  VtC  20  ^H*^ 

No  4896  K19-9S 

I    ;^unfill  for  VIC.  rJo.  4894       E9.9B 

TIC  TAC  VIC,  No.  -teeO         S9-9S 


619-95 
Et4.95 
£  9.95 


»® 


GAMEPACK  I  {3  0ameii 
No.  dBBt  S  14.95  I 

I  Progr.  in  6S02  Machine  Language  on  your  PET+CBMl 
I  2  complete  Editor/Assemblers  (Source  code  3  hex-T 
Iduri^p  *  description  plus  a  powerful  machine  languai 
J  monitor  IHexdumpj.  Ortler-No.  166  S19.95  | 

I  Universal  Experimenter  Board  for  the  VIC>20 
I  (Save  money  with  this  great  board).  This  board  plugs  I 
right  into  the  expansion  slot  of  the  \/IC-20.  f 

IOrder=4844  S18.95 

1  Software  for  SIIMCLAIR  ZX-81  and  TIMEX  1000 

:2399    Machine  Language  Monitor  E9.95| 

I -239a    Mailing  List  319.951 

Programming   in   BASIC  and  machine  language  withl 

I  !heZX-ai  (821  or  TIMEX  1000. 

I  Order-Mo.  174  (book)  6  9.95 

BOOKS  FOR  OSI 
I  No.  157  1.  Book  of  Ohio  S7.95 
I  No.  158  2.  Book  of  Ohio  S7.95 
I  No.  159  3.  Book  of  Ohio  S7.9S 
I  No,  160  4.  Book  of  Ohio  S7,95 
I  Nu.  161  5.  Book  of  Ohio         £7.95 


I  =r  151  8K  Microsoft  BASIC  Ref   Man.  S9.95I 

=  152  Expansion  Handbook  fot6602and  6802   S9.95I 
I— 153  Microcomputer  AppI.  Notes  S9.95| 

I  Complex  Sound  Generation 

1  New    revised    applications    manual    for  the    Texas  I 

J  Instruments   SN   76477   Complex   Sound  Generator. 

j  Order -154  S6.95  | 

I  Small  Busi  noss  Programs     Order  =  1 56 

Icomplete    listings  for   the   business  user.  Inventory, 

I  Invoice  Writing.  Mailing   List  and  much  more,  Intro- 1 

Iduction  to  Business  Applications.  S14.90| 


MACHINE  LANGUAGE 


Jim  "Butterfield.  Associate  Editor 


Bagel  Break,  Part  3 


We've  looked  at  some  of  the  planning  that  goes 
into  organizing  a  machine  language  game  of 
"Bagels."  Let's  put  the  final  touches  together, 
and  discuss  some  less  obvious  aspects  of  the  way 
the  program  fits  with  BASIC. 

We  chose  to  start  the  machine  language  at 
5033C,  decimal  828.  The  main  reason  for  this  was 
to  make  it  universal  -  the  same  space  is  available 
in  PET,  CBM,  VIC  and  Commodore  64  computers. 
It  is  the  memory  address  of  the  cassette  tape  buffer 
(on  PET/CBM,  the  buffer  for  cassette  2). 

But  that  space  is  not  always  free  and  clear.  If 
we  wished  to  save  the  program  to  cassette  tape, 
we  might  need  this  buffer  space.  The  SAVE  com- 
mand would  begin  by  staging  the  program 
"header"  block  in  this  area;  the  program  would 
be  destroyed  before  it  was  written.  If  we  should 
try  any  BASIC  4.0  disk  commands,  this  area  would 
also  be  invaded;  a  simple  CATALOG  command 
would  wreck  our  program. 

For  safety's  sake,  we  should  pop  our  machine 
language  program  into  place  just  before  we  use  it. 
What  better  way  than  to  build  the  program  as  a 
series  of  BASIC  DATA  statements,  and  POKE  it 
into  its  working  area? 

That's  exactly  what  we  do  in  the  program 
here.  If  we  examine  the  numbers  in  the  DATA 
statements,  we'll  be  able  to  spot  our  original  pro- 
gram. The  first  two  numbers,  for  example,  are 
169  and  0.  These  decimal  numbers  would  translate 
to  $A900,  and  that's  our  first  instruction,  LDA 
#S00,  or,  "Load  the  A  register  with  the  actual 
value  of  hex  00."  We  could  trace  through  all  of 
the  instructions  of  the  original  program  in  this 
fashion. 

If  Is  BASIC 

How  did  we  get  the  DATA  statement  values  in 
lines  100-180?  We  could  do  it  by  painstaking  hand 
translation,  but  there  are  easier  ways.  After  all, 
we  have  a  computer  to  do  the  routine  calculations 
for  us.  One  way  would  be  to  put  the  hex  program 
in  place,  and  then  write  a  loop  using  PEEK  to 

218     COMPITTE!    October  1983 


print  out  the  decimal  values.  For  example, 

FOR  J  =  828  TO  848:  PRINT  PEEK(J);:NEXT  J 

would  yield  a  series  of  decimal  values.  Using 
screen  editing,  we  could  insert  the  commas  and 
prefix  the  values  with  a  line  number  and  the  word 
DATA. 

Thus,  we  have  a  program  that's  totally  BASIC. 
When  it  runs,  we  manufacture  a  machine  language 
program  and  then  call  it.  But  the  program  handles 
like  BASIC,  lists  like  BASIC,  and  may  be  loaded 
and  saved  like  BASIC  -  because  it  is  BASIC. 

A  few  comments  on  the  BASIC  program  itself. 
Line  290  causes  the  random  number  generator  to 
be  scrambled,  or  "randomized."  When  we  use 
the  value  zero  as  an  argument,  i.e.,  RND(O),  the 
random  number  seed  is  scrambled  against  the 
clock  time  so  that  all  following  numbers,  called 
with  RND(l),  will  be  unpredictable. 

Lines  300  to  320  generate  four  random  num- 
bers, each  from  65  (the  ASCII  letter  A)  to  70  (letter 
F)  inclusive.  These  values  are  POKEd  into  memory 
for  the  machine  language  program  to  use. 

After  the  call  to  machine  language,  PEEK(577) 
will  tell  us  whether  or  not  the  player  got  the  solu- 
tion. Location  577  ($0241),  tells  us'about  the  "exact 
matches":  four  is  a  correct  solution,  of  course.  If 
the  count  is  less  than  four,  we  must  tell  the  player 
what  the  solution  was  by  PEEKing  the  characters 
back  out  from  addresses  580  to  583  -  that's  where 
we  put  them. 

We  have  looked  at  a  simple  game  which  uses 
BASIC  and  machine  language  working  together. 
The  emphasis  this  time  was  on  working  the  prob- 
lem through  and  commenting  on  the  various  tools 
that  a  programmer  might  bring  to  the  task. 

The  program  could  well  have  been  written 
entirely  in  BASIC.  After  all.  Bagels  doesn't  need 
super-speed  to  run.  But  you  may  notice  that  for 
this  sort  of  job,  machine  language  brings  a  clean 
elegance  to  the  program.  The  programmer  often 
feels  that  machine  language  gives  a  more  total 
control  over  the  programming. 


Moses 

THE  ASSEMBLER  OF  THE  AGES 
for  the  VIC  20 

Why  MOSES? 

Programs  written  with  MOSES  run  fifty  to  several  hun- 
dred times  faster  than  programs  written  in  BASIC.  A 
program  that  takes  two  minutes  to  execute  in  BASIC, 
will  only  take  two  seconds  (or  less)  to  execute  when  writ- 
ten with  MOSES. 
ULTRA-FAST 


MOSES  is  written  in  MACHINE 

LANGUAGE!  MOSES  assembles 

dozens  of  times  faster  than 

assemblers  written  in  BASIC. 
atTWi  SOPHISTICATED 

MOSES  makes  3  PASSES,  not 

just  one  or  two  like  most  other 

assemblers. 
ULTRA-FRIETIDLY 

On  screen   menu   of  EASY-TO- 

USE  COMMANDS. 

ULTRA-CONVENIENT 

Comes  in  a  CARTRIDGE  with  sturdy  plastic  case. 
MOSES  is  easy  to  learn  and  powerful.  As  you  enter 
each    line,   MOSES   verifies   syntax,   and   partially 


Moses 


assembles  the  line  thereby  reducing  debugging  time 
and  conserving  memory.  This  means  an  even  faster 
assembly.  Also  included  with  MOSES  is  a  machine  lan- 
guage MOMITOR  with  34  powerful  commands  to  help 
you   debug   your  programs. 
Whether  you  program  for  fun  or 
profit,  or  both,  you  need  MOSES. 
You'll  love  the  ability  to  program 
where   imagination   is  your  only 
limit. 


The  65C02  Assembler  for  the  VIC  20 


SPECIAL  OFFER! 

For  a  limited  time,  we  will  include 
a  free  kit  to  upgrade  your  VIC 
20' 5  outdated  6502  to  the  new, 
enhanced  65C02A  microproces- 
sor. The  65C02A  is  totally  com- 
patible with  all  VIC  20  software 
and  hardware,  uses  99%  less 
energy,  and  has  27  new  instructions  to  make  program- 
ming easier  and  faster.  And,  of  course,  MOSES  takes 
advantage  of  all  27  instructions.  This  is  a  $24.95  value, 
but  is  included  free  while  quantities  last. 


8K  •  16K 

RAM  EXPANSION 

A  high  quality  memory  expansion  cartridge 
housed  in  a  sturdy  plastic  case.  This  prod- 
uct has  an  easily  accessible  dip  switch 
which  gives  you  memory  block  switch- 
ing ability.  Use  one  8K  and  one  16K 
for  24K  memory  or  two  16K  cart- 
ridges for  a  total  of  32K  memory. 
6-Month  Warranty. 


>< 

64kW 

RAM            ^^^H. 

i'ii»i    1 

^^|;6i 

^^^^H 

^^^^^^B  rnnr^  ^B 

64K 

RAM  EXPANSION 

It's  finally  here.  This  highly  versatile 
ram  cartridge  allows  you  to  store  or 
write  programs  in  two  separate  32K 
banks  that  are    bank    selectable   with 
software  -     NO  SWITCHES.  TTiis  pro- 
duct is  power  stingy  using  less  than  200 
mA  current.  A  must  for  programmers. 
6-Month  Warranty. 


VICZOPRODaCTS: 

MOSES 

MOSES  with  8K  RAM  expansion 


$59.95* 
99.95* 


8K  RAM  Cartridge 
1 6K  RAM  Cartridge 
64K  RAM  Cartridge 


$46.95* 

69.95* 

169.95* 

'Manufacturer's  suggested  list  price 


Call  CENTURY  MICRO  at  (916)  920-3656  for  the  name  of  a 
dealer  in  your  area.        Dealer  inquiries  invited. 

1832  Tribute  Rd.,  Suite  213,  Sacramento,  CA  95815 


CENTURy 

MICRO 


^^  Alspa  Computer,  Inc. 


65D2 

6502A/6512rt 

6520  PIA 

6522  VIA 

6532 

2114-L200 

2716  EPRQM 

2532  EPROM 

6116  2KX8CM0SRAM 

4116fWM 


8.40 
5.15 
6-45 

7.90 


Price-performance  leader.  Includes  ZBOA.  8"  ds/dd  drives,  3 
serial  +  1  parallel  pon,  Winchester  port,  networking  Prices 
start  below  SI  500  DEALER  /  OEM  inquiries  invited. 

SPTciALSoniPHEGflTESciMl^^^ 

7,45     10/695     50/6.55  100/6,15 

10/795     50/7.35  100/6,90 

10/490     50/4.45  100/4.15 

10/610    50/5.75  100/5,45 

10/740    50/7.00  100/ 6.60 

245     25/2.3D  100/2.15 

4,90      5/4.50  10/4.0O 

6.90      5/6.75  10/6,45 

690      5/6.75  10/6,45 
8  lor  14 

?.?™lPA?!!L9D.li9ES.?.''J!{'.  Socket  jScanbe)  2.00 

Hewlett  Packard       fJiS 

Write  or  call  for  jjrices. /-T=i  ^ ^L,L^ 

Anciior 
Auiomation 
Signalman 
Modems 

FREE  SOURCE  MEMBERSHIP  WITH  SIGNALMAN 

All  Signalman  Modems  are  Direct  Connect,  an  d  include  cables 
ID  connect  to  your  computer  anri  to  ttie  telephone.  Signalman 
Modems  provide  the  best  price- performance  values,  and  starf 
at  less  than  $1 00.  Deiler  inil  0  EM  Inqiilrlu  Invlltd  - 

Mark  1 RS232  (99)         59 

Mark  II  fof  Atari  850  (99)         79 

Mark  IV  tor  CBM/PET  with  soltwafe  (169)  89 

Mark  V  for  Osborne  (software  available)  (129)  79 
Mark  VI  for  IBM  Personal  Computer  (279)       175 

Mark  VII  Auto  Dial/Auto  Answer  (159)         89 

Mark  VIM  Bell  21 2  Auto  Dial/Answef  (399)        299 


DC  HAYES  SmartiniMJen 
DC  Hayes  Smartmodem  1 200 
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545 


PROM  QUEEN  for  VIC 

Apple  Emulator  for  Connnoilore  64 
Screeomaiter  80  COLUMN  CAflO  iorCB4 
Sglid  Oak  Z  level  Stanil  for  C64  or  VIC 

C64/VIC  Switch  (networking) 

BACKUP  V1.0  tape  copier  (or  C64  or  VIC 

CAROBOARD/6  Mottierboard  ■  VIC 
CARDAPTER/i  AtanVCS  Adapter  -  VIC' 
CARDPRINT  Printer  Interface  ■  C64/VIC 
CARDB0ARD/3S  Motherboard  -  VIC 
CARDCO  CB4/VIC  Calculator  Keypad 
CAR  DRAM/1 5  RAM  Expansion  -  VIC 

Complete  CARDCO  Line  in  sloiik 

CIE  and  VIE  IEEE  Interfaces  in  stock 
BASM  Compiler/Assembler  for  C64 


17D 
89 

US 
29 

125 
20 
64 
69 
64 
32 
32 
64 


89 


APPLE-FRANKUftHTEMS 

KRAFT  Apple  Joystick  40 

16K  RAM  CanI  for  Apple  59 

Soilil  Dak  2  Level  Slaod  for  Apple  29 

Serial  Card  lor  Apple  99 

MPC  RAM/80  column  canl  lor  IIE  (AP/TTCT]  1 39 

Z60  Softcard  and  CP/M  (Mictosoft)  235 

RANA  EIrte  I  with  Controller  389 

ParaUel  Printer  Interface/Cable  79 

Apple  Dumpiini  (Microtek]  Printer Inltrlice  IIS 

Apple  Dumpling  Willi  1 6K  Butler  160 

Grappler -I- Interface  140 
Kraft  Products  tor  Apple  in  stock 

DC  Hayes  Micromodem  II  299 

PES:  File  100 

PFS:  Report  |0D 

Videx  80  Column  Card  209 
Nayden  Soffwirt  for  Appit  20<yii  OFF 

Pl£  Writer  Won!  ProctMor  1 2D 


B  commodore 

See  us  for  Personal,  Business,  and  Educational 
requirements.  Eifucatioital  Discounts  available. 

PETSCAN  I      $245  base  price 

Allows  you  to  connect  up  to  30  CBKf/PET  Comptjters  to 
shared  disk  drives  and  ptinters.  Completely  transparent  to  Ifie 
user.  Perfect  for  schools  or  multiple  wofd  processing  con- 
figurations. Base  configuration  supports  2  computers.  Addi- 
tional computer  hookups  Si  00  each, 

COMPAWSTCP"  $115 

Intelligent  Temiinal  Paclcage  for  PET,  CBM,  C64 

Includes  ACIA  Hardware /_STCP  Software 

VETieEE  to  F^raildlFte^^ 

Includes  case,  power  supply,  full  8-bit  transmission,  and 
switch  selectable  character  conversion  to  ASCII. 

VIDEO  ENHANCER  far  Commodore  64  89 

Realize  video  quality  equal  or  better  than  composite  monitor 
using  standard  color  TV. 

SC  REEN  MAKE  R  80  Column  Adapter  for  C64     145 

Provides  big  screen  capability  for  business  applications 


VIC  20  Ptuducts 
BACKUP  V1.a  20 

VIC  RAM  Cards  in  stock 
VIC  SuperEKpander      52 
VIC  16KRAM 
Tliom  EMI  Sottwire 
HES  Sillware 
VIC  Omega  Race 
SpdetsofMasfUMl) 
Programmers  Aid 

YiCTOny  Soltwire 
Street  Sweepers  (VIC)    12 
Night  Rider  (VIC)  11 

Annihilatof  16 

Adventure  Pack  II  16 

Educational  Pack  I        1 1 
Strategy  Pack  I  16 


95 


32 
39 
45 


VIC  Sargon.ll  Chess 
VIC  GORF 
Meteor  Run  (UMI) 
VIC  Radar  Ratrace 
AmoktUMI) 
Snakman 
Rubtk's  Cube 
Programmeis  Refefence 
FR06GER 

VIC  Adventure  Series 
lor  VfC  tod  CE4 
Kongo  Kong (VIC) 
Cosmic  Debris  (VIC) 
Adventure  Pack  I 
Melamorptiosis 
Trek 
Grave  Robbers 


PAPER  CUP  WonI  Processor  I09 

ORACLE  Data  Base  Batteries  Inciuiled  1 25 

Commodore  64  Programmers  Reference  Guide  16 

MIcroCiiess  lor  CG4— B  levels  ol  play  1 9 

Computei's  First  Book  of  PCT/CBM  1 1 

C64  or  VIC  SWITCH  |25 

POWER  ROM  Utilities  for  PET/CBM  78 

Won!  Pro  3-I-/64  69 

WordPro 4-f  -  8032,  disk,  printer  295 
SPELLMASTER  spelling  checker  tor  WonlPn) 

VISICALC  for  PET.  ATARI,  or  Apple  189 

PET-TRAX  PET  to  Epson  Grapliics  Softiara  4D 

SM-KIT  enhanced  PET/CBM  ROM  Utilities  40 

Programmers  Toolkit  -  PET  ROM  Utilitie-;  35 

EASY  CALCIor  C64  GS 

PET  Spaceraaker  II  ROM  Switch  35 

COPYWRITER  Wonl  Processor  tor  CM  69 

2  Meter  PET  to  IEEE  or  IEEE  to  IEEE  Cable  40 

Dust  Cover  for  PET,  CBM,  4040,  or  8050  8 
CmC  Interfaces  (ADAI8D0,  ADA1450.  SADI  in  sfncid 

Pro  jremraing  the  PET/CB  M  ICompulell  —  R.  West  20 

Compute!  First  Book  of  VIC  1 1 

HES  MODEM  with  Softwin  65 
HES  Sotlwart  mil  Hanlwire  In  stnck 
UMI  prnducls  in  slock 

GHIDRUNNER(HES|VICcrCG4  29 

COCO  (HES)  Tulonaf  for  C64  39 

Gridrunner  (HES)  C64  or  VIC  29 

Agressor  (HES)  29 
HES  Turtle  Graphics  VIC  29  C64  49 
HES  V^riler                   VIC  30                          C64  34 

Grand  Master  Chess  |UMI|  C64  or  VIC  27 

Renaissance  (UMI)  VIC  29  C64  24 

Synthesound  (HES)  44 

HESMON                      VICorC64  29 

6502  Professional  Developemeni  System  (HES)  24 
Robot  Panic-  29          Prate's  Peril  29         Retro  Ball  29 


DISK 
SPECIALS 


Scotch  (3M)  5"  ss/dd 
Scotch  |3M)  5"  ds/dd 
Scotch  (3M)  8"  ss/sd 
Scotch(3l^)B"ss/fld 


10/2,20  50/2.00  100/1,95 

10/3,05  50/2.80  100/2,75 

10/2.30  50/2,10  100/2,06 

10/285  50/ 2.70  100/2,65 


We  Stock  VERBATIM  DISKS 

Write  for  Dealer  and  OEM  prices 

Seminal  5"  ss/dd  10/1.90  50/1.B5  100/1.80 

Sentinal  3"  ds/dd  10/2.55  50/2,50  100/2.45 

We  stock  Dysan  disks 

Wabash  5- ss/sd  10/165  50/1,60  100/1,55 

Wabash  rj"  ss/dd  10/1.95  50/1.90  100/1.85 

Wabash  8"  ss/sd  10/2.00  50/1.95  100/1.85 

We  stock  MAXELL  DISKS 

Write  for  dealer  and  DEM  prices. 

Disk  Storage  Pages     10  for  $5    Hub  Rings  50  for  S6 
Disk  Ubr.iry  Cases      8"— 3,00  5"— 2.25 
Head  Cleaning  Kits     1 1 

CASSETTE  TAPES- 

c-io 

C-30 


-AGFAPE-6)1  PREMIUM 

10/ .61       50/ .58        100/50 
10/ .85      50/ .82        100/ .70 


OATASKIELD  BACKUP  POWER  SOURCE        265 

Batlery  t);ick  up  Uninlermplible  Power  Supply  with  surge  and 
noise  filtering  The  answer  to  your  power  problems. 
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Zenith  ZVM-1 21  Green  Phosphor  Monitor 

Zenith  new  color  and  monochrome  monitors  in  slock 

Peachleit  5D00  SoltwarB  Packajje 

PFS  Soltware  lor  IBM  and  Apple  in  stock 

VOTRAX  Personal  Speech  System 

VOTRAXType-N-lalk 

VOICE  BOX  Speech  Synthesizer  (Apple  or  Atari) 

CompuServe  Subscription  (5  hours  free) 

Dynai  |Bi3)tlief]  DX-15  Daisy  Wheel  Printer 

Prownter  Parallel  Printer 

Plniionic  1090  Prtnter  nilli  Comipcnilenu  Mode 

USI  CompuMOD  4   R  F  Modulator 

Oaisywriler  2000  with  -IBK  buffer  -I-  cable 

Many  pnnters  available  (Gemini-Star.  Brolhef,  OKI,  etc.) 

We  Stock  AMDEK  Monltore 

Amdek  DXY-100  Pkitter  590 

A  P  Products  15%  OFF 

Walanabe  Intelligent  Plotter  990  6-pen  1290 

BROOKS  6  Oullet  Soii<  Siipprtssor/NoJit  Filter  54 

We  stock  Electrohome  Monitors 

SyeertekSYM-l  Mlcncompiiter  |69 

i':L?M!!^.MA?.!™*.^..f  RICES  DISCOUNTED 

Panasonic  12"  Monitor  (20  MHz)  with  audio 
Panasonic  CT-,160  Dual  Mode  Color  Monitor 


Z19 

280 
160 

32 
469 

379 

319 

39 

1150 


135 
259 


USI  Vlileo  Mcnitors—Green.er  AMBER  20  MHz  hl-res. 
Dealer  anil  OEM  Inquiries  invited 


T£tiinf 


data 
systems 


H  E  B  0  1  Babot  (faclory  assembled)  Z 1 4  5  ■. 

ZZ9  Terminal  (DEC  and  ADM  compatidle)  6BD' 

ZT-)  Intelligent  Cominunica lions  Terminal  369 

ZT-IO  Intel  Terminal  with  Serial  Port  340 

Z1 00  I  e-blt/8-lilt  Systems  in  stock  CALL 

We  stock  entire  Zenith  line. 


ATARr 

SPECIALS 

WE  STOCK  ENTIRE  LINE-write  for  prices. 

Software  for  Atari  in  stocic 


215-822-7727 

252  Bethlehem  Pike 
Colmar,  PA  1891 5 


A  B  Computers 


WRITE; FOR  CATALOG.  Add  SI  .50  per  order  for  United  Parcel. 
We  pay  b'alani;e  ol  UPS  surface  shipping  charges  on  all  prepaid  orders 
(add  extra  (or  mail.  .^PO/FPO,  air).  Prices  include  cash  discount. 
JRegular  prices  slightly  higher  Puces  subject  to  change. 


OAK  STAND-C64.  VIC,  Apple,  Atari  29 

Beautiful  ralura!  solid  oak  two-level  slanl  Resis  on  (able 
above  compulef.  Holds  disk  drives/cassetle  deck,  as  well  as 
your  monilof/TV. 

KMMM  Pascal  for  PET/CBM/C64         $79 

A  subset  of  standard  Pascal  wrtti  extensions.  Includes  Macfiine 
Language  Pascal  Source  Editor.  Mac;fiine  Language  P-Code 
Compilef.  P-Code  to  macfiine  language  Iranslatw  fof  optimized 
obiect  code.  Run-time  package,  FkMling  Point  capability.  User 
Manual,  and  sample  programs. 
Flequires  32  K  f!£!5?  specify  configuration. 

EARL  for  PET  (disk  file  based)     $65 

Editor.  AucDkler.  Rdoaler,  Uaktr 

Genefales  relocatable  object  code  using  MOS  Techratogy 

mnenwuca  Disk  file  input  (can  edit  files  largef  than  memory). 


Paper  Clip  (Batteries  Included)     $109 

Extremety  compref)ensive  word  processor  for  Commodote  and 
CommodofE  64  computers.  Has  features  of  WflfdPro,  plus 
a*anccd  fundioiis  tike  Iwnontal  scroll,  column  wcnb,  ookjnm 
aritfimetic,  column  sort  and  cofliprehensr^e  praiter  support^ 

Detphfs  ORACLE  (Batteries  EncJuited)     $125 

Campteliensive  Data  Base,  Reporl  Writer,  Mail  Label  system 
allowing  large  recocd  size  (over  8000  characters)  with  the 
numbef  of  records  in  a  file  limited  only  by  disk  capacity  (7.5 
MB  or)  9090  drive).  Fast  machine  language  loutineSt  including 
full  mulllleve^Mrts__ 

RAM/ROM  for  PET/CBM 

4K  or  SK  bytes  of  soft  ROM  optional  battery 
backup. 

Use  RAM/ROM  as  a  software  development  tool  to  store  data 
or  machine  code  beyond  the  nornial  BASIC  range,  or  to  load  a 
ROM  image  to  avoid  ROM  socket  conflicts.  Possible  appli- 
cations include  machine  language  sort  (such  as  SUPER- 
SORT),  universal  wedge,  Extramon,  etc. 
RAM/ROM  —  4K  $75 
RAM/ROM  -  8K  90 

Batt«y  Baciojp  Option 20 

SUBSORT  for  PET/CBM    $35 

Excellent  general  purpose  machine  language  sort  routine. 

PROGRAM  YOUR  OWN  EfROMS  $75 

Branding  Iron  EPROM  Programmer  lor  PET/CBM  software  for 
all  ROM  versions.  Includes  all  harrtware  and  software  to  pro- 
gram aj^_27J6_and_2^32_EPROMs- 

P0RTMAKERDUALRS232SERIALP0RT    $63 

Two  ports  with  lull  bipolar  RS232  buflering  Baud  rates  from 
30Qjfl_4™.  Fot_PEJ/CB2^^AIM^SYM. 

COMAL  Package  for  CBM  $25 

Includes  software  on  disk,  and  Comal  Handbook 

Superfiraphlcs  2.0 

NEW  Version  with  TURTLE  GRAPHICS 

SuperGraphics,  by  John  Fluharty,  provides  a  4K  machine 
language  extension  wtiich  adds  35  lull  featured  commands  to 
Commodore  BASIC  to  allow  fast  and  easy  plotting  and  man- 
ipulation of  graphics  and  shapes  on  the  PET/CBM  video 
display. 

SOUND  commands  allow  you  to  initiate  notes  or  songs 
from  BASIC,  and  then  play  them  in  the  background  mode 
without  interfering  with  your  BASIC  program. 

Additionally,  seven  new  TURTLE  commands  open  up  a 
whole  new  dimension  in  graphics. 

Specity  machine  model  (and  size).  ROM  type  (BASIC  3 
or  4) 

SuperGraphics  in  ROM  (SAOOO  orS9000)  $45 
Volume  discounts  available  tor  schods 


NEW 
VERSION  2 

noN  fur  C64 


FLEX-F  IL£  is  a  set  of  flexible,  friendly  programs  to  ai  tow  you  to 
set  up  and  maintain  a  iJata  base.  Includes  versalile  Report 
Writer  and  Mail  Label  routines,  anr)  dreumentation  for  pro- 
grammers to  use  Data  Base  routines  as  part  ol  older  pro- 
grams. 

RANDOM  ACCESS  DATA  BASE 
Record  size  limit  is  256  charactas.  The  number  o!  records  per 
disk  is  limited  only  by  record  size  and  free  space  on  the  disk. 
File  maintenance  lets  you  step  forward  or  backward  through  a 
file,  add.  delete,  or  change  a  record,  go  to  a  numbered  recad,  or 
find  a  record  by  specilied  field  (or  partial  field).  Field  lengths 
may  vary  to  altow  maximum  information  packing  Both  sub- 
totals and  sorting  may  be  nested  up  to  5  fields  deep  Any  field 
may  be  speciTied  as  a  key.  Sequential  file  input  and  outpuL  as 
well  as  file  output  in  WotdProand  PaperMatelormat  is  suppor- 
ted. Record  siie,  fields  per  record,  and  order  ol  fields  may  Be 
changed  easily. 
MAILING  LABELS 

Typical  mail  recortts  may  be  packed  3000  per  disk  on  8050 
(140D  in  4040)-  Labels  may  be  printed  any  number  wide,  and 
may  begin  in  any  column  position.  There  is  no  limil  on  the  num- 
ber or  order  Of  fields  on  a  label  and  complete  record  selection 
via  type  code  or  field  corvdition  is  supported 
REPDHT INRITEB 

Flexible  printing  format,  including  field  placement,  decimal 
justification  and  rounding.  Define  any  column  as  a  series  of 
math  or  trig  functions  performed  on  other  columns,  and  pass 
results  such  as  running  total  tram  raw  to  row.  Totafs,  nested 
subtotals,  and  averages  supported  Complete  record  selection, 
including  field  within  range,  pattern  match,  and  logical  func- 
tions can  be  specified. 

FLEX-FILE  2  by  Michael  Riley        $110 

CBM64,  PET/CB^/VIC— 22K,  Disk  SpKity  confi_gu_ration__ 

"SCRTeN  MAKER^cg'rsriiJcrotech)"" i^^^ 

flD  CofuiHi  Attiplcr  Itr  Continodore  M 
Expand  your  computer  for  business  applications.  Provides  80 
column  X  24  fine  display  in  a  2K  video  RAM.  Linking 
software  provided  _ _ 

Copy-Writer  Word  Processor  $69 

Full-featured  professional  word  processor  with  over  BOO  lines 
of  text  per  memory  load  on  C64,  Has  features  not  available  in 
many  word  processors  such  as  double  column  printing,  built  in 
graphic  capability,  shorthand  notations,  and  ability  to  support 
all  printer  codes. 

SPECIAL  COMBINATION  PACKAGE  "  $200 

Includes  SCREEM  MAKER  AND  Copy  Writer  lor  C64 

DISKLLU.  $411 

Intensive  Care  Urit  by  LC.  CarglJe 

COMPLETE  DISK  RECOVERY  SYSTEM  FOR  CBM  DRIVES 

-  edit  disk  btocks  with  ease 

-  duplicate  disks,  skipping  over  bad  blocks 

-  complete  diagnostic  facilities 

-  unscratcb  scratched  files 

-  check  and  correct  scrambled  files 

-  recover  improperly  ckssed  files 

-  extensive  treabnent  of  relative  files 

-  optional  output  to  IEEE488  printer 

-  comprehensive  user  manual  (an  excellent  tutorial  on  disk 
operation  and  theory). 

Furnished  on  copy-protected  disk  with  manual 
Backup  disk  available,  S1 0  additkxial. 

CBM  Sottwin 

PAPER  CLIP  Word  Pn)i»sur  MB 

BASIC  INTEBPRETER  for  CBM  B096  $95 
PEDISK  II  Syitemt  Iroin  cgrs  MicittKh  itniliklt 
FILEX  IBM  374)/2  Biti  Eiclnnge  Soltvirt  milihlL 
JIN  SAM  Diti  Base  MgnagetnenI  System  lor  CBM. 

COPY-WRITER  Wonl  Pntceuor  lor  PET/CBM  $1 59 

CASH  MANAGEMENT  SYSTEM  $45 

Pelspeed  BAS IC  Compiler  1 20 

Integer  BASIC  Compiler  f20 

CM AR  Record  Handler  IfO 

ItCSD  Pascal  (without  board)  135 

Wordcrafl  80  or  809B  265 


FORTH  for  PET  now  for  CB4 

BY  LC.  Cargile  arri  Michael  Riley  $50 

Features  inclwfe: 

full  FIG  FORTH  model 

all  FORTH  79  STANDARD  extensions. 

stmctured  B5D2  Assembler  with  nested  deciskin 

making  macros, 
full  screen  editing  (same  as  when  programming  in 

BASIC), 
auto  repeat  key. 
sample  programs. 

standard  size  screens  (16  lines  by  64  characters). 
150  screens  per  diskette  on  4040.  480  screens  on 

8050. 
ability  to  read  and  mite  BASIC  sequential  tiles, 
introduclcry  manual. 
rplpTPfv^  rriirinii^l 
For  Commodore  64,or  any  16K/32KPET/CBMwrth  ROM  3or 
4,  and  CBM  disk  drive  Please  specify  contiguratkxi  when 
adering 

Melicoflipller  for  FORTH  $30 

Simple  metacompiler  for  creating  compacted  object  code 
which  can  be  mn  independently  (without  FORTH  systjfij__ 

PageMate 

60  COMMAND 

WORD 

PROCESSOR 

by  Michael  Riley 


ftB  m^ 


Paper-Mate  is  a  fulKealured  word  processor  for  Com- 
modore computers  Page-Mate  incorporates  60  commands  to 
give  you  full  screen  editing  with  graphics  for  all!  6K  or  32K 
machines  (including  8032(,  all  printers,  and  disk  or  tapedrives. 
Many  addittonal  features  are  available  (including  most  capa- 
bilities ol  WordPro  3). 

Page-Mjte  functions  with  all  Commodore  machines  with  at 
least  16K,  with  any  printer,  and  either  cassette  or  disk 

To  order  Page-Mate,  please  specify  machine  and  RO  M  type. 
Page-Mate  (disk  or  tape)  for  PET,  CBM,  VIC,  C64 $40 

SM-K1T  fir  PET/CBM  $40 

Enhanced  ROM  based  utilities  (or  BASIC  4.  Includes  both  pro- 
gramming aids  and  ^iskjiandling  commands 

Commodere  64 

Huttr-Kiler  -  CmrmIiii  G4  15 

-  authentic  naval  warfare  game  (complete  vrith  sonar) 
Submarine  Warfare  (Clockwork  Computers)  29 
PAPER  CUP  Wir^  Pnctsnr  109 
BASM  Compiler  and  Assembler  65 
WordPro  3+/64  75 
Vanilla  PILOT  with  Turtle  Graphics  27 

-  also  includes  sound,  ToolkiL  (oystick  support 
Commodore  64  Programmer  Reference  Guide  16 
GCI  Submarine  Warfare  24 
Laser  Command  15 
EAHIY  GAMES  lor  Yooi|  CVUin  ZS 
PETSPEEO  Compiler  C64  120 
CALC  RES  ULT  Srmi  Skoet  Poclnii  1 35 
1 000  M  iles  (M  iiie  Bornes  Game  9 
MIcroCbm  19 
Adventure  (ilisk)  9 
PI10T64  45 
LOGO  64  45 
Eny  Cilc  64  G5 
MAE  Assembler  -  C64  85 
Assembly  Language  Tutorial  -  C54/V1C  27 
Abacus  Software  in  stock 

Synthy-64  nxjsic  and  sound  synthesiser  26 

Tiny  BASIC  Compiler  17 

ScreenGraphics-64  adds  BASIC  Graphics  22 

Draw  Poker  5 


All  Victory  Software  in  stock 


215-822-7727 

252  Bethlehem  Pike 
Colmar,  PA  1891 5 


A  B  Computers 


WRITE  FOR  CATALOG.  Add  SI. 50  per  order  for  United  Parcel. 
We  pay  balance  of  UPS  surface  sfiipplng  charges  on  all  prepaid  orders 
(add  extra  for  mail.  APO/FPO,  air).  Prices  include  cash  discount. 
Regular  prices  sligfitly  fiigfier  Prices  subject  to  cfiange. 


Bagets 

90  REM  BAGELS  ML 

100  DATA  169, 0,141, 64, 2, 238, b4, 2, 173, 64, 2 

,201,10,240,5,32,81,3,208,241,96 
110  DATA  9,48,32,210,255,169,32,32,210,25 

5,162,0,142,65,2,142,66,2,142,67,2 
120  DATA  32,228,255,201,65,144,249,201,71 

,176,245,32,210,255,174,67,2 
130  DATA  238,67,2,157,76,2,189,68,2,157,7 

2,2,224,3,208,223,189,72,2 
140  DATA  221,76,2,208,11,238,65,2,169,0,1 

57,72,2,157,76,2,202,16,234,160,0 
150  DATA  162,0,185,72,2,240,16,221,76,2,2 

08,11,238,66,2,169,0,153,72,2 
160  DATA  157,76,2,232,224,4,144,230,200,1 

92,4,144,223,162,0,169,32 
170  DATA  32,210,255,189,65,2,9,48,32,210, 

255,232,224,2,144,238 
180  DATA  169,13,32,210,255,173,65,2,201,4 

,96 
200  FOR  J=a28  TO  990 
210  READ  X:  T=T+X 
220  POKE  J,X 

230  NEXT  J:  IF  T<>18169  THEN  STOP 
240  PRINT  "BAGELS" 

250  PRINT  "..  GUESS  MY  SECRET  CODE" 
260  PRINT  "..  I'LL  TELL  YOU  HOW  MANY" 
270  PRINT  "..  EXACT  MATCHES  AND  OTHER" 
280  PRINT  " . .  MATCHES  YOU  GET ..." 
290  X=RND{0) 
300  FOR  J=0  TO  3 
310  X=INT(RND(l)*6)+65 
320  POKE  580+J,X 
330  NEXT  J 
340  SYS  828 
350  IF  PEEK (577) =4  THEN  PRINT  "GOT  ITr':G 

OTO  400 
360  PRINT  "THE  CODE  WAS;  " ; 
370  FOR  J=0  TO  3 
380  PRINT  CHR$(PEEK(580+J)); 
390  NEXT  J:  PRINT 

400  INPUT  "WANT  ANOTHER  GAME"rX$ 
410  IF  X$="Y"  OR  X$="YES"  GOTO  300      © 


New  VIC-20  based  monitor/control  system 
for  Home,  Industialfi  Laboratory  applications. 

Model  VM1000  is  a  7  slot  card  cage  utilizing 
both  User  &  Expansion  port  and  includes: 

VM101'  buffered,  6-slot  cartridge  mother 

VM201'  24K  RAM  expansion 

VM301  12  bit  DAC;  8  channel  MUX;  8  bit  ADC 

Personal  S5S5 

Comput:er  Specialties 
P.O.  Box  23,  Fleming,  Pa.  16835 

"Motherboards RAM  can  be  plugged  directly 
into  VIC  &  are  available  separately. 
VM101    $87         Pa.res.add  60/0  sales  tax. 
VM201    $115 
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Telecommunications 


with  a  difference! 

Unexcelled  communications  power  and 
compatibility,  especially  for  professionals  and 
serious  computer  users.  Look  us  over;  SuperTerm 
isn't  just  "another"  terminal  program.  Like  our 
famous  Terminal-40,  it's  the  one  others  will  be 
judged  by. 

•  UP/DOWMLOAD  FORMATS  -CBM,  Xon-Xoff, 
ACK-NAK,  etc. 

■  DISPLAY  MODES  -  40  column:  80/132  with 
side-scrolling 

'   EMULATIOW  —  42  popular  terminal  protocols 

■  FUWCTIOrj  KEYS -8  Standard.  52  user-defined 

•  BUFFERS  — Receive,  Transmit,  Program,  and  Screen 

•  EDUIIMG  —  Full-screen  editing  of  Receive  buffer 

•  FILE  COMVERSION- ASCII  to  PGM,  PGM  to  ASCII 

•  PRINTING  —  Continuous  printing  with  Smaa  ASCII 
and  parallel  printer;  Buffer  printing  with  other  interfaces 
or  VIC  printer 

•  DISK  SUPPORT-  Directory,  Copy,  Rename,  Scratch, 
etc. 

•  FLEXIBILITY— Select  baud,  duplex,  parity,  stopbits,  etc. 

Program  options  are  selected  by  menus  and  function 
keys.  For  maximum  convenience,  an  EXEC  file  sets 
options  on  start-up.  SuperTerm  may  be  backed-up  for 
safety.  Software  on  disk  or  cassette,  with  special 
cartridge  module. 

Write  for  the  full  story  on  SuperTerm;  or,  if  you 
already  want  that  difference,  order  todayl 

Requires:  Commodore  6«  or  VIC-20.  disk  drive  or  Datasette,  and 
compatiOle  modem  VIC  versior  requires  I6K  memory  expansran.  Please 
specify  VIC  or  64  when  ordering 

Just  need  UP/DOWNLOAD? 

If  you  don't  yet  need  SuperTerm 's  power,  perhaps 
Terminal-40  Plus  |VIC)  or  '64  Terminal  Plus  is  right  for 
you.  We  took  our  top-rated,  smooth-scrolling  terminal 
programs,  added  up/download,  disk  commands,  and 
even  more  convenience.  Then  we  put  them  on  disk  for 
fast  loading,  just  like  you  wanted.  Need  we  say  more? 

Only  549.95  (Vk:  version  requires  SK  rnem  expl 

PS.  Trade  in  your  original  Terminal-40  or  '64  TerminaJ  and 

deduct  S  J  0.00. 
VIC  20  and  Commodore  64  are  traderrsarks  of  Commodore  Electfonios,  Ud. 

'ly'in  7o/\n  Send  for  a  free  brochura 

^  MAIL  ORDER:  Add  S1.60  shipping  and 

MimVITCT  '™^""9  C*3.™  '"  C.O.D.):  VtSAMastBToard 

nil/ W C3  I  iKcepled  (card#  and  exp.  date).  MO  residenis 

Ml^9n  "dd  5,625%  sales  tax.  Foreign  ordars  payable 

'  "^"W  Inc.  uss,  U.S.  Bank  ONLY:  add  $5  shp/hndlfl. 

311  WEST  72nd  ST.  •  K/vNSAS  CITY  •  MO  •  64114 


FLOPPY  DISKS  SALE 
*$1.19  ea. 

Economy  Model  or  Cadillac  Quality 

V^e  have  the  lowest  prices! 


Total  Price 
Total  Price 


$119.00 
13.90 


•  Automatic  dust  remover 


ECONOMY  DISKS 

Good  quality  5V4"  single  sided  single  density  with  hub  rings. 

Bulk  Pac  100  Qty.  $1.19  ea, 

10  Qty.  1.39  ea. 

CADILLAC  QUALITY 

•  Each  disk  certified      •  Free  replacement  lifetime  warranty 

For  those  who  want  cadillac  quality  we  have  the  Loran  Floppy  Disk.  Used  by  professionals  because  they  can  rely 
on  Loran  Disks  to  store  important  data  and  programs  without  fear  of  loss!  Each  Loran  disk  is  100%  certified  (an 
exclusive  process)  plus  each  disk  carries  an  exclusive  FREE  REPLACEMENT  LIFETIK^E  WARRANTY.  With  Loran 
disks  you  can  have  the  peace  of  mind  without  the  frustration  of  program  loss  after  hours  spent  m  program 
development. 

tOO%  CERTIFICATION  TEST 

Some  floppy  disk  manufacturers  only  sample  test  on  a  batch  basis  the  disks  they  sell,  and  then  claim  they  are 
certified.  Each  Loran  disk  is  individually  checked  so  you  will  never  experience  data  or  program  loss  during  your 
lifetime! 

FREE  REPLACEMENT  LIFETIME  WARRANTY  ^    , 

We  are  so  sure  of  Loran  Disks  that  we  give  you  a  free  replacement  warranty  against  failure  to  perform  due  to  faul- 
ty materials  or  workmanship  for  as  long  as  you  own  your  Loran  disk. 

AUTOMATIC  DUST  REMOVER  ^  ^^     ^, 

Just  like  a  record  needle,  disk  drive  heads  must  travel  hundreds  of  miles  over  disk  surfaces.  Unlike  other  floppy 
disks  the  Loran  smooth  surface  finish  saves  disk  drive  head  wear  during  the  life  of  the  disk.  (A  rough  surface  will 
grind  your  disk  drive  head  like  sandpaper).  The  lint  free  automatic  CLEANING  LINER  makes  sure  the  disk-killers 
{dust  &  dirt)  are  being  constantly  cleaned  while  the  disk  is  being  operated.  PLUS  the  Loran  Disk  has  the  highest 
probability  rate  of  any  other  disk  in  the  industry  for  storing  and  retaining  data  without  loss  for  the  life  of  the  disk. 

Loran  is  definitely  the  Cadiliac  disk  in  the  worid 

Just  to  prove  it  even  further,  we  are  offering  these  super  LQ^  INTRODUCTORY  PRICES 
List  $4.99  ea.     INTRODUCTORY  SALE  PRICE  $2.99  ea.  (Box  of  10  only)  Total  price  $29.90 

$3.33  ea.  (3  quantity)  Total  price  $9.99 

All  disks  come  with  hub  rings  and  sleeves  in  an  attractive  package. 

RANKING  FOR  BEST  PERFORMANCE 


MEASUREMENTS 

LORAN 

Verbatim 

Ultra 

3M 

Amplitude 

2 

3 

3 

Missing  bit  ratio 
(reliability) 

3 

3 

2 

Extra  bit  rate 

2 

1 

3 

Modulation 

3 

2 

2 

Running  torque 

1 

1 

2 

LORAN  beats  the  competition  cold!! 


Add  S3.00  for  postage.  Add  S6.00  for  CANADA,  PUERTO  RICO,  HAWAII 
orders.  WE  DO  NOT  EXPORT  TO  OTHER  COUNTRIES. 
Enclose  Cashiers  Cfieck,  Money  Order  or  Personal  Check.  Allow  14 
days  for  delivery,  2  to  7  days  for  pfione  orders,  1  day  express  mail! 
Canada  orders  must  be  in  U.S.  dollars.  We  accept  Visa  and  Master- 
Card. 


pKIT:CDpQI7F§    (WCLOVf DuncUSIOUERS) 

BOX  550,  BARRINGTON,  ILLINOIS  SOOIO 
Phon*  312/3a2'5244  to  order 


PROGRAMMING  THE  Tl 


C  Regena 


Playing  Music 
On  The  Tl 


Musicians,  rejoice!  Here  is  a  computer  that  plays 
music.  You  can  play  a  single  tone  to  tune  an  in- 
strument or  get  a  pitch  for  a  song,  or  you  can  play 
complex  rhythms  with  three-part  harmony.  Com- 
pose to  your  heart's  content  and  let  the  computer 
perform  your  masterpiece. 

Nonprofessional  musicians  -  if  you'd  like  to 
learn  more  about  music,  your  computer  can  be  a 
great  teacher.  Learn  the  notes  on  a  keyboard, 
learn  to  read  music,  learn  definitions,  or  learn  to 
distinguish  chords.  The  computer  with  music 
capabilities  makes  learning  fun. 

For  those  of  you  who  prefer  not  to  write  your 
own  programs,  the  Tl  Music  Maker  command  mod- 
ule is  available.  Here's  a  quick  review.  You  may 
compose  music  by  choosing  various  types  of  notes 
or  rests  (quarter,  eighth,  half,  etc.)  and  placing 
them  on  the  staff.  Choose  notes  for  accompani- 
ment if  you  wish.  Build  a  song  a  measure  at  a 
time.  The  computer  makes  sure  the  timing  works 
out  correctly.  Oh  yes,  you  can  choose  your  key 
signature,  time  signature,  and  tempo.  At  any 
time  you  can  play  or  edit  your  composition,  then 
save  it  on  cassette  or  disk  if  you  like. 

Another  section  of  the  module  is  made  espe- 
cially for  nonmusicians.  You  may  draw  lines  up 
and  down  the  screen  at  different  levels  for  a 
"sound  graph,"  then  hear  the  computer  play  re- 
lational tones.  Add  second  and  third  voices  if  you 
wish.  This  command  module  is  really  quite  versa- 
tile with  many  options  and  can  help  you  learn 
about  music. 

CALL  SOUND 

To  program  your  own  music  on  the  Tl,  use  the 
CALL  SOUND  statement.  The  basic  form  is 

CALL  SOUND(duMfion,  frequency,  volume) 

The  duration  is  a  numeric  expression  (number, 
variable,  or  algebraic  expression  which  will 
evaluate  to  a  number)  which  is  the  number  of 
milliseconds  you  wish  to  play  the  tone.  For  exam- 
ple, 1000  would  be  one  second.  The  number  may 
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be  from  1  to  4250  or  from  -4250  to  -1. 

The  frequency  is  a  numeric  expression  that 
indicates  what  tone  to  play.  The  frequency  is  the 
cycles  per  second  and  may  be  from  110  to  44733, 
which  is  from  low  A  on  the  bass  staff  to  out-of- 
human-hearing  range.  The  "Musical  Tone  Fre- 
quencies" table  in  the  Appendk  of  the  User's  Ref- 
erence Guide  lists  the  musical  notes  with  the  cor- 
responding frequencies.  Note  that  you  can  specify 
numbers  that  are  between  the  normal  musical 
tones. 

The  volume  is  a  numeric  expression  that  indi- 
cates loudness.  The  volume  may  vary  from  0  to 
30,  where  0  is  the  loudest.  The  volume  also  de- 
pends on  the  audio  setting  of  your  monitor  or 
television,  but  you  can  control  relative  volumes  of 
the  tones  with  this  parameter. 

Try  this  command; 

CALL     SOUND (500, 440, 2) 

The  computer  plays  the  tone  of  A  (440)  for  500 
milliseconds  (half  a  second)  at  a  volume  level  of  2. 

Now,  if  you  want  to  tune  your  band  instru- 
ment, just  run  this  program. 

440, 0} 


100 
1  10 


CALL 
GOTO 


SOUND (4250. 
100 


You  may  specify  one,  two,  or  three  notes  to 
be  played  in  one  CALL  SOUND  statement.  Each 
statement  has  one  duration,  then  a  frequency 
with  a  volume  for  each  note  desired.  Here  is  an 
example  of  the  three  notes  in  the  C  major  chord: 

CALL     SOUND (1000, 262 , 6, 330, 4 , 392 , 2 ) 

The  chord  will  play  for  1000  milliseconds.  The 
notes  played  are  C  at  a  volume  6,  E  at  a  volume  4, 
and  G  at  a  volume  2.  Try  a  few  chords  with  differ- 
ent frequency  and  volume  numbers. 

If  you  play  a  solo  instrument,  you  might  enjoy 
programming  the  computer  to  play  the  accompa- 
niment chords.  Tune  your  instrument  with  the 
computer,  then  you  can  play  with  the  computer 
as  your  accompanist. 


Using  Sheet  Music 

If  you  use  three  tones  in  the  CALL  SOUND  state- 
ment, they  may  be  in  any  order.  I  like  to  use  the 
first  frequency  and  volume  as  the  melody  tone, 
then  the  second  and  third  frequencies  and  vol- 
umes as  the  accompaniment  tones.  This  way  I 
can  keep  track  of  which  number  is  the  melody. 
Also,  if  I  start  to  run  out  of  memory  in  a  piece,  I 
can  go  back  to  the  CALL  SOUND  statements  and 
delete  accompaniment  tones  by  keeping  only  the 
first  frequency  and  volume  in  each  statement. 

You  may  work  from  a  copy  of  written  music 
to  try  out  the  musical  capabilities  of  the  TI.  The 
top  note  is  usually  the  melody.  You  may  choose 
any  two  notes  written  directly  under  the  melody 
note  for  the  accompaniment  or  the  other  two  notes 
in  your  CALL  SOUND  statement.  To  emphasize 
the  melody,  use  a  louder  volume  for  the  melody 
note  and  softer  volumes  for  the  accompaniment 
notes.  For  example: 

CALL     SOUND(400,262, 1, 196,6, 157, 8) 

If  you  have  two  CALL  SOUND  statements 
together  which  specify  the  same  frequencies  and 
volumes,  the  notes  may  sound  like  one  long  note 
rather  than  two  separate  notes.  To  make  the  notes 
sound  distinct,  just  change  the  volume  number 
for  one  of  the  notes: 

300  CALL  SOUND (200, 262, 2, 1V6, 6, 165, B) 
310  CALL  SOUND<200,262, 3, 196, 6, 165, 8) 

To  make  a  bass  note  sound  tied  or  held  while 
two  different  melody  notes  are  played,  keep  the 
frequency  and  the  volume  numbers  the  same  in 
both  statements: 

500  CALL  SOUND (300, 262, 2, 165, 8> 
510  CALL  SOUND (300, 330, 2, 165, B) 

Other  statements  may  be  executed  while  a 
note  is  being  played.  You  may  define  graphics, 
draw  graphics,  or  make  calculations  between 
CALL  SOUND  statements.  This  feature  allows 
you  to  have  fun  choreographing  pictures  with 
music  to  present  a  musical  dramatization.  You  do 
need  to  experiment  so  you  don't  get  too  many 
statements  between  the  music  statements  or  there 
will  be  gaps  in  the  music. 

A  note  will  keep  playing  for  its  specified  du- 
ration, and  the  computer  will  execute  statements 
until  either  the  duration  runs  out  or  another  CALL 
SOUND  statement  is  encountered.  If  another 
CALL  SOUND  statement  needs  to  be  executed, 
the  computer  waits  until  the  first  duration  is 
finished  before  starting  the  next  sound.  If  you 
prefer  to  have  the  computer  go  ahead  with  the 
next  sound  statement,  use  a  negative  number  for 
the  second  statement's  duration.  Here  is  an 
example. 

100  CALL  SaUND<200,392, 2) 


110  CALL  SOUND  (200, 330, 2) 

120  CALL  SOUND C200, 262,2) 

130  CALL  SOUND £200, 330, 2) 

140  CALL  SOUND £400, 392, 2) 

150  END 

The  computer  starts  with  the  tone  of  G  and  plays 
for  200  milliseconds.  Next  the  tone  of  E  plays  for 
200  milliseconds,  then  C  for  200  milliseconds, 
then  E  for  200  milliseconds,  then  G  for  400  milli- 
seconds. During  the  last  note  the  program  will 
end,  but  the  note  will  keep  playing  for  the  400 
milliseconds. 

Now  change  to  negative  durations  in  hnes 
110-140: 


100 
1  10 
120 
130 
140 
150 


CALL 
CALL 
CALL 
CALL 
CALL 
END 


SOUND  £200,  392, 2) 
SOUND £-20  0, 330, 2) 
SOUND (-200, 262, 2) 
SOUND (-200, 3  30, 2) 
SOUND (-400, 3  92, 2) 


This  time,  the  computer  starts  by  playing  G.  As 
soon  as  the  computer  comes  to  line  110,  a  CALL 
SOUND  statement  with  a  negative  duration,  the 
computer  immediately  starts  the  new  sound  -  no 
matter  what  the  previous  duration  was.  Line  140 
starts  the  sound  of  G  as  soon  as  the  computer 
comes  to  that  statement,  then  continues  the  sound 
for  400  milliseconds  since  there  is  not  a  following 
sound  statement  with  a  negative  duration.  Try 
running  these  two  programs  to  hear  the  difference. 

A  technique  I  like  to  use  in  programming 
music  is  to  use  a  variable  name  for  the  duration, 
and  specify  the  numeric  value  of  that  duration 
variable  near  the  beginning  of  the  program.  For 
example,  1  often  use  T  for  "tempo"  or  "time"  or 
M  for  "metronome  marking"  or  N  for  "note."  If  I 
use  T  to  represent  the  duration  for  a  quarter  note, 
then  T/2  would  be  an  eighth  note  and  4*T  would 
be  a  whole  note.  You  can  get  exact  timing  in 
your  music  and  let  the  computer  calculate  the 
durations. 

Note:  Avoiding  using  Q  for  "quarter  note," 
especially  on  the  TI-99/4,  because  the  key  combi- 
nation of  SHIFT  Q  is  "quit."  This  is  comparable  to 
the  FCTN  (quitting  on  the  TI-99/4A).  An  accidental 
SHIFT  Q  will  wipe  out  your  program  and  return 
to  the  title  screen.  With  a  shifted  parenthesis  be- 
fore the  variable  and  a  shifted  comma  after  the 
variable,  it's  too  easy  to  get  an  accidental  SHIFT  Q. 

Variable  Durations 

Another  advantage  to  using  a  variable  duration  is 
that  you  can  write  your  song  in  terms  of  the  vari- 
able, then  change  the  tempo  of  the  song  by  chang- 
ing only  one  line  (the  line  defining  the  duration) 
rather  than  each  CALL  SOUND  statement.  Here 
is  a  short  example. 

100  T=400 

110  CALL  SOUND (T, 262, 2) 

120  CALL  SOUND (T, 274, 2) 
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130 
140 
l7i0 
160 
170 
1B0 
190 

100 
110 
120 
130 
140 
150 
160 
170 
180 


CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
END 


SOUND (2*T, 330 , 2) 
S0UND(3*T/4,349,2) 
SOUND  tT/4, 392, 2) 
SOUND (T/2, 440, 2) 
SOUND (T/2, 494, 2) 
SOUND ( T*4, 523,  1  ) 


Duration  of  quarter  note  =  400 

Quarter  note 

Quarter  note 

Half  note 

Dotted  eighth  note 

Sixteenth  note 

Eighth  note 

Eighth  note 

Whole  note 


RUN  the  program .  Now  change  line  100  to  T  =  800. 
The  song  is  twice  as  long,  but  each  note  stays  in 
the  exact  proportion.  Change  line  100  to  T  =  200. 
The  song  is  faster,  but  still  in  proportion. 

If  you  need  to  learn  a  song  with  a  difficult 
rhythm,  program  the  computer  to  play  the  song. 
Use  a  variable  such  as  T  for  the  duration.  You  can 
set  the  duration  to  a  slower  note,  then  as  you 
learn  the  song  you  can  speed  it  up  by  changing 
just  the  one  line. 

You  may  prefer  to  use  variables  for  the  dif- 
ferent kinds  of  notes  in  this  manner: 


100 

T  =  400 

I    10 

E  =  T./2 

120 

H  =  T*2 

130 

CALL     SOUND (H, 

2) 

140 

CALL     SOUNDCE, 

494, 

3  ) 

150 

CALL     SOUND<E, 

440, 

3) 

160 

CALL     SOUND(T, 

392, 

2) 

100 

Quarter  note  duration 

110 

Eighth  note 

120 

Half  note 

You  may  also  want  to  set  up  a  list  of  variables 
for  the  note  names  before  you  use  them  in  CALL 
SOUND  statements: 

100  T=400 

110  C=262 

120  D=294 

130  E=330 

140  CALL  S0UND(T,E,2) 

150  CALL  S0UND(T,D,2) 

160  CALL  SDUND<T,C,2) 

You  may  also  use  a  variable  for  the  volume, 
such  as  CALL  SOUND(T,D,V). 

Just  as  in  other  programming,  vou  can  use 
FOR-NEXT  loops  and  GOSUB  and  GOTO  state- 
ments to  help  write  your  music.  For  example,  if 
you  have  a  musical  phrase  between  repeat  bars, 
you  can  use  a  FOR-NEXT  loop  to  play  it  twice.  If 
you  have  a  common  phrase  used  several  times 
within  a  song,  use  a  GOSUB  procedure. 

Beethoven  Medley 

The  following  program,  "Ludwig,"  illustrates  the 
use  of  CALL  SOUND  statements  to  create  a  med- 
ley of  familiar  Beethoven  pieces.  Line  120  sets  the 
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duration  of  a  quarter  note  to  400  milliseconds  for 
the  first  tune,  an  excerpt  from  "Ode  to  Joy"  of  the 
Ninth  Symphony.  Lines  170-660  play  this  melody. 
In  between  the  CALL  SOUND  statements  are 
graphics  statements.  Lines  180-340  define  graphics 
characters  and  colors,  then  later  CALL  HCHAR 
and  CALL  VCHAR  statements  draw  a  picture. 
The  CALL  SOUND  statements  in  lines  170-400 
illustrate  the  "tied"  bass  note,  or  a  bass  note  held 
while  two  melody  notes  are  played.  Most  of  the 
notes  are  quarter  notes,  but  line  610  has  a  dotted 
quarter  note,  line  650  has  an  eighth  note,  and  line 
660  has  a  half  note. 

Line  860  resets  the  duration  variable  T  to  200 
milliseconds.  This  time  T  represents  an  eighth 
note  for  phrases  from  "Ecossaises."  The  excerpt 
here  is  taken  from  music  that  is  within  repeat  bars 
but  has  a  first  ending  and  a  second  ending.  The 
common  part  of  the  repeat  is  in  the  subroutine  at 
lines  1860-2230.  Line  890  GOSUB  1860  plays  the 
common  phrase,  then  lines  920-980  play  the  first 
ending.  Line  1010  repeats  the  common  phrase 
with  GOSUB  1860,  then  lines  1040-1100  contain 
the  second  ending. 

Lines  1260-1420  play  the  third  melody,  "Fiir 
Elise."  This  example  shows  GOSUB  commands 
within  a  FOR-NEXT  loop.  The  subroutine  for  the 
common  notes  is  contained  in  lines  2240-2420. 

The  final  melody  (lines  1430-1840)  is  an  ex- 
cerpt from  the  second  movement  of  Beethoven's 
Fifth  Symphony.  Line  1430  defines  the  new  dura- 
tion T  to  be  800  milliseconds  for  an  eighth  note  at 
an  andante  tempo.  U  is  defined  as  three-fourths 
of  an  eighth  note,  or  a  dotted  sixteenth  note.  T/4 
is  used  for  a  thirty-second  note.  Character  128  is 
defined  as  a  graphic  musical  note,  and  the  em- 
bedded CALL  HCHAR  statements  among  the 
CALL  SOUND  statements  place  the  notes  on  the 
screen. 

Line  1850  (GOTO  1850)  holds  the  picture  on 
the  screen.  Press  CLEAR  (FCTN  4  on  the  TI-99/4A 
or  SHIFT  C  on  the  TI-99/4)  to  stop  the  program. 

If  you  prefer  to  save  the  typing  time,  you  can 
obtain  a  copy  of  this  program  by  sending  $3,  a 
stamped,  self-addressed  mailer,  and  a  blank  tape 
or  disk  to:  REGENA,  P.O.  Box  1502,  Cedar  City, 
UT  84720.  Please  specify  the  name  of  the  program. 

Ludwig 

100  REM   BEETHOVEN  MEDLEY 

110  REM 

120  T-=400 

130  CALL  CLEAR 

140  CALL  BCREEN(3) 

150  PRINT  TAB <6) ; "BEETHOVEN  MEDLEY" 


160  CALL 

170  CALL 

130  CALL 

> 


COLOR (1,2,8) 

SOUND  (T, 330, 2,  131,6) 

CHAR<96, "FFFFFFFFFFFFFFFF' 


190 

CALL 

) 

CHAR  (97,  "FF7F3F1F0F07  0301  ■■ 

770  CALL  HCHARC I , A, 97) 

780  CALL  HCHAR ( I , A+1 , 96, B) 

200 

CALL 

SOUND  fT,  330, 3,131,6) 

790  CALL  HCHAR ( I , A+B+1 , 98) 

210 

CALL 

CHAR  (98,  '■FFFEFCFBF0E0C0S") 

300  NEXT  I 

220 

CALL 
CALL 

CHAR ( 104, "FFFFFFFFFFFFFFFF 

810  DATA  12,9,9,14,7,18,6,20,4,24,3 
320  CALL  HCHAR ( 1 , 1 , 96,94) 

230 

SOUND  CT, 349, 3,  131,6) 

240 

CALL 

CHAR ( 105, "0103070F1F3F7FFF 

830  CALL  HCHAR (3, 31 , 98) 

"  ) 

840  CALL  HCHAR (2, 32, 32) 

250 

CALL 

CHAR(106, "S0C0E0F0F8FCFEFF 

850  CALL  HCHAR ( 1 , 32, 98) 

"  ) 

860  T 

=  200 

260 

CALL 

SOUND (T,392,2, 13  1,6) 

870  CALL  COLOR (2, 16, 3) 

270 

CALL 

CHAR ( 120, "00003C3E3E1E0F03 

880  CALL  COLCR( 12, 3, 3) 

"  > 

890  GOSUB 

1860 

280 

CALL 

CHAR  <  121  ,  ■'003a78F8F8F0C0BC 

9>3  0     C 

ALL  HCHAR  (3,6,  120) 

"  ) 

910  CALL  HCHAR (3, 7, 121 > 

290 

CALL 

SOUND (T, 3  92,3, 147, 6) 

920  CALL  SOUND (T, 466, 3, 1 17, S> 

300 

CALL 
"  ) 

CHAR  (  1  13,  ■'FF7F3F1F0F070301 

930  CALL  HCHAR(4, 6, 122) 
940  CALL  HCHAR (4, 7, 123) 

310 

CALL 

CHAR  (114,  ■■FFFEFCF3F0E0C08" 

950  CALL  SOUND (T, 831, 4, 698, 8) 

) 

960  CALL  HCHAR (5, 10, 120) 

320 

CALL 

S0UND(T,349,3, 147, 6) 

970  CALL  HCHAR (5, 1 1 , 121 ) 

330 

CALL 

COLOR (10, 8,8) 

980  CALL  SOUND (T*2, 831, 3, 698, 7, 233, 

340 

CALL 

COLOR (11,3,11) 

9) 

350 

CALL 

SOUND (T, 330, 3, 147, 6) 

990  CALL  HCHAR(6, 10, 122) 

360 

CALL 

VCHAR ( 13, 15, 104, 7) 

1000 

CALL 

HCHAR (6, 11, 123) 

370 

CALL 

VCHAR ( 13, 16, 104, 7) 

1010 

BOSUB 

1860 

380 

CALL 

VCHARC 13, 17, 104, 7) 

1020 

CALL 

HCHAR (2, 15, 120) 

390 

CALL 

VCHAR  i 13,  IS,  104, 7) 

1030 

CALL 

HCHAR (2, 16, 121 ) 

400 

CALL 

SOUND «T, 294, 3, 147, 6) 

1040 

CALL 

SOUND (T, 349, 3, 294, 7, 117,9 

410 

CALL 

HCHAR«19, 14, 105) 

) 

420 

CALL 

HCHAR  < 19,  19,  106) 

1050 

CALL 

HCHAR (3, 15, 122) 

430 

CALL 

HCHAR<20, 13, 105) 

1060 

CALL 

HCHAR(3, 16, 123) 

440 

CALL 

HCHAR (20, 14, 104, 7) 

1070 

CALL 

S0UND(T,466, 3) 

450 

CALL 

HCHAR (20, 21 , 106) 

10  80 

CALL 

HCHAR (4,26, 120) 

460 

CALL 

SOUND (T, 262, 2, 165, 6) 

1090 

CALL 

HCHAR (4,27, 121) 

1  100 

CALL 

SOUND  (T*2,466,2,294,6, 233 

470 

CALL 

HCHAR (21 , 1 1 , 105) 

,8) 
CALL 

480 

CALL 

HCHAR (21 , 12, 104, 10) 

1110 

HCHAR (5, 26, 122) 

490 

CALL 

HCHAR(21 ,22, 106) 

1  120 

CALL 

HCHAR (5, 27, 123) 

500 

CALL 

SOUND (T, 262,3, 165,7) 

1  130 

CALL 

COLOR (12,16,3) 

510 

CALL 

HCHAR (22, 9, 105) 

1140 

CALL 

HCHAR (6, 20, 120) 

520 

CALL 

HCHAR(22, 10, 104, 14) 

1  150 

CALL 

HCHAR (6,21, 121 ) 

530 

CALL 

HCHAR(22,24, 106) 

1  160 

CALL 

HCHAR (7, 20, 122) 

540 

CALL 

SOUND (T, 294,2, 175, 6) 

1  170 

CALL 

HCHAR (7, 21 , 123) 

550 

CALL 

HCHAR<23,7, 105) 

1  180 

CALL 

HCHAR (8, 16, 120) 

560 

CALL 

HCHAR (23,8, 104, 18) 

1190 

CALL 

HCHAR (8,  17,  121 ) 

570 

CALL 

HCHAR (23,26, 106) 

1200 

CALL 

HCHAR (9, 16, 122) 

580 

CALL 

SOUND (T,330,2, 17  6,5) 

1210 

CALL 

HCHAR (9,17, 123) 

590 

CALL 

CHAR< lis, "80A2A2AAEEEFFFFF 

1220 

CALL 

HCHAR(2,22, 120) 

"  ) 

1230 

CALL 

HCHAR (2, 23, 121 ) 

6  00 

CALL 
) 

CHAR(99, "S0A2A2AAEEEFFFFF" 

1240 

CALL 

HCHAR (3, 22, 122) 

1250 

CALL 

HCHAR (3, 23, 123) 

610 

CALL 

SOUND  ■;T*1  .  5,  29  4,  2,  19  6,  7) 

1260 

FOR  : 

[=1  TO  2 

620 
630 

CALL 
CALL 

HCHAR (24, 1 , 99, 32) 

CHAR (122, "0F3F7F7D790101 " ) 

1270 

12  80 

GOSUB  2240 

CALL  SOUND (T. 415. 3) 

640 

CALL 

CHAR  (  123,  "FEFE9EC0E0E(.iiE0E" 

1290 

CALL 

SOUND (T, 494,3) 

) 

1300 

CALL 

SOUND  CT, 5  23, 2,  1 10,  15) 

650 

CALL 

SOUND (T/2, 262, 3, 196,7) 

1310 

CALL 

SOUND (T, 165,4) 

660 

CALL 

SOUND  (2  *t',  262,  4,  165,  7,  13  1  , 

13  2  0 

CALL 

SOUND  ■:  T,  220,4) 

8) 

1330 

CALL 

SOUND (T, 330. 3) 

670 

CALL 

COLOR (9,3,8) 

1340 

GOSUB  2240 

680 

CALL 

COLOR (10, 11,8) 

690 

CALL 

HCHAR (24, 6, i 15, 22) 

1350 

CALL 

S0UND<T,523,3) 

700 

CALL 

HCHAR< 12, 15, 113,2) 

1360 

CALL 

SOUND (T, 494, 4) 

710 

CALL 

HCHAR-;  12,  17,  114,2) 

1370 

CALL 

SOUND (T, 4  4  0, 4, 110, 14) 

720 

CALL 

HCHAR( 1 1, 13,97) 

1380 

CALL 

SOUND  (T,  165,  10) 

730 

CALL 

HCHAR< 11,14, 96, 6) 

1390 

CALL 

SOUND (T,220,7) 

740 

CALL 

HCHAR (11, 20, 98) 

1400 

NEXT 

I 

750 

FDR 

1=10  TO  4  STEP  -1 

1410 

CALL 

SOUND (T, 330, 6) 

760 

READ 

A,  B 

1420 

CALL 

SOUND (T«3, 440, 6) 
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1430 

T  =  800 

1440 

U=T«3/4 

1450 

CALL 
■') 

CALL 

CHAR (129, "0S0C0A0ft0a73Fa7 

1460 

COLOR (13,2,6) 

1470 

CALL 

SOUND ( 1 , 9999, 30) 

1480 

CALL 

SOUND (U, 156, 6 ) 

1490 

CALL 

COLOR (1,2,6) 

1500 

CALL 

COLOR ( 9, 3, 6) 

1S10 

CALL 

COLOR  (  10,  1  1  ,  6,- 

1520 

CALL 

SOUND (T/4, 208, 5) 

1530 

CALL 

SOUND  CT, 262,3) 

1540 

CALL 

HCHAR ( 17, 4, 128) 

15  50 

CALL 

SOUND (U, 262, 4) 

1560 

CALL 

HCHAR ( 15, 8. 128) 

1570 

CALL 

SOUND (T/4, 233, 4) 

1580 

CALL 

SOUND (U, 208, 3) 

1590 

CALL 

HCHAR ( 13, 12, 128) 

160  0 

CALL 

SOUND (T/4, 262, 4) 

1610 

CALL 

SOUND (T+U, 175,3, 13 

9,10) 

1620 

CALL 

HCHAR (13,21, 128) 

16.30 

CALL 

SOUND (T/4, 220, 3) 

1640 

CALL 

SOUND (U, 233, 3) 

165  0 

CALL 

HCHAR  (  15,  25,  128) 

1660 

CALL 

SOUND  (T/4, 262,  2) 

1670 

CALL 

SOUND (U, 277, 2, 233, 

8) 

168  0 

CALL 

HCHAR  (17, 29,  123) 

169  0 

CALL 

SOUND  (T/4, 262, 3) 

1700 

CALL 

S0UND<U,233, 2. 196, 

8) 

1710 

CALL 

SOUND (T/4, 277, 2) 

17  20 

CALL 

SOUND (U, 196, 2, 156, 

B) 

17  30 

CALL 

SOUND  (T/4, 233 , 2) 

1740 

CALL 

SOUND(U,  165, 3,  131  , 

8) 

1750 

CALL 

SOUND  (T/4,  196, 3) 

1760 

CALL 

SOUND (T+U, 262, 2) 

177  0 

CALL 

SOUND (T/4, 233, 4) 

178  0 

CALL 

SOUND (U, 220, 4, 175, 

10) 

1790 

CALL 

SOUND  (T/4,  175,  4) 

180  0 

CALL 

SOUND  (U, 233,2,  1 17. 

10) 

1810 

CALL 

SOUND (T/4, 277, 3) 

1820 

CALL 

SOUND (U, 196, 4, 156, 

10) 

1830 

CALL 

SOUND (T/4, 156, 4) 

184  0 

CALL 

SOUND (2«T, 203, 2) 

185  0 

BOTO 

1850 

18  60 

CALL 

BDUND(T,392,3, 156, 

8) 

1B70 

CALL 

HCHAR  (2,2,42) 

1830 

CALL 

SOUND (T, 466, 3> 

1890 

CALL 

HCHAR (4, 29, 42) 

1900 

CALL 
,8) 

SOUND (2f T, 466, 2, 23 

3, 6, 196 

1910 

CALL 

HCHAR (6, 14, 42) 

1920 

CALL 

) 

CALL 

SOUND (T, 523, 3, 392, 

6, 156, a 

1930 

HCHAR (3, 1 1 , 42) 

1940 

CALL 

SOUND (T, 466, 3) 

1950 

CALL 

HCHAR (2, 26, 42) 

I960 

CALL 
,8) 

SOUND (T*2, 466, 2, 39 

2, 6, 196 

1970 

CALL 

HCHAR (3, 4, 42) 

1930 

CALL 

> 

CALL 

SOUND (T, 622, 1 , 392, 

6, 156, 8 

1990 

HCHAR  (2,  19, 42) 

2  00  0 

CALL 

SOUND (T, 466, 2) 

2010 

CALL 

HCHAR (7, 23, 42) 

2020 

CALL 
,8) 

SOUND (T*2, 466, 1,39 

2,5, 196 

2030 

CALL 

HCHAR(3, 12,42) 

2040 

CALL 

) 

CALL 

SOUND (T, 523, 1 , 392, 

5, 156, a 

2  05  0 

HCHAR  (9,  19,42) 

2060 

CALL 

B0UND(T,466,3) 
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2070 
2080 

2  09  0 
2100 

2110 
2  120 
2  136! 
2140 

2150 
2160 

2  170 
2180 

2  190 

2200 

2210 

2220 

2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
23  10 
2320 
23  3  0 
2340 
2350 
2  360 

23  7  0 
2330 
2390 
2400 

24  10 
2420 
2430 


CALL 

CALL 

,3) 

CALL 

CALL 

) 

CALL 

CALL 

CALL 

CALL 

,  8) 

CALL 

CALL 

) 

CALL 

CALL 

CALL 

,8) 

CALL 

) 

CALL 

CALL 

,8) 

RETU 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

RETU 

END 


HCHAR(6, 7, 42) 

SOUND (T*2, 466, 2, 392, 5, 196 

HCHAR (5, 24, 42) 
SQUNDiT,349, 1,294,5, 117,8 

HCHAR (5,  17,42) 

SOUND (T, 466, 3 ) 

HCHAR (2,9,42) 

S0UND(T*2,4  66,2,294,6, 175 

HCHAR (4, 20, 42) 

SOUND (T, 392, 2, 31 1,5,117,8 

HCHAR (2, 30, 42) 
SOUND (T, 466, 3) 
SOUND  (T*2, 466, 2,  31 i  ,  7,  196 

SOUND <T, 415, 5, 349,6, 117,8 


SOUND 
SOUND 

RN 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 
SOUND 

RN 


(T, 466, 4) 

(T*2, 466. 3, 3  49, 6, 20  8 


(T 

(T 
<T 
(T 
(T 
(T 
(T 
(T 
(T 
(T 
(T 
<T 
(T 
(T 
(T 
(T 
(T 
(T 


659, 6) 
622, 6) 
659, 6) 
622, 5) 
659, 4) 

494. 3) 
5B7, 4 ) 
5  2  3,5) 
440, 6, 
165, 8) 
2  20, 6) 

262. 4) 
330, 4) 
440, 4) 
494, 4, 
165, 4) 
203, 4) 
ZZ0, 4) 


110, 15) 


131  ,  15) 


r 

I 

I 

I 

I 

I 

I 

I 

I 
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Paga  after  page  of  hard-to-fInd  preci- 
sion tools,  test  equipment,  computer 
accessories  and  equipment.  Send  for 
your  fre«  copy  todayl 

Name 


Company 
Address 


Jensen  Tools  Inc. 
7815  S.  46th  St 
Phoenix,  AZ  SS040 


City. 


State  . 


Zip- 


Invisible  Disk  Directory 
For  VIC  And  64 


Kevin  E  Gough 


If  you  have  a  VIC  or  64  and  a  2540  or  1541  disk  drive, 
this  utility  program  can  be  very  helpful.  Once  loaded,  a 
simple  SYS  828  will  let  you  display  your  disk  directory 
yet  retain  a  program  in  memory. 


The  "Invisible  Disk  Directory  Loader"  is  not  really 

invisible.  It  only  seems  to  be.  A  BASIC  program 
POKEs  the  loader  into  the  cassette  buffer  as 
machine  language.  Beginning  at  828  ($033C)  and 
ending  at  971  ($03CB),  the  loader  uses  144  bytes. 
A  knowledge  of  BASIC  is  all  you  need  to  enter 
and  use  this  program. 

Using  The  "Invisible"  Loader 

If  it  were  not  for  Jim  Butterfield's  article,  "The 
Confusing  Catalog"  (COMPUTE!,  March  1983),  I 
probably  would  not  have  written  the  loader.  I 
saw  how  easily  he  could  load  the  disk  directory 
from  a  program,  as  a  file.  Just  OPEN  1,8,0,"$0"  , 
input  the  bytes,  do  some  manipulation,  and  there 
you  have  it.  With  the  Invisible  Directory  Loader, 
you  can  display  the  directory  and  have  any  pro- 
gram in  memory  at  the  same  time.  You  will  no 
longer  have  to  LOAD"$",8  as  a  program,  just 
type  SYS  828  and  press  RETURN.  The  directory 
of  your  disk  scrolls  onto  the  screen.  Use  the  CTRL 
key  to  slow  the  scroll  when  listing  programs,  or 
press  the  space  bar  to  stop  the  listing. 

This  program  will  also  give  you  the  number 
of  blocks  each  file  uses  and  the  number  of  blocks 
free  on  your  disk.  The  directory  cannot  be  listed 
on  your  printer. 

You  can  also  load  and  save  cassette  programs 
and  not  destroy  the  loader  in  the  cassette  buffer. 
This  is  because  the  loader  also  changes  the  start 
of  the  cassette  buffer  pointer  at  178  ($B2)  for  you. 
Where  it  used  to  be  60  ($3C),  it  is  now  204  ($CC), 
thus  the  buffer  now  starts  at  972  ($03CC). 

Loading  Hints 

After  loading  a  program  from  cassette,  you  will 
get  a  load  error.  This  can  be  remedied  with  POKE 
45,PEEK(174):  POKE  46,PEEK(175).  This  indicates 
to  the  VIC  or  64  the  end  of  your  program  or  the 


start  of  variables.  Data  files  will  not  load  properly 
with  the  Invisible  Loader  in  place. 

If  you  SYS  828  and  your  disk  drive  is  not  on, 
then  nothing  will  happen.  Turn  the  drive  on  and 
an  error  message  appears  on  the  screen.  You  must 
restore  the  VIC  or  64  by  pressing  the  STOP  and 
RESTORE  keys.  Insert  a  disk,  type  SYS  828,  RE- 
TURN, and  there  it  is.  If  you  do  not  have  a  disk  in 
the  drive,  then  the  red  light  will  tJash.  The  screen 
will  also  scroll  up  with  nothing  on  it.  STOP/ 
RESTORE,  insert  a  disk,  and  type  SYS  828.  Before 
running  it,  be  sure  to  save  a  copv  to  your  disk  or 
cassette.  Call  it  "DIR". 

I  use  this  disk  utility  more  than  any  other. 
Rarely  do  I  LOAD  "$",8.  I  just  load  "DIR",8  and 
run  it  and  forget  about  it.  It  really  seems  invisible. 

If  you  would  rather  not  type  in  the  program, 
I  have  the  VIC  version  available.  Send  a  blank 
cassette,  an  SASE  mailer,  and  $3  to; 

Kevin  Gough 

24  Daisy  Lane 

Wappifigers  Falls,  NY  12590 

Invisible  Disk  Directory 

10  1=828 

20  READ  A: IF  A=256  THEN  40 

30  POKE  I,A:I=I+L:GOT0  20 

40  IF  PEEK(65440)=135  THEN  POKE  924,189:REM 

924  HOLDS  221  ON  VIC,  189  ON  64 
828  DATA  169,1,32,195,255,169,36 
835  DATA  141,240,3,169,48,141,241 
842  DATA  3,169,1,162,8,160,0 
849  DATA  32,186,255,169,2,162,240 
856  DATA  160,3,32,189,255,32,192 
863  DATA  255,169,64,32,144,255,162 
870  DATA  1,32,198,255,32,144,255 
877  DATA  32,207,255,32,207,255,32 
884  DATA  207,255,32,207,255,201,0 
891  DATA  240,58,32,204,255,32,228 
898  DATA  255,201,32,208,3,32,196 
905  DATA  3,162,1,32,198,255,32 
912  DATA  207,255,168,32,207,255,72 
919  DATA  152,170,104,32,205,221,169 
926  DATA  32,32,210,255,32,207,255 
933  DATA  201,0,208,8,169,13,32 
940  DATA  210,255,76,115,3,32,210 
947  DATA  255,76,162,3,169,1,32 
954  DATA  195,255,32,204,255,169,204 
961  DATA  133,178,96,32,228,255,201 
968  DATA  32,208,249,96,256  © 
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COMMODORE  64 

80  COLUMN  BOARD 


$149.00 


The  dream  of  seeing  80  columns  on  the  screen  at  one  time  Is  now  a  reality. 
The  Protecto  Expansion  Board  converts  your  Commodore  64  to  80  col- 
umns! PLUS  you  get  a  word  processor  with  database  mallmerge,  an  elec- 
tronic spreadsheet,  and  a  terminal  emulator.  List  $249.  SALE  $149. 

When  you  buy  any  monitor  —  Commodore  64  Computer  —  Disk  Drive  - 
Printer!  80  Column  Board  purchased  alone  —  Cost  $169.00.  (Disk  Pro- 
grams add  $10.00). 


80  COLUMN  MONfTOR  SALE 

9'  Screen  -  Green  Text  Display 
12"  Scrren  -  Green  Text  Display  (and  reflective  screen) 
12"  Screen  -  Amber  Text  Display  (anti  reflective  screen) 
14"  Screen  -  Color  Text  Display 


VIC  20  COMPUTER  40-80  COLUMN  BOARD  LIST  $149.00  SALE  $89.00 


•  IS  DAY FREB  TRIAL 

•  WE  HAVE  LOWEST  COMMODORE  64  PRICES 

•  WE  HAVE  OVER  500  PROGRAMS 

•  VISA  •  MASTERCHARGE  •  COD 

•  WE  LOVE  OUR  CUSTOMERS 
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^|^^^f^pf^|2^§    (WE  LOVE  OUn  CUSTOMERS) 

BOX  550,  8ARRINQT0N,  ILLINOIS  60010 
Phont  312/382-5244  to  ordtr 


VIC  20 

40-80  COLUMN  BOARD 

only  ^  8  9 «" 


Now  you  can  get  40  or  80  Columns  on  your  T.V.  or  monitor  at  one  time!  No  more 
running  out  of  line  space  for  programmmg  and  making  columns.  Just  plug  in  thiis 
board  and  you  immediately  convert  your  VIC-20  computer  to  40  or  80  columns! 
PLUS,  you  get  a  Word  Processor,  Mail  Merge  program,  Electronic  Spreadsheet  (like 
VISICALC)  and  Termmat  Emulator!  These  PLUS  programs  require  only  8K  RAM 
memory  and  comes  in  an  attractive  plastic  case  witti  instructions. Lis[$149  SaleS99 


"15  DAY  FREE  TRIAL" 

•  We  have  the  lowest  VIC-20  prices 

•  We  have  over  500  programs 

•  Visa  -  Mastercharge  -  C.O.D. 

•  We  love  our  customers! 


£1^    I    £RPR|2ES     (WEI-OVEOURCUSTOMEFIS) 

BOX  550,  HARRINGTON,  ILLINOIS  60010 
Phon«  312/382-5244  to  ordtr 


MAKE  YOUR  VIC-20 
COMPUTER  TALK         °**^ 

when  you  plug  in  our        ^  Q  Jf  ^^ 

VOICE  SYNTHESIZER 

You  can  program  an  unlimited  number  of  words  and  sentences  and  even  adjust  volume  and  pitch. 
You  can  m2tke:         •  Adventure  games  that  talk        •  Real  sound  action  games 

This  voice  synthesizer  Is  VOTRAX  based  and  has  features  equivalent  to  other  models  costing  over 
$370.00.  To  make  programming  even  easier,  our  unique  voice  editor  will  help  you  create  words  and 
sentences  with  easy  to  read,  easy  to  use  symbols.  The  data  from  the  voice  editor  can  then  be  easily 
transferred  to  your  own  programs  to  make  customized  talkies. 


"15  DAY  FREE  TRIAL" 

•  We  have  the  lowest  VIC-20  prices 

•  We  have  over  500  programs 

•  Visa  —  Mastercharge  —  C.O.D. 

•  We  love  our  customers! 


ENTERPRIZES  (*«i-ovEouncusTo«ew) 

BOX  550,  BARRINGTON,  ILLINOIS  60010 
Phone  312y362-5244  to  order 


A  Multicolor 
Atari  Character  Editor 


Charles  Brannon,  Program  Editor 


This  program  makes  colorful  anhnation  easy  and  fun. 
You  II  find  "ANTIC  Aerobics"  to  be  an  invaluable  fool 
for  ZLKvking  zoith  four-color  characters.  There's  also  a 
submarine  chase  game  to  illustrate  these  techniques,  an 
entertaining  game  in  its  own  right. 


Remember  the  last  time  you  played  an  arcade 
game?  You  probably  controlled  a  realistic-looking 
ship,  plane,  race  car,  or  even  a  Q*bert.  If  you  tried 
to  program  such  a  game  and  ended  up  discour- 
aged, here's  the  answer.  Using  one  of  the  Atari's 
least  used  (and  possibly  most  interesting)  graphics 
modes,  you  can  animate  multicolor  objects  with 
simple  PRINT  statements. 

If  you've  been  programming  for  a  while,  you 
know  about  most  of  the  Atari's  14  graphics  modes 
(17  if  you  count  GTIA  modes).  For  example, 
GRAPHICS  8  is  the  high-resolution  screen  with 
the  smallest  controllable  "dots."  GRAPHICS  3 
uses  the  least  memory  and  gives  you  four-color 
graphics  in  a  40x24  format  (each  "dot"  is  as  large 
as  the  text  cursor).  And  there  are  the  text  modes, 
such  as  GRAPHICS  1  (double-wide),  GRAPHICS 
2  (double-wide  and  twice  as  high  as  normal  text), 
and  of  course,  GRAPHICS  0,  the  normal  white-on- 
blue  text  screen. 

Silicon  Symbiosis 

All  these  graphics  modes  are  supported-by  the 
ANTIC  chip,  which  has  been  called  a  video 
microprocessor.  ANTIC's  job  is  to  tell  the  GTIA, 
an  essentially  "dumb"  chip,  how  to  display  a  TV 
screen.  Your  job  is  to  tell  the  ANTIC  how  to  format 
a  screen.  Fortunately,  the  Atari's  operating  system 
already  knows  how  to  set  up  graphics  screens  for 
the  ANTIC. 

But  this  doesn't  mean  that  you  can't  "do  it 
yourself."  In  fact,  it's  rather  easy  to  create  your 
own  custom  screens  with  all  kinds  of  graphics 
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modes  mixed  together.  Although  we  won't  go 
into  detail  here,  you  can  refer  to  Craig  Chamber- 
lain's "How  to  Design  Custom  Graphics  Modes" 
in  COMPUTE!' s  First  Book  of  Atari  Graphics  if  you'd 
like  more  information. 

Hidden  IVIodes 

ANTIC  can  generate  more  graphics  modes  than 
most  people  think.  For  example,  there  is  a  special 
variation  on  GRAPHICS  0  that  lets  you  design 
characters  within  a  9x8  matrix  for  true  descenders 
(the  "tail"  on  a  g,j,p,q,  or  v).  There's  a  special 
graphics  mode  "between"' GRAPHICS  7  and 
GRAPHICS  8  that  is  a  four-color  mode  with  a 
resolution  of  160x192  (some  call  it  GRAPHICS  VVi). 

ANTIC  4  And  5 

However,  let's  limit  ourselves  here  to  the  five-color 
character  modes.  In  GRAPHICS  1  and  2,  you  get 
four  colors  of  text  (for  example.  A,  a,  inverse  A, 
and  inverse  a).  Each  character  can  have  a  different 
color,  but  you  can  have  only  64  characters,  and 
you  are  limited  to  one  color  per  character.  But 
two  special  ANTIC  modes,  ANTIC  4  and  ANTIC 
5  (or  IRG  4  and  5  according  to  the  hardware  man- 
ual), allow  four  colors  per  character. 

Unfortunately,  the  use  of  these  modes  is  not 
intuitively  obvious.  It  helps  if  you  know  binary 
(base  two  arithmetic).  You  don't  really  have  to 
understand  how  to  program  characters  in  these 
modes  to  write  games  with  them,  as  long  as  you 
have  a  utility  to  do  it  for  you  ("ANTIC  Aerobics," 
found  at  the  end  of  this  article).  But  for  those  with 
an  inclination  to  understand  the  details,  the 
following  discussion  should  be  illuminating. 
Otherwise,  you  can  skip  ahead  to  "Using  The 
Program." 

Assumptions 

Let's  start  by  making  a  few  assumptions  for  the 


sake  of  brevity:  that  you  understand  binary  num- 
bers, know  how  to  create  custom  character  sets, 
understand  the  relationship  between  COLOR 
and  SETCOLOR,  and  have  a  good  working  knowl- 
edge of  BASIC. 

You  know  that  when  defining  a  normal  Atari 
character  you  get  eight  bits  or  pixels  horizontally 
and  eight  bytes  vertically.  The  letter  A  would  be 
defined  in  binary  as  (we'll  use  open  boxes  for  zeros, 
and  solid  squares  for  ones): 


all  the  colors  in  a  single  character.  For  example, 
here's  an  A  with  its  left  side  in  COLOR  1,  the 
right  side  in  COLOR  2,  and  the  top  and  middle 
segment  in  COLOR  3.  To  the  right  is  the  same 
character  with  bit  pattern  00  shown  as  a  period, 
bit  pattern  01  as  an  *,  bit  pattern  10  as  an  @,  and 
bit  pattern  11  as  a  #: 


. .oo. . . 
. oooo. . 

DO. . OO. 

oo . . oo . 
oooooo. 
oo. . oo. 


M 


s  n  : 


I  I  I  I  I  I  I 


o. ooooo. 

D.  .  .  •  •  O. 
O O. 

O. OOOOO. 

a o. 

o. .  . .  .o. 


3K  -   .  ^ 

«:  -  -  a> 


Every  bit  represents  one  pixel  (picture  element, 
or  "dot").  In  the  multicolor  modes,  it  takes  two 
bits  to  represent  four  colors  (00,01,10,11),  so  the 
bits  are  "paired  up."  You  still  use  only  one  byte 
per  line,  so  you  get  only  four  pixels  horizontally, 
although  you  still  get  eight  lines  vertically.  Since 
the  size  of  the  character  is  the  same  as  a  GRAPHICS 
0  character  (in  ANTIC  4),  this  implies  that  each 
pixel  is  twice  as  wide  as  a  single-color  pixel. 

If  you're  using  a  standard  character  editor 
such  as  SupcrFont  or  Instedit,  you  must  remind 
yourself  that  you  must  reserve  two  bits  per  pixel. 

When  designing  a  four-color  character,  use 
the' following  combinations: 

CD  (00)  =  background  color  (COLOR  0,  SETCOLOR  4) 

□■  (01 » =  COLOR  1  (SETCOLOR  0) 

HD  (10)  =  COLOR  2  (SETCOLOR  1) 

^1  (11)  =  COLOR  3  (SETCOLOR  2) 

In  addition,  if  you  print  the  character  in  inverse 
video,  the  COLOR  3  bit  pattern  (binary  11)  will  be 
displayed  with  the  color  in  the  fourth  color  register 
(SETCOLOR  3).  Here's  what  three  different 
colored  A's  would  look  like: 


oooooo 
oo. .oo 

DO . . oo 

oooooo 
oo. . oo 
oo. . oo 


o.  o.  o. 
,  o.  .  . o. 

o.  •  . o . 
,  o.  o.  o. 
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Now  there's  nothing  to  keep  you  from  combining 


If  you  try  to  program  other  shapes,  however, 
such  as  an  alien  invader  or  a  race  car,  you  will 
find  that  you  need  more  than  one  character  per 
shape.  Four  pixels  don't  give  you  much  to  work 
with.  But  if  you  put  two  characters  side  by  side, 
you're  backln  eight-bit  business.  As  long  as  you're 
doing  that,  you  can  create  matrices  of  two-by-two 
characters,  or  any  size  you  like.  You  can  create 
"building  block"  characters,  "primary"  shapes 
that  you  use  to  build  larger  objects.  But  if  you  try 
to  make  larger,  more  complex  "pictures,"  you'll 
probably  discover  that  the  task  of  designing  each 
character  and  piecing  the  characters  together  can 
be  rather  maddening.  That's  where  ANTIC 
Aerobics  comes  in. 

Using  The  Program 

ANTIC  Aerobics  lets  you  draw  a  free-hand  shape 
or  picture  that  is  32  pixels  wide  and  16  pixels  high. 
You  can  then  "compile"  the  shape  into  a  set  of  16 
characters.  You  display  the  shape  as  two  rows  of 
eight  characters.  If  you  put  the  shape  into  the 
character  set  on  top  of  the  alphabet,  you  could 
show  it  on  the  screen  with  a  statement  like: 

200  PRINT  "ABCDEFGH": PRINT  "IJKLMNOP" 

You  can  also  place  each  shape  into  a  string. 
When  you  PRINT  the  string,  the  shape  appears. 
The  string  is  made  of  eight  characters,  a  cursor 
down,  and  eight  cursor-lefts  to  back  up  the  cursor 
under  the  first  eight,  then  eight  more  characters. 
Following  the  COMPUTE!  listing  conventions,  it 
would  look  like: 

C$= " ABCDEFGH {DOWNJ [8  LEFT J GH IJKLMNOP" 

If  you  also  had  a  string  filled  with  blanks  (eight 
spaces,  cursor  down,  eight  cursor-lefts,  and  eight 
spaces),  you  could  PRINT  the  blank  string  on  top 
of  the  shape  to  blank  it  out.  Animation  made 
simple!  Program  2  is  a  submarine  game  using 
shapes  developed  with  ANTIC  Aerobics.  Take  a 
look  at  the  line-by-line  explanation  for  more  ideas 
on  animation. 
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Display  List  Dickering 

To  go  into  the  special  ANTIC  modes  4  or  5,  you 
have  to  change  the  display  list.  Fortunately,  this 
is  fairly  simple  with  a  mode  4  display;  you  just 
change  all  the  2's  in  the  display  list  to  4's.  You  can 
also  POKE  in  5's  for  the  double-height  ANTIC  5 
mode.  These  two  lines  will  do  either  one: 

ANTIC  4: 

GRAPHICS    0:DL=PEEKC560)+256*PEEK{561)+4 
FOR    1=2    TO    24: POKE    DL+I,4:NEXT    I j POKE    DL- 
1,68 

ANTIC  5: 

GRAPHICS    0 : DL=PEEK ( 560 ) +256*PEEK { 561 ) +4 
FOR    1=2    TO    12: POKE    DL+I,5:NEXT    I: POKE    DL- 
1,69  ■ 


You  might  also  want  to  disable  the  cursor  with 
POKE  752,1. 

How  To  Use  ANTIC  Aerobics 

Use  a  joystick  to  draw.  Press  the  trigger  to  set  a 
point  in  the  current  color.  To  change  colors,  press 
either  0,1,2,  or  3  (0  is  used  to  erase).  If  you  want 
to  change  a  color,  hold  down  SHIFT  and  type  the 
number  key.  You  will  see  a  cursor  above  a  16-color 
bar  (GTIA  only;  you'll  see  16  densities  of  vertical 
lines  if  you  have  a  CTIA,  but  you  can  still  use  the 
program).  Move  the  joystick  left  or  right  to  the 
color  you  want.  Then  push  up  or  down  to  change 
the  luminance  (brightness).  When  you're  through, 
press  the  trigger. 

There  are  several  other  commands  to  make 
drawing  easier  and  more  fun.  For  example,  to 
draw  a  line  between  two  points,  press  P  to  set  the 
first  point  (think  "Plot"),  then  move  the  cursor  to 
the  second  spot  and  press  D  ("Drawto").  If  you 
move  the  cursor  again  and  press  D,  another  line 
will  emanate  from  the  original  center  point.  If  you 
want  to  draw  from  one  line  to  another  without 
having  to  reset  the  starting  point,  use  CTRL-D. 
Each  time  you  press  CTRL-D,  a  line  will  be  drawn 
from  the  last  line.  This  makes  it  easy  to  draw  lines 
at  odd  angles. 

What  if  the  cursor  is  too  fast  for  you?  The 
M  command  will  give  you  a  cursor  speed  from 
0  (fast)  to  9  (slow).  Just  press  M  and  then  the  ap- 
propriate number  key. 

You  can  also  use  the  insert  line  and  delete 
line  key  (SHIFT-INSERT,  SHIFT-DELETE)  to  in- 
sert or  delete  lines. 

Use  the  S  and  L  keys  to  either  SAVE  a  shape 
or  LOAD  one  previously  saved.  Enter  the  com- 
plete filename,  i.e.,  C:  for  tape,  or  D:  name  for 
disk.  If  you  see  an  error  message,  like  "ERROR 
162  ON  SAVE",  press  a  key  to  try  again.  The  SAVE 
command  will  not  work  until  you  "compile"  the 
shape  with  the  C  key  (see  below),  since  it  SAVEs 
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the  character  bytes,  which  aren't  defined  until 
you  compile  the  shape.  You  can  use  the  I  (Index) 
command  to  view  the  disk  directory.  Press  a  key 
after  each  displayed  name  to  view  the  next. 

When  you  press  C,  the  computer  will  scan 
the  picture  you've  drawn  and  convert  it  into  16 
characters.  It  will  then  show  you  what  the  picture 
would  look  like  in  ANTIC  modes  4  (top)  and  5 
(bottom).  To  the  right  is  the  shape  drawn  in  in- 
verse video,  so  all  bit-pair  three's  will  be  in  another 
color  (usually  pink).  Notice  that  ANTIC  mode  5 
has  vertical  pixels  twice  as  high  as  ANTIC  5  -  in 
fact,  each  pixel  is  the  same  size  as  a  GRAPHICS  7 
pixel.  What  we've  got  is  GRAPHICS  7  resolution 
(or  better)  without  the  exorbitant  memory 
consumption. 

DATA  Creator 

The  last  option  lets  you  create  DATA  statements 
from  the  characters  you've  defined.  As  with  the 
SAVE  command,  you  can  write  data  only  after 
you've  compiled  the  shape.  You  will  be  asked  to 
choose  at  which  line  number  you  want  to  start 
the  DATA  statements  and  the  filename  for  the 
program  you  want  to  create. 

The  Atari  will  then  write  a  series  of  line  num- 
bers and  DATA  statements  to  tape  or  disk.  To 
merge  these  lines  later  with  vour  own  programs, 
use  the  ENTER  command  (ENTER  "D:name"  or 
ENTER"C:").  You  have  to  write  the  lines  that 
READ  the  data  and  POKE  it  into  your  character 
set  wherever  you  want  it  to  go  (also  see  Program 
2).  Since  each  shape  requires  16  characters,  you 
can  fit  eight  shapes  into  one  character  set. 

If  you  ever  get  stuck,  the  program  has  a  built- 
in  Help  function  that  gives  a  quick  reference  list 
of  the  commands.  Press  H,  "?",  or  the  Help  key 
on  the  1200XL.  The  commands  will  be  given  one 
at  a  time  at  the  bottom  of  the  screen.  Press  a  key 
to  advance  each  command.  When  you're  ready  to 
exit  the  program,  press  CTRL-Q. 

Sub  Attack  Program  Analysis 

Here's  a  line-by-line  explanation  of  "Sub  Attack" 
(Program  2).  We'll  look  at  its  structure  in  some 
detail  as  well  as  explore  some  programming  tips 
and  tricks. 

Line  130:  Lines  580-890  are  the  initialization 
routine.  SUBS  keeps  track  of  how  many  "lives" 
you  have.  Line  575  prints  from  one  to  three  mini- 
ature subs  at  the  bottom  of  the  screen.  Each  mini- 
sub  is  formed  from  custom  characters. 

Line  140:  This  line  clears  out  applicable  vari- 
ables at  the  start  of  each  game. 

Line  150:  This  is  part  of  the  main  loop.  The 
hardware  random  number  generator  is  used 
(53770)  to  decide  on  a  50/50  chance  whether  or 
not  to  put  a  ship  on  the  screen.  Ships  are  always 
spaced  at  least  ten  characters  apart.  Since  each 


ship  is  eight  characters  long  {including  spaces), 
the  closest  two  ships  would  be  is  two  spaces. 

Line  160:  Here,  one  of  the  ships  is  picked. 
The  characters  for  the  ships  are  stored  in  a  string. 
The  statement  is  equivalent  to  R  =  INT(4*RND(1))* 
2. 

Line  170:  POKE  766,1  disables  cursor  controls, 
since  some  of  the  ships  contain  control  characters 
which  PRINT  would  execute  instead  of  display. 

Line  180:  This  is  the  first  line  in  the  main  loop. 
It  continually  checks  to  see  if  the  high  score  has 
been  topped.  HSCR  is  initialized  to  500  in  line 
590.  If  the  high  score  is  beat,  a  special  subroutine 
is  called,  but  (due  to  BEAT)  only  once  per  game. 

Line  190:  This  checks  for  a  change  in  the  score. 
Many  different  routines  add  to  or  subtract  from 
the  score,  so  this  one  statement  is  responsible  for 
noting  a  change  from  the  previous  score  (OPTS, 
for  "Old  Points")  and  updating  the  score  line. 
The  POSITION  statement  centers  the  score. 

Line  200:  If  there  is  no  mine  falling,  and  if  the 
number  in  the  hardware  random  number  gener- 
ator is  greater  than  200  (a  55/255  chance),  then  a 
mine  position  is  chosen.  If  MS  =  0,  no  mine  will 
fall.  Otherwise,  MS  holds  the  offset  from  the 
upper-left  corner  of  screen  memory. 

Line  210:  First,  we  reset  766,  so  we  can  execute 
control  characters.  This  one  line  is  the  core  of  a 
tricky  animation  technique.  Instead  of  moving 
each  ship  by  drawing  and  erasing,  each  ship  is 
placed  at  the  right  of  the  screen.  The  CHR$(254)'s 
are  CTRL-DELETEs,  which  pull  the  line  to  the 
left.  By  PRINTing  two  of  these,  we  can  "scroll" 
the  line  to  the  left.  It's  possible  to  use  INSERTS  to 
push  a  line  to  the  right. 

Line  220:  It's  preferable  to  use  short  variables 
like  JS  (joystick)  and  FB  (fire  button)  than  the 
longer  statements  over  and  over  again. 

Line  230:  FB  =  0  if  the  button  is  pressed .  If  no 
torpedo  is  in  "flight,"  then  we  set  one  up.  IfTORP 
is  zero,  no  torpedo  will  be  displayed  or  updated. 
Otherwise,  TORP  holds  the  actual  screen  memory 
location  of  the  torpedo.  FIRSTMOVE  is  set  when 
the  player  makes  any  move,  such  as  moving  the 
sub  or  firing  a  torpedo.  FIRSTMOVE  is  used  to 
disable  the  mines  falling  until  the  player  has  begun 
to  move.  POKE  77,0  kills  attract  mode. 

Line  240:  JS  is  used  as  an  index  into  an  array 
containing  -I's,  O's,  and  +  I's.  The  appropriate 
offset  (  +  1  for  7,  right,  -1  for  11,  left)  is  added  to 
the  X  (horizontal)  position  of  the  submarine.  Only 
nonzero  offsets  are  accepted,  so  the  sub  is  always 
moving. 

Line  250:  Similar  to  240,  except  for  the  vertical 
position  of  the  sub.  We  also  have  a  check  for  the 
START  button  here  in  case  the  player  wants  to 
restart  the  game  in  progress. 

Line  260:  If  the  submarine  moves  up  or  down, 
or  changes  direction,  we  erase  the  submarine 


before  the  new  one  is  PRlNTed. 

Line  270:  The  submarine  horizontal  variable, 
SUBX,  is  updated  and  checked  for  wraparound. 
A  single  phrase:  SUBX  =  32-ABS(SUBX)  will  re- 
verse the  illegal  -1  and  32  to  the  legal  31  and  0. 

Line  280:  If  the  vertical  variable  is  out  of  range, 
we  just  remove  the  offset. 

Line  290:  SUB$  contains  the  characters  for 
both  directions  of  the  submarine.  The  characters 
include  a  leading  space  if  the  sub  is  moving  right, 
and  a  trailing  space  if  the  sub  is  moving  left.  The 
leading  or  trailing  space  erases  the  previous  char- 
acter when  the  sub  moves,  without  having  to 
erase  the  whole  submarine  (which  is  somewhat 
"flickery"). 

Line  300:  This  is  the  routine  for  moving  the 
falling  mine.  If  no  mine  is  selected,  then  it's 
skipped. 

Line  310:  First,  we  erase  the  previous  mine  (if 
any).  The  mine  is  two  characters  wide,  so  this 
makes  things  complicated.  The  next  position  of 
the  mine  is  found  by  adding  40  (each  screen  line 
is  40  characters  long)  to  the  mine  position.  If  the 
mine  has  hit  the  bottom  of  the  screen,  it  is  removed 
from  execution  (since  it  hasn't  hit  anything). 

Line  320:  Shorthand,  again.  Using  LOC  over 
and  over  again  is  shorter  than  using  SCR  +  MS. 
SCR  holds  the  starting  address  of  screen  memory. 
We  "look  ahead"  before  we  POKE  in  the  mine's 
characters  to  check  for  a  "collision." 

Line  330:  If  nothing  is  hit  (PEEK  returned  a 
zero  for  SPACE),  the  mine  is  POKEd  into  its  new 
position,  and  we  go  on  to  the  next  routine  at  480 
(which  updates  the  torpedo). 

Line  340:  Sound  effect  and  explosion  time. 
We  assume  we've  hit  the  submarine  or  a  torpedo. 
Color  register  three  is  POKEd  with  random  colors, 
causing  anything  on  the  screen  drawn  using  this 
register  to  flash  and  glow.  The  sixtieth  of  a  second 
timer  is  set  to  zero. 

Line  350:  A  loop  to  wait  a  sixtieth  of  a  second. 
Not  really  necessary,  but  we  want  to  slow  down 
this  part  because  the  game  was  compiled. 

Line  360:  EXL(0-3)  contains  the  left  side  of 
three  explosion  scenes,  and  EXR(0-3)  holds  the 
right  side.  The  sound  effect  is  arbitrary,  but  the 
volume  is  stepped  progressively  down. 

Line  370:  The  mine  is  now  removed. 

Line  380:  If  the  mine  hit  a  torpedo,  then  both 
the  torpedo  and  the  mine  are  removed,  and  the 
player  gets  100  points. 

Lines  390-410:  Otherwise,  the  sub  was  hit, 
and  we  flip  it  back  and  forth  to  illustrate  its 
demise. 

Line  415:  One  less  submarine,  but  was  it  the 
last? 

Line  420:  Not  if  this  line  is  executed.  The 
"dead"  sub  is  erased,  and  some  variables  are  reset. 
Line  575  updates  the  number  of  little  submarine 
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symbols  displayed. 

Line  430:  Start  of  the  "game  over"  section. 
Check  for  high  score. 

Line  440:  Mode  2  without  text  window.  Turn 
off  display  list  interrupt  (to  be  safe).  Messages. 

Line  450:  Score  line.  Notice  that  all  four  colors 
are  used,  upper/lowercase,  inverse  and  normal 
video. 

Line  460:  A  loop  to  wait  for  either  START  or 
the  fire  button  to  be  pressed. 

Line  470:  Kill  attract  mode  again,  restart  the 
game. 

Line  480:  Check  to  see  if  we  should  move  the 
torpedo. 

Line  490:  Erase  the  old  torpedo,  if  indeed  the 
torpedo  was  where  it  should  be  (sometimes  the 
scroll  routine  will  pull  a  ship  into  the  space  where 
the  torpedo  was). 

Line  500:  Move  the  torpedo  up  (minus  40 
characters  per  line).  Check  to  see  if  the  torpedo 
has  gone  off  the  "top"  of  the  ocean.  If  so,  deduct 
ten  points,  but  don't  let  the  score  fall  below  zero. 
Line  510:  There  is  no  sane  reason  to  use  LOC 
in  place  of  TORP,  but  I'd  done  it,  and  didn't  want 
to  change  lines  510-550  when  I  realized  the  re- 
dundancy. Anyway,  we  check  to  see  if  the  new 
position  is  occupied  (meaning  a  ship).  If  not  ( =  0), 
the  torpedo  is  placed  into  the  spot  if  the  torpedo 
position  is  under  the  water  still. 

Line  520:  The  mine  checks  to  see  if  it  hit  the 
torpedo,  and  here  the  torpedo  checks  to  see  if  it 
hit  either  the  left  or  the  right  side  of  the  mine.  If 
so,  we  just  reuse  part  of  the  mine  explosion 
rouhne. 

Lines  530-570:  A  different,  complex  sound 
and  explosion.  The  explosion  moves  left  and  right 
from  the  collision  until  it  runs  out  of  ship  charac- 
ters to  blow  up.  It  is  complicated.  The  score  de- 
pends on  how  high  your  ship  is  in  the  water. 

Line  575:  A  simple  FOR/NEXT  loop  to  print 
from  one  to  three  "subettes"  as  symbols  of  how 
many  lives  you  have  left. 

Line  580:  The  start  of  the  really  Atari-specific 
stuff,  where  characters  are  initialized,  arrays  are 
set  up,  machine  language  is  read  in,  and  the  dis- 
play list  modified.  Actually,  line  580  is  merely  a 
useless  REM  statement. 

Line  590:  The  game  is  not  started  over  with 
RUN,  since  this  would  clear  out  the  high  score. 
Instead,  we  just  make  sure  that  we  do  our 
DIMensions  only  once,  and  then  set  a  flag 
(DIMMED)  to  make  sure  it  won't  happen  again. 
If  you're  a  novice  player,  or  a  6000-pointer,  you 
can  modify  HSCR  here  as  a  goal  to  reach. 

Line  600:  We  modify  the  display  list  of  the  24- 
line  GR.O  display  to  make  it  a  24-line  mixed-mode 
display  (convenient).  The  cursor  is  also  turned  off 
here. 

Line  610:  These  SETCOLOR  statements  come 


from  the  ANTIC  Aerobics  program,  which  gener- 
ates them  with  the  WRITE  DATA  STATEMENTS 
option. 

Line  620:  The  top  line  (DL-1)  is  ANTIC  5, 
mulHcolor  and  double-height.  Lines  2  to  23  are 
ANTIC  4,  and  the  last  line  is  ANTIC  6  (a.k.a. 
GRAPHICS  1).  Line  10  is  flagged  for  ANTIC  as 
where  the  display  list  interrupt  will  occur. 
Line  630:  Screen  memory. 
Line  640:  The  character  set  is  placed  eight 
pages  (2K)  behind  the  top  of  memory,  about  IK 
beneath  the  screen  display.  The  character  set 
pointer  now  causes  ANTIC  to  display  our  char- 
acter set. 

Line  650:  This  important  line  checks  to  see  if 
the  character  set  has  already  been  POKEd  in  pre- 
viously. If  so,  why  bother  to  do  it  again? 

Line  660:  We  put  the  128-byte  character  set 
up  on  the  screen  as  four  rows  of  32  characters  so 
you  can  watch  the  characters  as  they're  being 
redefined. 

Line  670:  The  long  list  of  character  set  data 
starts  at  1040.  Four  8x2  shapes  are  READ  into, 
and  thereby  replace,  the  lowercase  and  graphics 
symbols  (for  this  game,  no  big  loss). 

Line  680:  But  then  we  overlay  most  of  the 
punctuation  and  math  ^ymbols  with  the  sub- 
marine characters.  We  still  have  the  alphabet,  the 
numbers,  and  a  few  punctuation  marks  free. 

Line  690:  And  here  we  POKE  the  alphabet 
and  numbers  into  the  character  set  from  the  de- 
fault ROM  set  at  $E000  (57344). 

Lines  700-710:  Here  we  define  a  couple  of 
characters,  including  the  small  submarine  used 
on  the  score  line.  You  can  use  the  same  character 
set  in  different  modes,  although  the  multicolor 
characters  look  odd  in  GRAPHICS  1,  and  the  text 
is  hard  to  decipher  in  ANTIC  4. 

Line  730:  This  machine  language  section  is 
used  for  the  purely  cosmehc  purpose  of  dividing 
the  screen  into  two  parts,  sea  and  sky,  and  giving 
us  four  separate  colors  for  each  half.  The  display 
list  interrupt  is  easy  to  understand.  It  is  just  a 
bunch  of  LDAs  (like  PEEK,  Load  Accumulator,  a 
special  6502  "variable")  with  each  color  and  STA 
(Store  Accumulator  into  memory,  like  POKE)  into 
the  hardware  color  registers.  The  ANTIC  chip  lets 
us  synchronize  this  color  change  with  any  screen 
line  we  choose,  and  we  chose  line  10  in  line  620 
(128  is  added  to  the  mode  byte). 

Line  740:  We  dear  the  screen  (PUT#6,125) 
and  draw  the  characters  for  the  sun  and  clouds. 

Line  750:  We  tell  the  operadng  system  where 
our  display  list  routine  is,  low  byte  0,  high  byte 
6  =  $0600,  1536,  "page  six."  A  single  POKE  to 
54286  tells  ANTIC  to  "start  interrupting." 

Lines  760-840:  The  characters  for  each  ship, 
arranged  as  eight  characters  for  the  top  half  of  the 
ship  and  eight  for  the  bottom,  are  concatenated 
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into  a  single  string. 

Line  850:  The  string  holding  the  characters 
for  the  submarine  is  set  up. 

Lines  860-870:  We  READ  in  the  +  1,0,  and  -1 
values  for  the  joystick. 

Line  880:  The  initial  position  of  the  submarine 
is  set,  and  the  explosion  characters  are  read. 

Line  890:  That's  it  for  initialization! 

Line  900:  DATA  for  the  explosion  characters. 

Lines  910-1030:  A  special  subroutine  when 
you  beat  the  high  score. 

Lines  1040-1846:  Last,  but  certainly  not  least, 
the  DATA  statements  for  over  530  bytes  of  custom 
character  data.  This  is  where  almost  all  your  typing 
mistakes  will  be  made. 

Line  1860:  Here  are  the  bytes  for  the  small 
machine  language  display  list  interrupt  routine. 
Initially,  we  do  a  store  into  $D40A  (any  write  to 
$D40A).  This  makes  ANTIC  "hold  down"  the 
6502's  READY  line,  effectively  freezing  the  micro- 
processor until  the  TV  scanning  beam  hits  the 
right  edge  of  the  screen.  We  don't  want  to  change 
the  colors  in  the  middle  of  a  line,  or  it  would  be 
quite  jagged.  This  handy  feature  lets  us  wait  unttl 
the  beam  is  off  the  left  side  of  the  TV  before  we 
make  the  color  change.  See  Program  3  for  a  disas- 
sembly of  the  display  list  interrupt  routine  (it  looks 
long,  but  it's  only  26  bytes). 

Program  1:  antic  Aerobics 

100 

1  X0 
120 
130 
140 
150 
160 
170 
180 
190 
200 

210 
220 


-B) «256 
430: SPEED=4 


THEN  160 


POKE  732,0:POK 


230 
240 
250 
260 
270 
280 
270 
300 

310 

320 

330 

340 
350 
360 
370 


REM  r-T:fc**i 
CHSET= (PEEK ( 106) 
BOSUB  300:GOSUB 
LOCATE  X,Y,Z 
COLOR  l+tZ=l) 
PLOT  X,Y 
ST=STICK(0) 
IF  PEEK (20) <SPEED 
POKE  20,0 
COLOR  ZsPLOT  X,Y 
IF  PEEK<732)  THEN 
E  764, 102 

IF  PEEK(764)<255  THEN  GOSUB  510 
IF  STRIG(0>=0  THEN  COLOR  CURR:PL 
OT  X,Y:LET  CQMP I LED=0: I F  ST=15  T 
HEN  130 

IF  ST=15  THEN  140 
X=X+DX (ST) : Y=Y+DY(BT> 
IF  X<XL  THEN  X=XH 
X  =  XL 

Y  =  YH 

Y  =  YL 


IF  X>XH  THEN 
IF  Y<YL  THEN 
IF  Y>YH  THEN 
GOTO  130 

DIM  DX ( 15) ,DY ( 15) 
,FN« (20) 

CURR=1 : XL=4: XH=35 
L: Y=YL: SX=XL: SY=YL: GOSUB  1320 
RESTORE  ;FOR  1=5  TO  15:READ  A:DX 
(I)=fi:NEXT  I 
FOR  1=5  TO  15:READ 
T  I 

DATA  1,1,1,0,-1,-1 
DATA  1,-1,0,0,1,-1,0,0,1,-1,0 
OPEN  #1 , 4, 0, "K: " 
FOR  1=0  TO  15:READ 


380 
390 

400 

410 


420 
430 
440 
450 

460 


470 

480 
490 


500 
510 
520 

530 
540 


550 

560 

570 

580 

590 

600 

610 

620 

630 
640 

650 

660 


ML* (20) , COL (5)   670 

YL=4: YH=19: X=X   680 

690 

700 

710 

A: DY ( I ) =A:NEX   720 


-1,0,0,0,0 


A: POKE  CHSET+ 


730 
740 
750 


768+1, AjNEXT  I 

DATA  0,255,240,240,240,240,255,0 

,0, 240, 240, 240, 240, 240, 240, 0 

IF  PEEK (CHSET+257) <>60  THEN  FOR 

1=0  TO  511:P0KE  CHSET+I, PEEK (573 

44+1 ) :NEXT  I 

FOR  1=1  TO  6;P0KE  CHSET+S04+ I , 25 

5;NEXT  I  ; POKE  CHSET  +  504 , 0 1 POKE  C 

HSET+51 1 ,0 

IF    PEEK(CHSET  +  784)  017    THEN    FOR 

1=1     TO     15: FOR    J=0    TO    7: POKE    CHSE 

T+I«8+776+J, I+I«16:NEXT    J:NEXT     I 

RETURN 

PMBASE=(PEEK ( 106) -16) «256:GRID=1 

POKE  54279, PMBASE/256 

POKE  53277, 3:POKE  559,62:POKE  62 

3,4 

FOR  1=0  TO  3:PDKE  704+1, 2:POKE  5 

3248+1, 64+I«32:P0KE  53256+1, 3:NE 

XT  1 

P0=PMBASE+1024: BP=a5: IF  PEEKCP0+ 

64)=BP  THEN  RETURN 
FDR  1=64  TO  190  STEP  8 
FOR  J=0  TO  7:P0KE  P0+I+J , BP: POKE 
P0+256+I+J, BPsPOKE  P0+512+I+J,B 
PsPOKE  P0+768+I+J,BP:NEXT  JjBP=2 

55— BP 

NEXT  I: RETURN 

GET  #l,A:PaKE  711,70 

IF  A=ASC("W")  THEN  IF  COMPILED  T 

HEN  1810 

IF  A=B7  THEN  A=83:B0TD  800 

IF  A=17  THEN  GRAPHICS  0:POKE  532 

77,0:FOR  1=0  TO  3:POKE  53248+1,0 

:NEXT  I:END 

IF  A=ASC("G")  THEN  GR I D= 1 -GR I D : F 

OR  1=0  TO  3:POKE  53248+1,(64+1*3 

2)«GRID:NEXT  I  : RETURN 

IF  A>47  AND  A<52  THEN  CURR  =  A-'48: 

POKE  71 1 , PEEK (707+CURR+5* CCURR=0 

) ) eRETURN 

IF  A=125  THEN  GOSUB  1320:LET  COM 

PILED=0: GOSUB  430: RETURN 

IF  A=ASC("C")   THEN  LET  COMPILED= 

1  : POP  jGOTO  1020 

IF  A=7  THEN  CREG=704 : A=PEEK ( CREG 

):GOT0  620 

IF     A<33     OR     A>35     AND     A041     THEN     7 

40 

CREG=70S+A-33-4» (A=41> : A=PEEK(CR 

EB) 

C=INT<A/16) :L=A-C«16:PQKE  87,1:C 
OLOR  32:PLQT  0,H:DRAWTa  19,11 
POSITION  C+2,11:PUT  #6,95 
T=C+DX (STICK (0) ): IF  T<0  OR  T>15 
THEN  T=16-ABS(T> 

L=L-2»DY (STICK (0) ): IF  L<0  OR  L>1 
4  THEN  L=16-ABS(L) 

A=C*16+L: POKE  CREG, A: IF  CREB=704 
THEN  POKE  705,A:POKE  706,A:POKE 
707,  A 

IF  STICK(0)<15  THEN  POSITION  C+2 

,11:?  #6;"  ■■;:C  =  T 

IF  STRIGt0>=0  THEN  710 

IF  PEEK (20) <SPEED  THEN  680 

POKE  20,0:BOTD  630 

IF  STRIG(0)=0  THEN  710 

1550:  POSITION  3,11:?  «6;"E! 
I33CEHE"  :  POKE  711,  PEEK  (707 

+CURR+5* (CURR=0) > 

POKE  87, 3: RETURN 

IF  AOASCC'P")  THEN  760 

SX=X:SY=YsCOL0R  CURRsPLOT  X,Y:FO 


GOSUB 
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760 


770 


7B0 
790 

800 


810 
820 

830 
840 

850 
860 
870 

880 
890 
900 


910 

920 

930 

940 
950 


R  W=15  TO  0  STEP  -1;SQUND  0,W,12 

,W:NEXT  W:POP  : LET  COMP I LED=0: GO 

TO  130 

IF  A=ASC<"D")  THEN  COLOR  CURR:PL 

DT  SX,SY;DRAWTO  X,Y;LET  COMPILED 

=  0:POP  J  GOTO  130 

IF  0=4  THEN  COLOR  CURRiPLOT  SX,S 

Y:DRAWTO  X , Y : SX= X : S Y= Y : POP  : LET 

CDMPILED=0: BOTO  130 

IF  A=ASC("L">  THEN  1560 

IF  A=ASCr"S")  THEN  IF  COHPILED  T 

HEN  1450 

IF  A=ASC("S")  THEN  POKE  a7,l;GOS 

UB  15505  POSITION  4,11:?  #6;"GEai 

u.  -laai'gyr"  =  rft  #i,a:GOTo  1520 

IF  AOASCC'M")  THEN  840 
GET  #1,A:IF  A<48  OR  A>57  THEN  RE 
TURN 

SPEED=A-48: RETURN 

IF  fi<>ASC  ('■?'•)  AND  AOASCC'H")  T 
HEN  890 

RESTORE  1980: POKE  87,1 
READ  FN*; IF  FN*="END"  THEN  880 
GOSUB  1550; POSITION  10-LEN(FN*)/ 
2,11:7  «6;FN*:BET  #1,A:60TD  860 
eOTO  1520 
IF  A<>1S6  THEN  930 

FDR  ROW=Y*10  TO  180  STEP  10:FOR 
CQL=1  TO  8: POKE  SCR+RDW+COL , PEEK 
(SCR+ROW+10+COL> :NEXT  COL; NEXT  R 
OW 

FOR  COL=l  TO  9:P0KE  SCR+ROW+COL, 
0:NEXT  COL;LOCATE  X,Y,Z 
RETURN 
IF  A0157  THEN  970 


960 
970 
980 

990 


FOR  RDW=190  TO  Y»10+10  STEP  -10 

FOR  C0L=1  TO  a:PQKE  SCR+RDW+COL, 

PEEK  CSCR  +  RQW-10  +  CDL>  : NEXT  COL: NE 

XT  ROW 

2=0:GOTO  910 

IF  AOASCC'I")   THEN  1010 

TRAP  i000:OPEN  #2, 6, 0, " D: « . « " s PO 

KE  87, 1 

INPUT  #2, FN*:  BOSUB  1 550 : POS I T I  ON 

1,11:?  #6;FN*;:GET  »l,A:eOTO  99 
0 

CLOSE  #2:60T0  1520 

RETURN 

FOR  1=0  TO  3:P0KE  53248+ I , 0 : NEX 

T  I 

SCR=PEEK(88)+2  56«PEEK(a9) 

FDR  RDW=4  TO  19 

FOR  COL=l  TO  8 

LOC  =  SCR  +  ROW*10  +  COL: A  =  PEEK  CLOC) 

POKE  L0C,255-A 

C=C0L-1 : R=ROW-4: IF  R>7  THEN  R=R 

+  56 

POKE  CHSET+S12+C*8+R, A 

POKE  LOC,A 

NEXT  COL:NEXT  ROW 

FDR  1=0  TO  4; COL ( I > =PEEK (708+1 ) 

:NEXT  I 
1130  GRAPHICS  0: SCR=PEEK <88) +256«PEE 

K  CB9)  : DL  =  PEEK (560) +256* PEEK (561 

)  +4 
1140  POKE  752,1:P0KE  756 , CHSET/256 
1150  FOR  1=0  TO  4;POKE  708+ 1  ,  COL ( I )  : 

NEXT  I:POKE  711,70 
1160  POKE  DL-1 , 4+64: FOR  1=2  TO  10:PO 

KE  DL+I,4:NEXT  I  : POKE  DL+11,5:P 

OKE  DL+12,5:P0KE  DL+13,5:P0KE  D 

L+14, 6 
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1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 

1090 

1  100 

1110 

1  120 

1  170 
1  180 
1  190 

1200 

1210 
1220 
1230 

1240 
1250 
1260 
1270 

1280 
1290 
1300 
1310 
1320 
1330 

1340 

1350 

1360 

1370 

1380 
1390 

1400 

1410 


1420 
1430 

1440 
1450 
1460 

1470 
1480 


1490 

1500 


1510 
1520 
1530 

1540 

1550 

1560 
1570 

1580 
1590 


0,13:?  "PRESS 


TO 


70 


POKE  DL+15,65:PaKE  DL+16,PEEK<5 

60):PQKE  DL+17, PEEK (561 ) 

FOR  1=0  TO  1:F0R  J=l  TO  B:FOR  K 

=0  TO  IsFOR  L=0  TO  1 

POKE  SCR+l«40+L*10+120«K+J+284, 

63+I*a+J+L«128:NEXT  LsNEXT  K:NE 

XT  J:NEXT  I 

POSITION 

RETURN" 

IF  STRI6(0)   THEN  1210 

REM  RESTORE 

GOSUB  1320:FOR  1=0  TD  4:P0KE 

8+I,COL(I) :NEXT  I 

SCR  =  PEEK(88>  +256«PEEK(89) 

FOR  R0W=4  TO  19 

FOR  COL=l  TO  a 

C=C0L-1 : R=ROW-4: IF  R>7  THEN  R=R 

+  56 

A=PEEK (CHSET+512+C*8+R> 

POKE  SCR+ROW«10+COL, A 

NEXT  COL:NEXT  ROW 

GOTO  130 

REM  SET  UP  GR.3+16  SCREEN 

RESTORE  1350:FOR  1=1  TO  16:READ 

A: ML*  (  I  ) =CHR*  (A)  : NEXT  I 
POKE  513, INT CADR CML*) /256) :POKE 

512, ADR (ML*) -25  6* PEEK (513) 
DATA  72,169,192,141,10,212,141, 
27,208, 169, 10, 141,26,208, 104,64 
GRAPHICS  3+16:PDKE  559,0:SCR=PE 
EK (88) +256* PEEK (89) 

COLOR  l:PLOT  XL-2 , YL-2 : DRAWTQ  X 
H+2, YL-2: DRAWTO  XH+2 , YH+2: DRAWT 
O  XL-2, YH+2: DRAWTO  XL-2, YL-2 

DL=PEEK (560) +256«PEEK (561 ) +4 
POKE  DL+23, 6+128: POKE  DL+24.2:P 
OKE  54286, 192 

POKE  87,  1  :  POSITION  3,11:7  «6;"E' 
nS^^mmS-n^3E":POKE     87,3 
FOR  1=1  TO  15: POKE  SCR+244+I«2, 
97+I:POKE  SCR+245+ I «2 , 97+1 : NEXT 
I: POKE  SCR+244, 96: POKE  SCR+245 
,97 

POKE  756,CHSET/256:P0KE  559,62 
FOR  1=0  TO  3:P0KE  5324B+ I , 64+ I « 
32:P0KE  53256+ I , 3 : NEX T  I 
RETURN 

REM  SAVE  ROUTINE 

POKE  87,1:G0SUB  1 550 : POS I T I  ON  0 
,11:7  #6; "s" : GOSUB  1650 
TRAP  1500:OPEN  #2, 8,0, FN* 
FOR  1=0  TO  127:PUT  #2,PEEK(CHSE 
T  +  512  +  I )  : NEXT  I  : FDR  1=0  TD  4 : PU 
T  #2, PEEK (708+1 ): NEXT  I 
PUT  «2, PEEK (704) : CLOSE  #2:G0T0 
1520 

GOSUB  1550: POSITION 
ERROR  " ; PEEK ( 195) ; " 
OSE  #2 
BET  #1,A 
BOSUB  1550 
POSITION  3,11:?  #6; ' 


87, 3: TRAP  3 
19,11 


1,11:7  #6; " 
ON  SAVE":CL 


POKE  54286, 192: POKE 

2767: RETURN 

COLOR  32; PLOT  0,11:DRAWTO 

: RETURN 

REM  LOAD  ROUTINE 

POKE  87,1:G0SUB  1 550: POS I TIGN 

,11:?  #6;  "1  ■' :  GOSUB  1650 

TRAP  1620;OPEN  #2, 4,0, FN* 

FOR  1=0  TO  127:GET  #2,A:P0KE  CH 


0 


1600 
1610 

1620 


1630 
1640 
1650 
1660 

1670 
1680 
1690 
1700 
1710 


ON 


#6;  " 
LOAD" : CL 


1720 

1730 

1740 

1750 

1760 
1770 

1780 
1790 

1800 
1810 
1820 

1830 


1840 
1B50 
1860 
1870 


1880 

1890 
1900 
1910 
1920 


1930 
1940 
1950 

1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 


SET+512+I, A:NEXT  I : FDR  1=0  TO  4 

:SET  #2, A: COL < I ) =A: NEXT  I 

GET  #2,A:FDR  1=0  TO  3:POKE  704+ 

I,A:NEXT  I 

CLOSE  #2: POKE  54286 , 1 92 : POP  : TR 

AP  32767:LET  COMP I LED= 1 : GOTO  12 

20 

GOSUB  1550: POSITION 

ERROR  "; PEEK ( 195) ; " 

DSE  #2 

GET  #1 , A 

GOTO  1520 

REM  FILENAME  INPUT 

POSITION  1,11:?  1*6;  '■nr";CHR*<15 

9)  ; 

ZL=1 

POSITION  4+ZL,ll:PUT  #6,223 

GET  #1,A 

IF  A=155 

IF  A=126 

L-1:C0L0R  32:PLDT  5+ZL,ll:60T0 

1680 

IF  NUM  AND 

1690 

IF  NUM=0  AND  ZL=1 

>90  THEN  1690 

IF  A=42  OR  A=46  OR 

60 

IF  <A<4a  OR  A>57) 

A>90)  THEN  1690 

IF  ZL=15  THEN  1690 

POSITION  4+ZL,ll:PUT 

L)=CHR*CA) ;ZL=ZL+1 

GOTO  1680 


THEN 
THEN 


1790 

IF  ZL>1 


THEN  ZL=Z 


(A<4a  OR  A>57)   THEN 


AND  A<65  OR  A 


A=5B  THEN  17 


AND  CA<6S  OR 


#6, A: FN* (Z 


NUM=0:IF  ZL=1  THEN  POP  : GOTO  IS 

20 

FN*  =  FN*  <1,ZL-1):RETURN 

REM  WRITE  DATA 

POKE  a7,l:G0SUB  1  550 : PQS I T I  ON  1 

,11:7  #6;  "ai";CHR«  (159)  ;  :NUM=1: 

GOSUB  1670 

LN=0:FOR  1=1  TO  LEN < FN« ) : A=ASC ( 

FN* ( I ) ) -48: IF  A>=0  AND  A<10  THE 

N  LN=LN«10+A: NEXT  I 

IF  I<LEN(FN*)  THEN  POP 

GOSUB  1550:GDSUB  1650 

TRAP  1950:OPEN  #2, 8,0, FN* 

PRINT  #2;LN;"  " ; : FOR  1=0  TO  4: A 

=PEEK (708+1 ) : C=INT (A/ 16) :L=A-C« 

16 

PRINT  #2;  "SE.  ";  I;  ",  ";C;  ",  "jL;  :  I 

F  1C4  THEN  PUT  #2,58 

NEXT  1:PRINT  «2:LN=LN+10 

FOR  1=0  TO  127  STEP  8 

PRINT  «2;LN; "  DATA  "; 

FOR  J=0  TO  7:PRINT  «2;PEEK{CHSE 

T+S12+I+J) ; : IF  J<7  THEN  PUT  *2, 

44 

NEXT  J:PRINT  #2 : LN=LN+ 1 0: NEXT  I 

TRAP  32767: CLOSE  *2:G0T0  1520 

GOSUB  1550:PQSITION  1,11:?  #6;" 

*■■;  PEEK*  195)  ;  "  ON  WRITE" 

GET  «1,A 

CLOSE  #2: GOTO  1520 

DATA  E  : COMPILE 

E-E  : COLOR 

SSEKSJ    E-E    :SETCOLOR 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


a  :SAVE 

n  :LOAD 

Ej  :  DISK  INDEX 

C  :WRITE  DATA  STMTS 

K  iMOTIDN   (0-9) 


A  shape  ix'semhUtig  the  planet  Saturn  being  edited  with  the 

ANTIC  Aerobics  Editor. 

2060  DATA  B  :PLOT 

2070  DATA  E  : DRAWTO 

2080  DATA  mSSB    E  :  DRAWTHRU 

2090  DATA  [E  :   GRID  DN/DFF 

2100  DATA  33SB    E:GRID  COLOR 

2110  DATA  BGgai  niaagi:  l  i  ne 

2120  DATA  S3^a!  ESiaOiLINE 
2130  DATA  SOGai  E  :QUIT 
2140  DATA  END 

Program  2:  Sub  Attack  -  An  Example  Game 


100 
110 

120 
130 

140 

150 
160 
170 


180 
190 

200 

210 

220 
230 

240 
250 
260 

270 

280 


REM 
REM 
REM 
GOSUB 


;Ti*f:Wa 


i80: 


SUBS=3: GOSUB  575: REM  C 

PTS=0:BEAT=0:DX=0: OPTS=PTS; FIRST 

MOVE=0 

X=1:IF  PEEK(53770)< 128  THEN  180 

R=INT  <4«PEEK (S3770) /256)  «2 

POKE  766, 1 iPOSITION  31,8;?  SHIP* 

(R*8+l , R*8+B) :POSITION  31,9:?  SH 

IP* (R«B+9, R*8+16) 

IF  PTS>HSCR  AND  BEAT=0  THEN  GOSU 

B  910 

IF    PTSODPTS    THEN    POSITION     10-LE 

N (STR* (SCORE)  > /2, 23: ?    PTS;"        "  ;  : 

OPTS=PTS 

IF  MS=0  AND  FIRSTMOVE  AND  PEEK (5 

3770)  >200  THEN  MS= I  NT ( 30«PEEK ( 53 

770) ) /256+400 

POKE  766,0:POSITION  0,9:7  CHR*(2 

54) ; CHR* (28) ; CHR* (254) ; : X=X+1 : IF 

X=10  THEN  150 
JS=STICK (0) :FB=STRIG(0) 
IF  FB=0  AND  TORP=0  THEN  TQRP=SCR 
+SUBY«40-40+SUBX+7« ( DX=1 ) : F 1 RSTM 
OVE=TDRP: POKE  77,0 
IF  DX(JS)<>0  THEN  DX=DX ( JS ) : POKE 

77,  0 
DY=DY(JS):IF  PEEK (53279 ) =6  THEN 
100 

IF  DY  OR  DXOODX  THEN  POSITION  S 
UBX,SUBY:?  " t8  SPACES J ";: ODX=DX : 
FIRSTMOVE=DX; POKE  77,0 
SUBX=SUBX+DX: IF  SUBX<0  OR  SUBX>3 
1  THEN  POSITION  SUBX-DX , SUBY : ?  " 
CB  SPACES>" ; : SUBX=32-ABB<SUBX) 
SUBY=SUBY+DY: IF  SUBY< 1 1  OR  SUBY> 
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SUBX, SUBYs 


22  THEN  SUBY=SUBY-DY 
290  P=l+B« (DX< 1 ): POSITION 

?  SUB» (P,P+7) ; "fLEFT>"; 
300  IF  MS=0  THEN  480 
310  POKE  SCR+MS,0: POKE  SCR+MS+ 1 , 0: MS 

=HS+40! IF  MS>9I9  THEN  MS=0:GOTO 

480 
320  LaC  =  SCR  +  MS: P1=PEEK  <LOC)  s P2=PEEK ( 

LOC+i ) 
330  IF  P1=0  AND  P2=0  THEN  POKE  LQC,! 

02; POKE  LOC+1 , 103: BOTO  480 
340  FOR  V=12  TO  0  STEP  -3: FOR  1=0  TO 
2:P0KE  711 ,PEEK{53770) :POKE  20, 

0 
350  IF  PEEK(20)<1  THEN  350 
360  POKE  LDC, EXL <  I  J  : POKE  L0C  +  1,EXR(I 

):SOUND  0, 70, a, V: SOUND  1,PEEK(53 

770) , 0, V: NEXT  I:NEXT  V 
370  POKE  LOC,0:POKE  LOC+1,0 
380  IF  Pl=il2  OR  P2=112  THEN  MS=0:TO 

RP=0: PTS=PTS+100: GOTO  180 
390  FOR  1=150  TO  0  STEP  -5:POSITION 

SUBX,SUBY:?  SUB* (FL»B+1 , FL«a+8) ; 

: FL=1-FL 
400  FOR  J=I  TO  1  STEP  -20 
410  SOUND  0, J/ 10, B, 1/ 10: NEXT  JiNEXT 

I 
415  SUBB=SUBS-1 : IF  SUBS=0  THEN  430 
420  POSITION  SUBXjSUBY:?  " 

CB  SPACES > " ; : SUBX=16: SUBY=22: DX= 

0: DY=0: MS=0: BOSUB  575:G0T0  180 
430  IF  PTS>HSCR  THEN  HSCR=PTS 
440  GRAPHICS  1B:P0KE  54286 , 64 : SETCOL 

OR  4,  9,  14:P0SITI0N  5,0:?  tt6;"[giE 

450  POSITION  5,5:?  #6 ; " SCORE : " ; PTS : P 

asiTION  5,11:?  #6;  "press  SEK-" 
460  IF  PEEK (53279) <>6  AND  STRIB(0)  T 

HEN  460 
470  POKE  77,0:GOTO  100 
480  IF  TORP=0  THEN  180 
490  IF  PEEK (TORP) =1 12  THEN  POKE  TORP 

,0 
500  TORP=TORP-40: IF  TORP<SCR+360  THE 

N  TaRP=0: PTS= <PTS-10) « (PTS>10) :S 

OTO  180 
510  LDC=TORP:IF  PEEK (LOO =0  THEN  POK 

E  LOC, 1 12* <TORP>SCR+400) : GOTO  18 

0 
520  IF  PEEK (TORP) =102  OR  PEEK(TDRP)= 

103  THEN  LOC=SCR+MS: Pl=l 12:G0TO 

340 
530  FOR  V=14  TO  0  STEP  -2:F0R  1=2  TO 

3: L=0: R=0 
540  FOR  UP=0  TO  40  STEP  40: POKE  711, 

PEEK (53770) 
550  POKE  LOC-L-UP, EXL ( I ) : POKE  LOC+R- 

UP,EXR(I) :A1=(PEEK(LOC-L-1)<>0) : 

A2= (PEEK (LOC  +  R+1 >  <>0>  :NEXT  UP:L  = 

L+Al :R=R+A2 
560  SOUND  0,L+R,0,V:IF  Al  OR  A2  THEN 

540 
570  NEXT  I:NEXT  V ; TORP=0 : PTS=PTS+40+ 

(23-SUBY) «5: GOTO  180 
575  POSITION  1,23:?  "{7  SPACES> " ; : FO 

R  1=1  TO  SUBS: POSITION  1*2-1,23: 

?  "£\";sNEXT  I : RETURN 

580  REM  Bn^asaa^smnK 

590  IF  NOT  DIMMED  THEN  DIM  DX(15),D 
Y ( 15) , SHIP* (128) , SUB* ( 16) , EXL (3) 
,EXR(3) ,MS6* (100) :LET  DIMMED=1:H 
SCR=500 
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An  example  of  edited  graphics  in  the  Atari  game  "Sub  Attack" 


600 

610 

620 


630 
640 

650 
660 


670 

680 

690 

700 

710 

730 

740 

750 

760 

770 

780 
790 
800 
810 
820 

830 

840 

850 

860 


GRAPHICS  0:DL=PEEK(560) +256* PEEK 

(561)+4:PDKE  752,1 

SETCOLOR  0, ll,4:SETCOLOR  1,0,12: 

SETCOLOR  2, 1 , 10:SETCOLOR  3,4,6:S 

ETCOLOR  4, 10,8 

POKE  DL-1,69:F0R  1=2  TO  23: POKE 

DL+I,4:NEXT  I : POKE  DL+10 , 128+4 : P 

OKE  DL+24,6 

SCR=PEEK (88) +256«PEEK (89) 

CHSET=(PEEK(106)-8) « 256: POKE  756 

, CHSET/256 

IF  PEEK (CHSET+20) =85  THEN  740 

FOR  1=0  TO  3;FOR  J=0  TO  31:P0KE 

SCR+I*40+B0+2+J, I»32+J:NEXT  J:NE 

XT  I 

RESTORE  1040:FOR  1=512  TO  1023:R 

EAD  A:PGKE  CHSET+ I , A : NEXT  I 

FOR  1=0  TO  127:READ  A:POKE  CHSET 

+  1  , A: NEXT  I 

FDR  1=128  TO  511:P0KE  CHSET+1,25 

5-PEEK(57344+I ) sNEXT  I 

FOR  1=0  TO  7: POKE  CHSET+208+ I , 25 

5:NEXT  I : POKE  CHSET+2 1 4 , 239 

FOR  1=0  TO  IStREAD  AiPOKE  CHSET+ 

472+1, A:NEXT  I 

FOR  1=0  TO  25:READ  A:POKE  1536+1 

,A:NEXT  I 

PUT  #6, 125: POSITION  30,0:FOR  1=0 

TO  7:F^UT  #6,  I  iNEXT  I 
POKE  512,0:POKE  513,6:POKE  54286 
,  192 

RESTORE  770:FDR  1=1  TO  64:READ  A 
: SHIP* ( I )=CHR* (A) :NEXT  I 
DATA  160,160,160,160,160,160,160 
,  160 

DATA  8,9,10,11,12,13,14,15 
DATA  32,32,18,19,20,21,22,23 
DATA  24,25,26,27,28,29,30,31 
DATA  32,97,98,99,100,101,32,32 
DATA  104,105,106,107,108,109,110 
,111 

DATA  160,160,160,160,160,160,160 
,  160 

DATA  120,121,122,123,124,125,32, 
32 

FOR  1=1  TO  16i SUB* ( I ) =CHR* < 1+31 ) 
:NEXT  I : SUB* < 16) =CHR» (32) 
FOR  1=5  TO  15:READ  A : DX ( I > =A : REA 
D  A: DY (I )=A:NEXT  I 


870  DATA  1,1,1,-1,1,0,0, 
,-1,0,0,0,0, 1,0,-1,0 

880  SUBX=16: SUBY=22: FOR 
D  A,BsEXL( I ) =A: EXR  (  I 

890  RETURN 

900  DATA  246,247,208,209 

910  HSCR  =  PTS:  riSG«  =  "  :  :  :  ;  : 
:  :  :  "  : POKE  7 1 1 , 90 

920  Mss*(2i)="Bg3gaiiiDgi 

:  ::high:  :  :  miiJ^!:  :  :  :  " 

G«) +1 )=STR«  CRTS) 
930  MS6* CLEN<MSB«)+1 )=": 

940  FOR  1=1  TO  LEN(MSB*) 

950  SOUND  0,10,8,8 

960  POSITION  1,23:?  MSG* 

KE  20,0 
970  IF  PEEK(20)<2  THEN  9 
980  SOUND  0,30,8,8 
990  POSITION  CX,2:?  "qrs 
0, 0: CX=CX-1 : IF  CX=0 
N  CX,2:?  "<:7  SPACES> 
1000  IF  PEEKC20)<2  THEN 
1010  NEXT  I:BEAT=1 
1020  COLOR  32:PLDT  0,23: 
:PLOT  ia,23:PLaT  0, 
2:S0UND  0,0,0,0:GOT 
1030  RETURN 
1040  REM 
1050  DATA  168,0,0,0,42,0 
1060  DATA  0,2,42,170,10, 
1070  DATA  0,160,2,170,16 
1080  DATA  0,0,128,0,160, 
1090  DATA  15,63,63,63,15 
1100  DATA  192,240,242,24 


0,-1,1 

1  =  0  TO 
) =B: NE 


3:REA 
XT  I 


, 254,255,0, 0 


t*<.i;a: 


:  new 

MS6* (LEN  <MS 


-20 

< I , 1+17) ; : PO 

70 


tu  "  ;  : 
THEN  P 
"  ;  :  CX 
1000 

DRAWTO 
2: DRAW 
0  575 


POKE  2 
OSITIO 
31 


18,  23 
TO  39, 


QRME  CHARRCTERS  FOLI_OH 


,0,0 

168, 0, 0 

0, 42,0, 0 

0,0,0 

,0,0,0 

0, 192, 0, 160, 0 


1110 
1  120 
1  130 
1  140 
1  150 
1  160 
1  170 
1  180 
1  190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


34, 10, 136, 2, 168, 0, 0 
32, 160, 136, 0, 0, 0, 0 
0, 0, 0, 85, 85, 5, 0 
0, 192,63, 95, 1 17, 85, 21 
0,0, 19  2, 85, 85, 85, 85 
5, 53, 31 ,87,93, 85, 85 


0, 48, 15, 87, 93, 85, 85 
0,0, 240, 213, 85, 85,85 
0, 0, 0, 85, 85, 80, 0 
8.8,3, 143, 3, 128, 8,0 
48, 24  0, 252, 224, 200, 0 , 1 28 
0,0,0,0,0,5,7 
0, 8, 85, 42, 42, 85, 1 19 
130, 24, 64, 0,0, 84, 116 
2, 33, 0,0,0,0,0 
2, 24, 145,2, 0,0,0 
4, 0, 32, 80, 0,0,0 
0,21, 10,5,0,0,0 
0,85, 170, 117, 85, 21, 5 
10, 85, 170, 215, 85, 85, 85 
9, 170, 85, 170, 93, 85, 85, 85 
6, 170, 85, 170, 1 17,85,85, 85 
0, 85, 170, 215, 85, 85, 85 
0, 84, 170, 85, 84, 80, 64 
0, 0, 128, 0, 0, 0, 0 
0,0,0,0,0,0,0 
0,0, 0,0, 0, 64, 16 
0,0,0,0,0,0,0 
0, 0,5, 0,0, 85, 1 19 
0, 0,84, 128, 128,85, 1 19 
0,  0,  0, 0, 0, 64, 64 
4,1,5, 1,4,0,0 
68,80,84,80,68,0,0 
0,80, 170, 21 ,5,5,0 
85, 117, 85, 170, 85, 213, 85, 21 
80, 208, 80, 170, 85, 93,85, 85 


DATA  85,170,85,170,85,85,85,85 

DATA  85,170,85,170,85,213,85,85 

DATA  64,129,65,170,85,93,85,85 

DATA  16,85,221,170,85,85,80,0 

DATA  0,1,4,170,80,0,0,0 

DATA  0,16,16,16,16,136,0,0 

DATA  1,0,0,5,31,31,5,0 

DATA  84,5,4,85,213,86,85,0 

DATA  0,80,0,80,85,89,84,0 

DATA  0,0.0,1,85,64,0,0 

DATA  4,17,4,84,64,0,0,0 

DATA  32,2,51,15,131,8,128,0 

DATA  34,0,200,240,194,48,0,8 

DATA  0,0,0,0,5,1,0,0 

DATA  0,0,0,2,85,93,85,5 

DATA  20,20,20,170,85,93,85,85 

DATA  20,20,20,170,85,93,85,85 

DATA  0,0,0,128,85,93,85,84 

DATA  0,0,0,0,84,64,0,0 

DATA  0,128,8,32,15,131,3,2 

DATA  0,0,194,192,242,252,192,50 

DATA  0,0,0,0,0,0,0,0 

DATA  0,0,0,0,5,42,1,0 

DATA  0,0,0,0,85,165,85,0 

DATA  0,0,0,3,85,85,85,85 

DATA  0,5,21,255,85,85,85,85 

DATA  85,85,105,255,85,85,85,85 

DATA  0; 0, 0, 2S5, 85, 84, 85, 85 

DATA  0,0,0,192,80,20,80,64 

DATA  0,0,0,3,5,20,5,1 

DATA  1,1,1,255,85,21,85,85 

DATA  84,85,165,255,85,85,85,85 

DATA  0,64,80,255,85,85,85,85 

DATA  0,0,0,240,85,85,85,85 

DATA  0,0,0,0,85,90,85,64 

DATA  0,0,0,0,80,168,64,0 

DATA  0,0,0,0,0,0,0,0 

DATA  0,0,1,63,127,31,7,0 

DATA  120,248,200,254,251,254,25 

2,0  

REM  >  fr-T^^Hfr-»  =»■*•«•-?" -t^**'**^""" 


--Machine  Larvguage  ■ 
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1860  DATA  72, 16 
,208, 169,4 
41,24, 208 
4,  64 

1870     END 


9,6, 141, 10,212, 141,22 
0, 141,23,208, 169, 10, 1 
169, 128, 141, 26, 208, 10 


Program  3: 

Disassembly  Of  The  Display  List  Interrupt  Routine 


72 


PHA 


169  6  LDA    #6 

141  10  212    STA    $D40A 

141  22  2C8    STA    $D018 
169  40  LDA   #40 

141  23  208    STA    $D019 


169  10  LDA  #10 

141  24  208  STA  $D01A 

169  128  LDA  #128 

141   26   208  STA  $D01C 

104  PLA 

64  RTI 


;  Since  this  is  an  interrupt,  we  want  to 
save  any  registers  we  use  so  that  when 
we  return  from  the  interrupt,  the 
original  routine  won't  notice  anything. 
PHA  means  to  "push"  the  accumulator 
onto  the  stack.  The  stack  will  hold  the 
previous  value  in  the  accumulator 
until  we  "pull"  it  off. 
;Grey  (0*16  +  6) 

;WSYNC  (wait  for  synchronization) 
;Colorregister zero  (hardware) 
;2*16  + 8,  light  orange 
;Color  register  one.  Since  ML  is  so  fast, 
the  TV  beam  still  hasn't  reappeared. 
We'll  be  able  to  make  all  our  changes 
without  having  to  store  to  WSYNC 
again. 

;Light  white 
;Col  or  regi  ster  two 
;8*16  +  0,  dark  blue,  for  the  ocean 
;Background  color  register 
;Restore  accumulator 
,'Retum  from  Interrupt  (like  RETURN 
fromaGOSUB)  © 
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High  Speed  Mazer 


Gory  E.  Marsa 


This  update  of  previoiishf  published  "Maze  Generator" 
uses  machine  language  to  construct  a  random  maze  in 
less  than  two  seconds  -  for  PET,  VIC,  and  64.  Also, 
there's  "Munchmaze,"  a  fast-action  strategy  game  to 
show  off  the  maze  utility,  with  versions  for  the  PET 
and  64. 


If  you  tried  Charles  Bond's  "Maze  Generator"  in 
the  December  1981  COMPUTE!,  you'll  remember 
how  fascinating  it  was  to  watch  the  maze  being 
constructed  on  the  screen  right  before  your  eyes. 
It's  a  clever  program  and  lacks  only  one  thing  - 
speed.  It  takes  my  PET  about  38  seconds  to  con- 
struct a  full-screen  maze.  After  watching  it  make 
several  mazes,  it  occurred  to  me  that  a  machine 
language  version  would  be  much  faster. 

The  machine  language  maze  generator  was 
written  on  an  Upgrade  PET,  and  conversions  for 
Original  ROMs  and  4.0  ROMs  were  incorporated 
into  the  loader  program  (Program  1).  Also  in- 
cluded are  versions  for  the  VIC-20  (Program  2) 
and  the  64  (Program  3). 

The  PET  version  uses  176  bytes  and  will  fit 
into  one  of  the  cassette  buffers.  It  uses  the  second 
cassette  buffer,  but  4.0  BASIC  users  may  prefer  to 
use  the  first  cassette  buffer.  If  so,  change  the  value 
of  S  in  line  120  to  634.  If  you  would  like  to  use  one 
or  both  buffers  for  utility  programs,  instructions 
for  loading  machine  language  into  high  RAM  are 
given  at  the  end  of  the  loader  (lines  450  on). 

The  VIC-20  version  occupies  201  bytes  and 
must  be  loaded  into  high  memory  because  it's  too 
large  for  the  cassette  buffer.  The  extra  bytes  in 
this  version  are  needed  to  handle  color.  Screen 
and  border  are  both  white,  and  the  maze  color  is 
chosen  randomly.  All  colors  except  black  and 
white  are  used. 

While  typing  in  the  loader  program,  make 
special  note  of  DATA  items  beginning  with  an 
asterisk  (*)  or  a  plus  sign  {  +  ).  Be  sure  to  include 
these  symbols.  When  you've  finished  typing,  be 
sure  to  SAVE  the  program  before  RUNning  it. 
When  the  program  is  RUN,  it  first  POKEs  the 
machine  language  into  memory  and  then  offers  a 
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demonstration.  Mazes  will  be  constructed  on  your 
screen  as  long  as  you  keep  pressing  keys. 

Speeding  Up  The  Maze 

Converting  Charles  Bond's  algorithm  from  BASIC 
to  machine  language  was  accomplished  by  a  nearly 
line-by-line  translation  of  the  original  BASIC  pro- 
gram. Although  the  machine  language  program 
executes  far  faster  than  the  original  BASIC  pro- 
gram, the  maze  does  not  appear  on  the  screen 
instantaneously.  But  the  motion  is  so  fast  it's  hard 
to  follow  with  your  eyes.  I  timed  the  PET  maze 
construction  at  1.65  seconds.  The  VIC  and  64  ver- 
sions take  about  half  as  much  time. 

The  mazes  are  39  columns  by  23  rows  on  the 
PET  and  64,  and  21  columns  by  21  rows  on  the 
VIC,  These  are  maximum  sizes.  Changing  the 
maze  dimensions  is  possible,  but  not  particularly 
easy,  especially  if  you  want  to  center  the  maze  on 
the  screen.  You  can  try  this: 

PET  &  64:  POKE  S  +  37,C  (wtuTL"  C  is  >T0  or  <40) 

POKES +  53,  R  (whL>rL>Ris>10or<24) 

VIC:  POKE  S  +  62,  C  (where  C  is  >10or  <22) 

POKE  S  +  78,  R  (whore  R  is  >10  or  <22) 

C  is  the  number  of  columns,  R  the  number  of 
rows,  and  S  the  SYS  address  minus  eight.  C  and  R 
must  be  odd  nund^ers.  Mazes  smaller  than  the 
maximum  size  will  not  be  centered,  but  will  start 
in  the  upper-left-hand  corner  of  the  screen. 

Munchmaze 

Shortly  after  converting  the  maze  generator  to 
machine  language,  I  wrote  a  machine  language 
game  called  "Munchmaze,"  in  which  a  character 
hurries  through  the  maze  dropping  bread  crumbs 
as  it  goes.  You  move  your  character  around  with 
the  appropriate  keys  and  try  to  munch  as  many  of 
the  bread  crumbs  as  you  can  before  the  character 
catches  you.  The  game  ends  when  the  two  char- 
acters collide  or  when  you  accumulate  10,000 
points. 

There  are  three  speed  levels:  slow,  moderate, 
and  fast.  Both  characters  move  at  the  same  speed, 
but  the  computer  character  beats  you  on  the  cor- 
ners. Also,  you  have  to  change  directions  manu- 


It's  time  for  your 
computer  to  grow  up. 

Meet  PractiCalc  The  world's  most  versatile  spreadsheet  at  only  $40.* 


Games  are  fun  when  it's  time  to  play.  But  at 
heart,  your  Commodore  64"  or  VIC-20'"  is  a  full- 
grown  computer 
straining  to 
gallop  at  the 
touch  of  your 
fingers. 

But  the  problem 
is,  most  software's 
been  designed  for 

toys.  Not  for  real  Commodore  64  and  VIC-20. 

computers.  Until  now.         ^^^  i^^*  f°^  9^"^^^  ■  ■  ■ 

Now  comes  PractiCalc.  And  there's  not  much 
in  the  world  of  grown- 
up computing  it  won't 
do.  It'll  keep 
addresses  (in 
alphabetical  or 
numerical  order), 
phone  numbers 
(likewise),  make 
budgets  and  menus, 
project  profits,  keep 
track  of  expenses, 
inventories,  investments,  what  have  you.  For 
your  home,  your  school,  your  business. 

PractiCalc  gives  you 


I".. 

r   ■ 

?tA   ILUi 


t 


Budgets,  inventories, 
projections,  you  name  it. 


mimMmMyvmrn.  iim^ 


■w 


Jl ,-  ij , 


I  "3 


spreadsheet  analysis . . . 

square  roots,  logarithms,  exponential 


everything  you'd 
expect  from  a 
spreadsheet,  like 
adding  and 
subtracting, 
multiplying 
and  dividing, 
calculating 


a^^g— sjanM( 


High  or  low 

resolution  graphics.. 


numbers  and  even 
trig  functions.  And 
PractiCalc  gives  you 
a  lot  more. 

Want  to  make 
a  chart?  Hit  a  key 
and  the  high  or  tow 
resolution  graphics  of 
PractiCalc  Plus  or 
PractiCalc  64  will  turn 
numbers  into  graphs.  It'll  even  print  out 
everything  that  shows  on  the  screen. 

Want  a  lot  of  facts  and  figures  at  your 
fingertips?  PractiCalc  stores  more  than  2,000 
cells  in  up  to  100  columns  and  250  rows.  It'll 
sort  them,  search  them,  or  shuffle  them  for  you. 

You  can  add 
entries,  delete  them, 
or  move  them  around 
-numerically  or 
alphabetically,  and 
instantly,  of  course. 
And  you'll  find 
PractiCalc  unusually 
friendly,  flexible,  and 
forgiving. 

All  of  which  is  a  far  cry  from  just  playing  with 
a  joystick.  Still, 
PractiCalc  has  one 

thing  in  common    p, .,,  .(.« 
with  a 
computer 
game. 
The  price. 


High-speed  and 
wild  card  search . 
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Only  $40. 
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*S40  is  suggested  retail  price  for  iape  version  of  Prac(iCatc-20  (S45  for  disk  version;  PractiCaic  Plus  or  PractiCalc  64  =  $50  for  tape  version.  £55  for  disk). 
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ally;  it  doesn't.  The  computer  moves  its  character 
according  to  the  same  "left-turn  rule"  used  by  the 
mouse  in  Charles  Bond's  original  maze  generator 
program.  You  must  be  aware  of  this  in  order  to 
find  temporary  hiding  places. 

There's  another  tricky  feature,  too.  Some- 
times, when  the  two  characters  are  moving  from 
opposite  directions  toward  each  other,  the  com- 
puter character  goes  right  on  by  and  no  collision 
occurs.  Just  breathe  a  sigh  of  relief  and  continue 
munching  -  you  were  lucky. 

The  maze  in  Munchmaze  Is  not  constructed 
on  the  screen,  but  in  another  area  of  RAM.  It  is 
then  transferred  to  the  screen,  where  the  maze 
appears  all  at  once;  then  there  is  a  one-second 
delay  before  the  action  begins.  If  you  break  out  of 
the  program  for  any  reason  just  type  SYS  12311  to 
restart. 

Programs  4  and  5  are  versions  of  Munchmaze 
for  4.0  and  Upgrade  PETs,  respectively.  Program 
6  is  a  64  version  of  Munchmaze. 

If  you  would  rather  not  type  these  programs 
yourself,  I'll  make  copies  for  you.  Send  a  self- 
addressed,  stamped  mailer,  a  blank  cassette,  and 
$3  to: 

Gnn/  Mnrsn 

320  Terrace,  Apl.  2-S 

Flushing,  Ml  48433 

I  have  available  the  Maze  Generator  for  all  PETs 
and  the  VIC,  and  Munchmaze  for  Original,  Up- 
grade or  4.0  PETs.  Please  tell  me  which  version(s) 
you  want. 

Special  Note  To  8032  And 
Fat  Forty  Owners 

Because  of  keyboard  differences  between  "old 
style"  40-column  PETs  and  "Fat  Forties,"  Munch- 
maze will  not  work  properly  on  Fat  Forties,  or 
8032s.  Your  machine  is  a  "Fat  Forty"  if  a  bell  rings 
when  you  turn  it  on, 

Munchmaze  4.0  will  work  properly  on  these 
computers  if  you  type  in  these  two  lines  instead 
of  the  ones  that  appear  in  the  listings: 

13314  DATA  255,255,255,40,0,182 
13320  DATA  184,180,178,160,32,58 

Program  i: 

Maze  Generator  For  40-Column  PET  With 
Original,  Upgrade,  Or  4.0  ROMs 

50  REM  FOR  40-COLUMN  PET/CBMS  WITH  ORIGI 

NAL,  UPGRADE,  OR  4 . 0  ROMS 
100  CLR:  POKE  59468,12:  X=RND(-TI) 
110  P=PEEK{ 50003 ) :  Z=84-82* (P=0 ) 
120  S=826:  A=S 
130  PRINT  "{CLR}[2  D0WN}L0ADING . . . 

[2    down}" 
140  READ  X$:  IF  X$="XXX"  THEN  200 
150  R=ASC(X$):  Q=VAL(MID$ (X$ , 1- ( R<48 ) } ) 
160  IF  R=42  THEN  X=Z+Q:  GOTO  190 
170  IF  R<>43  THEN  X=Q:  GOTO  190 
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180  Y=S+Q:  X=INT(Y/256) :  Y=Y-256*X:  POKE 

A,Y:  A=A+1 
190  POKE  A,X:  A=A+1 :  GOTO  140 
200  IF  P=0  THEN  POKE  S+63,69:  POKE  S+66, 

222 
210  IF  P=160  THEN  POKE  S+63,41:  POKE  S+6 

4,210 
220  PRINT  "ACTIVATE  WITH  { RVS } SYS " r  S+8 
230  PRINT  "{2  DOWN} PRESS  ANY  KEY  FOR  DEM 

ONSTRATION  MAZES." 
240  PRINT  "{2  DOWN} PRESS  'Q?'  WHEN  YOU  WA 

NT  TO  QUIT. [3  DOWN}":  GOTO  260 
250  SYS  S+8:  PRINT  "[H0ME}PRESS  KEY..." 
260  GET  X$:  IF  X$=""  THEN  260 
270  IF  X$<>"Q"  THEN  250 
280  DATA  1,  0,  216,  255,  255,  255,  40,  0 

,  169,  81 
290  DATA  133,  *0,  169,  40,  133,  *2,  169, 

128,  133,  *1 
300  DATA  133,  *3,  169,  147,  32,  210,  255 

,  162,  0,  160 
310  DATA  0,  169,  160,  145,  *2,  200,  192, 

39,  208,  249 
320  DATA  24,  165,  *2,  105,  40,  133,  *2, 

144,  2,  230 
330  DATA  *3,  232,  224,  23,  208,  229,  160 

,  0,  169,  4 
340  DATA  145,  *0,  32,  127,  223,  165,  140 

,  41,  3,  133 
350  DATA  1,  170,  10,  168,  24,  185,  +0,  1 

01,  *0,  133 
360  DATA  *4,  185,  +1,  101,  *1,  133,  *5, 

24,  185,  +0 
370  DATA  101,  *4,  133,  *2,  185,  +1,  101, 

*5,  133,  *3 
380  DATA  160,  0,  177,  *2,  201.  160,  208, 

18,  138,  145 
390  DATA  *2,  169,  32,  145,  *4 ,  165,  *2, 

133,  *0,  165 
400  DATA  *3,  133,  *1,  76,  +62,  232,  138, 

41,  3,  197 
410  DATA  1,  208,  189,  177,  *0,  170,  169, 

32,  145,  *0 
420  DATA  224,  4,  240,  26,  138,  10,  168, 

162,  2,  56 
430  DATA  165,  *0,  249,  +0,  133,  *0,  165, 

*1,  249,  +1 
440  DATA  133,  *1,  202,  208,  238,  76,  +62 

,  96,  XXX 
450  REM  MAKE  THESE  ADDITIONS  &  CHANGES  T  ' 

O  LOAD  MACHINE  CODE  INTO  HIGH  RAM: 
460  REM 
470  REM{2  SPACES}70  P=PEEK{ 50003 ) :  M=52- 

82*(P=0) 
480  REM[2  SPACES]80  Y=PEEK(M)+256*PEEK (M 

+1)-177:  X=INT(y/256);  Y=Y-256*X 
4^0  REM {2  SPACES  J  90  POKE  M,Y:  POKE  M+1,X 

:  POKE  M-4,Y:  POKE  M-3,X 
500  REM{2  spaces} 110  P=PEEK{ 50003 ) :  Z=84 

-82*(P=0):  M=52-82*(P=0) 
510  REM{2  SPACES}120  S=PEEK{m)+256*PEEK( 

M+1 ) :  A=S 


Program  2:  Maze  Generator  For  VIC 

10  REM  MAZE  (VIC) 

20  REM  MAZE  GENERATOR  IN  MACHINE  LANGUAG 
E 
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ANNOUNCING 


CodePro-64 


A  new  concept  in 

interactive  visual 

learning . . . 
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Now  you  can  learn  lo  code  m  BASIC  and  develop 
advanced  programming  skills  with  graphics,  spnies  and 
music— vi»uaily.  You  learn  by  inleracUng  wilh  CodePro- 
64,  a  new  concept  m  mseraclive  visual  learnihg. 

SEE  PROGRAM  EXECUTION 

Imagine  actually  seeing  BASIC  statements  execute 
CodePro-64  guides  you  through  structured  examples  ot 
BASIC  program  segments  You  enler  Ihe  requested  data 
or  let  CodePro-64  do  the  typing  for  you  (It  will  not  let  you 
make  a  mistake) 

AMer  enlering  an  example  you  invoke  our  exclusive 
BasicView"  which  shows  you  how  Ihe  BASIC  program 
exampie  executes. 

You  step  through  and  actually  see  Ihe  execution  ol 
sample  program  statements  by  simply  pressing  the  space 
bar  CodePro-64  does  the  rest. 

You  see  statements  with  corresponding  flow  chart 
graphic*  and  variable  value  displays  You  learn  by  visual 
examples 
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EXTENSIVE  TUTORIAL 

CodePro-64  s  extensive  tutorial  guides  you  through 
each  BASIC  command  program  statement,  and  fund  on 
You  gel  clear  explanations  Then  you  enter  program 
stalements  as  mieraclive  examples  Where  appropriate, 
you  invoke  BasicView  to  see  examples  execute  and 
walch  their  flow  Charts  and  variables  change 

Byseemggfaphicdispiaysol  program  segment  execu- 
tion you  learn  I5y  visual  example  You  learn  taster  and 
grasp  programming  concepts  easier  wnh  CodePro-64 
DEcause  you  immediately  see  tne  results  ol  your  input 

You  c;ontrol  your  learning  You  can  gotrirougfi  the  tutor- 
ai  segueniiaiiy,  or  return  to  the  mam  menu  and  select 
ditfereni  topics,  or  use  keywords  to  select  language  ele- 
ments to  study  You  can  page  back  and  lorlh  iDetv^een 
screens  vjithm  a  topic  at  Ihe  touch  ol  a  lunction  key 


CodePro-6't  lel»  you  follow  your  Interests  and  prac- 
tice with  interactive  examples  But  you  can  never  gel 
"losl".  Ft  will  always  return  you  to  the  mam  menu  Once 
you  have  practiced  and  mastered  the  BASIC  language 
elements  you  move  on  !0  more  advanced  concepts  You 
learn  about  sprite  and  music  programming 

SPRITE  GENERATOR  &  DEMONSTRATOR 

CodePro-64s  sprite  generator  lels  you  define  your 
own  sprites  on  the  screen.  You  learn  how  to  define  sprites 
and  what  data  values  correspond  to  your  sprite  delini- 
iions  (You  can  then  use  these  values  to  write  your  own 
programs  )  You  can  easily  experiment  with  ditterent  defi- 
nitionsandmakechangeslo  immeOialely  see  the  effects. 


We  al  so  hel  p  you  learn  to  program  with  sprites  by  giv<ng 
you  a  sprite  demonstrator  so  you  can  see  the  effect  of 
changing  register  values  You  can  expenmenl  by  moving 
your  sprite  around  m  a  screen  segment,  change  its  color 
or  priorily.  and  see  the  eflects  ot  your  cfianges  You  learn 
by  visual  examples 

MUSIC  GENERATOR  i  DEMONSTRATOR 

To  leach  you  music  programming  CodePro-64  gives 
you  an  interactive  music  generator  and  demonstrator 
First  we  help  you  set  all  your  SID  parameters  (attack/ 
decay,  sustain/release,  waveform,  etc  I  Then  you  enter 
notes  to  play  and  we  show  your  turte  graphically  as  it 
plays,  note  by  note,  on  the  scale  You  learn  by  seeing  and 
hearing  the  results  of  your  input 


OUR  GUARANTEE 
We  guarantee  your  satlsfactkMi.  You  must  be 
satisfied  with  CodePro-64  for  Ihe  Commodore- 
64.  Try  i(  for  1 0  days  and  if  for  any  reason  you  are 
not  satisfied  return  it  to  us  (undamaged)  for  a  full 
refund.  No  risk. 


Our  music  demonstrator  lets  you  experiment  with  var- 
ious combinations  ol  music  programming  parameters 
and  hear  the  results  You  can  quickly  modHy  any  of  Ihe 
SID  register  values  to  hear  the  effects  of  tne  change  For 
exampie.  you  could  easily  change  waveform  and  attack/ 
decay  values  while  holding  all  other  SID  values  constant 
By  seeing  youi  input  and  hearing  the  result  you  quickly 
learn  bow  to  create  new  musical  sounds  and  special 
sound  effects 

AND  MORE... 

We  don't  have  enough  space  to  tell  </ou  everything 
CodePro-64  oflers  You  need  to  see  for  yourself  BASIC 
tutonals.  graphics,  sprites,  music,  keyboard  review,  sam- 
ple programs— the  mam  menu  shown  above  gives  you 
]us1  a  summary  of  the  contents  of  this  powerful  educa- 
tional product 

Whether  you're  a  beginning  programmer  or  an  expen- 
enced  professional.  CodePro-64  will  help  you  improve 
your  Commocore  64  programming  skills  Were  sure 
because  CodePro-64  was  developed  by  a  team  of  Iwo 
professionals  with  over 25  years  ot  software  development 
experience 

CodePro-64  IS  a  professional  qualiiy  educational  pro- 
gram for  the  serious  student  of  personal  computing  And 
Its (ully  guaranteed.  Order  yours  today 

HOW  TO  ORDER 

Order  your  copy  ol  CodePro-6'1  today  by  mail  or  phone 
Send  only  $59  95  plus  S3 00  shipping  and  handling  to 
SYSTEMS  MANAGEMENT  ASSOCIATES 
3700  Computer  Drive,  Dept  C 
Raleigh,  NC  27609 
Please  specity  tape  or  diskette  version  MasterCard/ 
VISA  accepted  For  faster  service  on  credit  card  orders 
call  (91 9)-r87  7703 

Commodore  64  is  a  trademark  of  Commodore  Business 
Machines.  Inc 

Ad  no  733.  Copyright  1983,  SMA 
Dealer  inquiries  invited. 


A  game  of  "Miiuchiiinzc"  bcin'^  pln\/cii  on  the  64. 


224,  21,  208 
400  DATA  229,  160,  0,  169,  4,  145,  87,  3 

2,  148,  224 
410  DATA  165,  143,  41,  3,  133,  1,  170,  1 

0,  168,  24 
420  DATA  185,  +0,  101,  87,  133,  91,  185, 

+1,  101,  88 
430  DATA  133,  92,  24,  185,  +0,  101,  91, 

133,  89,  185 
440  DATA  +1,  101,  92,  133,  90,  160,  0,  1 

77,  89,  201 
450  DATA  160,  208,  18,  138,  145,  89,  169 

,  32,  145,  91 
460  DATA  165,  89,  133,  87,  165,  90,  133, 

88,  76,  +87 
470  DATA  232,  138,  41,  3,  197,  1,  208,  1 

89,  177,  87 
480  DATA  170,  169,  32,  145,  87,  224,  4, 

240,  26,  138 
490  DATA  10,  168,  162,  2,  56,  165,  87,  2 

49,  +0,  133 
500  DATA  87,  165,  88,  249,  +1,  133,  88, 

202,  208,  238 
510  DATA  76,  +87,  96,  XXX 


50  REM  FOR  THE  VIC-20  (ANY  MEMORY  SIZE) 
100  Y=PEEK(55)+256*PEEKC56)-202;  X=INT(Y 

/256):  Y=Y-256*X 
110  POKE  55, Y:  POKE  56, X:  POKE  51, Y:  POK 

E  52, X 
120  CLR:  POKE  36879,27:  PRINT  CHR$(142); 

:  X=RND(-TI) 
130  S=PEEK(55)+256*PEEK(56) :  A=S 
140  PRINT  "{CLR} {2  DOWN } LOADING  ... " 
150  READ  X$:  IF  X|="XXX"  THEN  200 
160  R=ASC{X$):  Q=VAL{MID5 {X$ , 1- ( R<48 ) ) ) 
170  IF  R<>43  THEN  X=Q:  GOTO  190 
180  Y=S+Q:  X=INT(Y/256) :  Y=Y-256*X:  POKE 

A,Y;  A=A+1 
190  POKE  A,X:  A=A+1:  GOTO  150 
200  PRINT  "[HOME}":  IF  PEEK(210)<>16  THE 

N  220 
210  POKE  S+17,16:  POKE  S+45,148:  POKE  S+ 

48,149 
220  PRINT  "{down} ACTIVATE  WITH" 
230  PRINT  "{2  spaces} [RVS} SYS";  S+8 
240  PRINT  "{2  D0WN]PRESS  ANY  KEY  FOR" 
250  PRINT  "DEMONSTRATION  MAZES." 
260  PRINT  "{2  DOWN] PRESS  'Q'  WHEN  YOU" 
270  PRINT  "WANT  TO  QUIT.":  GOTO  290 
280  SYS  S+8:  PRINT  " [HOME } PRESS  KEY..." 
290  GET  X$:  IF  X$=""    THEN  290 
300  IF  X$<>"Q"  THEN  280 
310  PRINT  "{CLR}":  POKE  36879,27 
320  DATA  1,  0,  234,  255,  255,  255,  22,  0 

,  169,  45 
330  DATA  133,  87,  169,  22,  133,  89,  169, 

30,  133,  88 
340  DATA  133,  90,  169,  25,  141,  15,  144, 

32,  95,  229 
350  DATA  32,  148,  224,  165,  143,  41,  7, 

201,  2,  48 
360  DATA  245,  160,  0,  153,  0,  150,  153, 

0,  151,  200 
370  DATA  208,  247,  162,  0,  160,  0,  169, 

160,  145,  89 
380  DATA  200,  192,  21,  208,  249,  24,  165 

,    89,    105,    22 
390    DATA   133,    89,    144,    2,    230,    90,    232, 
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Program  3:  Maze  Generator  For  The  64 

10  1=49152 : IFPEEK(l+2 )=216THENSYS49160: E 

ND 
20  READ  A: IF  A=256  THEN  SYS  49160 :END 
30  POKE  I,A: 1=1+1 :GOTO  20 
49152  DATA  1,0,216,255,255,255,40 
49160  DATA  0,169,81,133,251,169,40 
49168  DATA  133,253,169,4,133,252,133 
49176  DATA  254,169,147,3  2,210,255,162 
49184  DATA  0,160,0,169,160,145,253 
49192  DATA  200,192,3  9,208,249,24,165 
49200  DATA  253,105,40,133,253,144,2 
49208  DATA  230,254,2  32,224,23,208,229 
49216  DATA  160,0,169,4,145,251,169 
49224  DATA  255,141,15,212,169,128,141 
49232  DATA  18,212,173,27,212,41,3 
49240  DATA  133,173,170,10,168,24,185 
49248  DATA  0,192,101,251,133,170,185 
49256  DATA  1,192,101,252,133,171,24 
49264  DATA  185,0,192,101,170,133,253 
49272  DATA  185,1,192,101,171,133,254 
49280  DATA  160,0,177,253,201,160,208 
49288  DATA  18,138,145,25  3,169,32,145 
49296  DATA  170,165,253,133,251,165,254 
49304  DATA  133,252,76,62,192,232,138 
49312  DATA  41,3,197,173,208,189,177 
49320  DATA  251,170,169,32,145,251,224 
49328  DATA  4,240,26,138,10,168,162 
49336  DATA  2,56,165,251,249,0,192 
49344  DATA  133,251,165,252,249,1,192 
49352  DATA  133,252,202,208,238,76,62 
49360  DATA  192,169,1,160,0,153,0 
49368  DATA  216,153,0,217,153,0,218 
49376  DATA  153,0,219,200,208,241,96,256 

Program  4:  Munchmaze  For  4.0  PETs 

5  PRINT" E CLR} PLEASE  WAIT...." 

10  1=12288 

20  READ  A: IF  A=256  THEN  SYS  12311 

30  POKE  I, A; 1=1+1: GOTO  20 

12288  DATA  20,4,10,0,88,178 

12294  DATA  187,40,171,84,73,41 

12300  DATA  58,158,49,48,52,56 
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CRICKET  -  From  the  company  that  brought  you  Asteroidz,  Munchman  and  a  host  of  other 
blockbusters.  We  now  present  CRICKET.  This  is  a  challenging  game  with  a  cast  ot  characters  you 
will  love  and  hate.  All  you  haue  to  do  is  get  Cherp  from  one  side  of  the  road  to  the  river  and  then 
across  the  river.  Not  so  fast  though.  First  you  have  to  figure  out  how  to  dodge  the  traffic  and  get  to 
the  center.  Then  how  are  you  going  to  get  across  the  river?  Look  here  comes  a  log  —  even  a  turtle. 
Hitch  a  ride  across  the  river  and  jump  from  one  to  the  other.  Keep  a  sharp  eye  out  for  Ade  the  Gator. 
He  loves  to  haue  crickets  for  lunch.  How  many  timescanyougelacrosstheroadandriucr.  You  will 
have  to  work  as  fast  as  you  can.  Time  limit  and  bonus.  You  will  find  this  game  addictive  and 
challenging  and  it  will  entertain  you  with  hours  of  fun  and  enjoyment.  $14.95 

BUG  BLAST  -  If  you  think  Centipede  was  fun  —  look  out  for  BUG  BLAST.  A  new  and  fast  action 
arcade  game  with  realistic  smooth  action,  quality  hires  graphics  and  trouble.  Its  very  calm  as  the 
first  wave  attacks.  Only  a  few  bugs  to  kill.  Just  shoot  thru  the  cactus  and  wipe  them  out.  After  a  few 
attacks  you  feel  you  haue  everything  under  control.  Now  the  attacks  really  start.  Those  protection 
areas  haue  to  go.  Blast  away.  Will  they  ever  stop?  OK  —  the  BUGS  got  me  this  time.  Now  its  my 
turn,  Just  one  more  time  —  BUG  BLAST  —  Now  its  your  turn  to  get  even.  $14.95 

BOMB'S  AWAY  ■  Can  you  stop  him?  The  crazy  bomber  drops  the  bombs  from  the  top  of  the 
screen.  You  get  3  buckets  to  catch  them.  Before  you  know  it  bombs  are  falling  so  fast  you  wonder 
when  he  will  slop.  Just  when  you  think  you  haue  him  under  control  your  bucket  gets  smaller.  Is  your 
hand  quicker  than  your  eye?  Special  S9.95 

PARATROOPER  •  You  are  the  only  one  left  to  stop  them.  The  sky  is  full  of  enemy  choppers. 
Paratroopers  keep  dropping  into  your  area  with  non-stop  barrage  of  enemy  troops.  They  are  out  to 
destroy  you.  This  new  game  is  an  unbeatable  blend  of  arcade  action  and  quick  thinking  strategy. 
You  must  make  every  shot  count  —  don't  be  to  last  on  the  trigger.  Every  time  you  hit  a  chopper  or ' 
paratrooper  you  get  extra  points.  Wait  until  you  see  the  climax  of  this  game  —  you  won't  believe  it! 
This  is  a  multiple  skill  level  game  with  razor-sharp  graphics  and  sound.  $19.95 

MOW  -  Get  ready  for  the  fast  and  furious  action  of  the  craziest  mower  you  have  ever  seen.  How 
much  grass  can  you  cut?  Joystick  moves  your  mower  around  as  fast  as  you  dare.  Watch  out  for 
granny's  dafodils  and  grandpa's  radio  antenna.  $14.95 

COSMIC  CRUZER  •  Bring  the  coin  op  game  into  your  VIC.  3  Scenarios.  Your  Cruzer  moves  over 
a  mountainous  landscape  &  into  a  tunnel  of  surface  ■  to  ■  air  missle,  silos  and  ground  -  to  •  air 
weapons.  If  you  can  make  it  in  and  out  of  the  tunnel  you  fly  into  the  asteroid  field.  Drop  bombs  and 
fire  missiles  a!  the  fuel  dumps  to  keep  your  fuel  supply  up.  If  you  are  really  good  you  can  get  to  the 
base  and  try,  to  destroy  it.  Wedon'tknowof  any  one  that  has  hit  the  base  yet.  Maybe  you  will  be  the 
1st.  Cosmic  Cruzer  is  a  fun  filled  magnificently  rendered  home  video  game  that  will  last  for  months 
of  challenge.  Highly  addicting.  Hi-Res  Graphics,  Color  &  Sound.     SPECIAL  PRICE  -  $14.95 

SPACE  PAK  -  Can  you  survive?  3  space  games  with  the  sights  and  sounds  of  arcade  games.  The 

excitement  builds  as  the  action  isun-ending.  Blast  away  at  everything  in  sight.  The  alien  attacks  will 
stop  at  nothing  to  destroy  you.  Prepare  for  battle,  there  is  no  escape,  unless  you  can  help,  Can  you 
survive?  Hi-Res,  Color,  Graphic  &  Sound.  Joystick  or  keyboard.  $19.95 

ALIEN  INVASION  -  Invaders  from  space  are  attacking  your  home  planet.  Hurry  and  man  your 
lasers  and  prepare  your  robot  forces  for  the  inevitable  attack  of  the  Alien  Invaders.  The  excitment 
builds  as  you  command  a  battery  of  missile  bases  in  a  bunker.  Each  inuader  has  a  laser  aimed  right  at 
you.  Will  they  euer  stop.  Only  you  can  save  the  Galaxy.  You  can  compete  with  4  people  in  the  solar 
system.  There  are  20  levels  of  play.  If  you  destroy  the  Aliens  in  the  correct  order  you  will  receive 
bonus  points.  Can  you  get  the  top  score?  $14.95 

TARGET  COMMAND  -  The  whole  West  Coast  is  being  bombarded  and  only  you  can  save  it.  You 
are  at  the  controls  of  the  missile  launcher  and  hold  the  destiny  of  our  country  in  your  hands.  It  takes 
a  cool  head,  not  hand  and  fast  reflexes  to  zap  those  missiles  right  out  of  the  air.  Get  ready  to 
pulverize  —  atomize  and  vaporize  them.  Oh,  my  God,  those  warheads  are  heading  right  for  our 
ammo  dumps.  They  are  everywhere.  NO  ONE  CAN  SAVE  US  —  EXCEPT  YOU.  You  must  move 
your  laser  into  position  and  fire  as  fast  as  you  dare.  Time  limit  with  arcade  style  excitement.  Protect 
your  ammo  at  all  costs.  10  levels  of  play.  $14.95 

SNAKEOUT  -  Slip  your  snake  into  position  and  score  by  chomping  the  blocks.  Watch  the  way  you 
slither  because  your  escape  routes  get  smaller.  2  Bonus  games  included.  $14.95 

HiiAD-ON  -  Please  do  not  buy  this  game  if  you  are  the  type  that  says  Til  play  it  just  one  more  time". 
Players  have  been  known  to  start  playing  HEAD  ON  at  8:30  p.m.  and  at  2  a.m.,  wonder  where  the 
time  went?  Have  you  euer  tried  to  explain  to  someone  why  you  played  a  game  for  five  and  a  half 
hours.  We  know  of  no  remedy  for  the  addiction  to  HEAD  ON  except  to  beat  the  VIC  on  level  9.  No 
one  has  done  it,  YET,  will  you?  We  think  not.  Move  your  car  as  fast  as  you  can  dare  around  the 
tracks.  You  get  3  cars  and  l^UST  avoid  the  computer  car.  Pointsfor  the  most  dots  covered.  Bonus 
cars,  nine  levels  of  play.  $14.95 
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12306  DATA  0,0,0,234,234,169 
12312  DATA  12,141,76,232,169,0 
12318  DATA  141,96,10,141,97,10 
12324  DATA  169,147,32,210,255,169 
12330  DATA  44,141,153,51,169,52 
12336  DATA  141,154,51,162,31,169 
12342  DATA  129,32,144,51,169,0 
12348  DATA  141,98,10,141,99,10 
12354  DATA  133,143,24,165,142,105 
12360  DATA  2,133,2,165,142,197 
12366  DATA  2,208,250,169,147,32 
12372  DATA  210,255,32,92,51,162 
12378  DATA  39,169,160,157,39,128 
12384  DATA  157,151,131,202,208,247 
12390  DATA  169,80,133,84,169,128 
12396  DATA  133,85,162,21,160,0 
12402  DATA  169,160,145,84,160,38 
12408  DATA  145,84,32,174,51,202 
12414  DATA  208,240,169,43,141,153 
12420  DATA  51,169,53,141,154,51 
12426  DATA  162,166,169,128,32,144 
12432  DATA  51,162,0,169,32,157 
12438  DATA  0,11,157,0,12,157 
12444  DATA  0,13,157,0,14,232 
12450  DATA  208,241,169,81,13  3,84 
12456  DATA  169,40,133,86,169,11 
12462  DATA  133,85,133,87,162,0 
12468  DATA  160,0,169,160,145,86 
12474  DATA  200,192,39,208,249,24 
12480  DATA  165,86,105,40,133,86 
12486  DATA  144,2,230,87,232,224 
12492  DATA  23,208,229,160,0,169 
12498  DATA  4,145,84,32,41,210 
12504  DATA  165,140,41,3,133,1 
12510  DATA  170,10,168,24,185,255 
12516  DATA  51,101,84,133,88,185 
12522  DATA  0,52,101,85,133,89 
12528  DATA  24,185,255,51,101,88 
12534  DATA  133,86,185,0,52,101 
12540  DATA  89,133,87,160,0,177 
12546  DATA  86,201,160,208,18,138 
12552  DATA  145,86,169,32,145,88 
12558  DATA  165,86,133,84,165,87 
12564  DATA  133,85,76,213,48,232 
12570  DATA  138,41,3,197,1,208 
12576  DATA  189,177,84,170,169,32 
12582  DATA  145,84,224,4,240,26 
12588  DATA  138,10,168,162,2,56 
12594  DATA  165,84,249,255,51,133 
12600  DATA  84,165,85,249,0,52 
12606  DATA  133,85,202,208,238,76 
12612  DATA  213,48,169,193,141,153 
12618  DATA  51,169,53,141,154,51 
12624  DATA  162,130,138,32,144,51 
12630  DATA  32,228,255,208,251,32 
12636  DATA  228,255,240,251,201,81 
12642  DATA  208,13,169,147,32,210 
12648  DATA  255,32,92,51,169,13 
12654  DATA  76,210,255,201,49,48 
12660  DATA  230,201,52,16,226,56 
12666  DATA  23  3,48,133,2,169,147 
12672  DATA  32,210,255,162,0,189 
12678  DATA  0,11,157,0,128,189 
12684  DATA  0,12,157,0,129,189 
12690  DATA  0,13,157,0,130,189 
12696  DATA  0,14,157,0,131,232 
12702  DATA  208,229,32,92,51,24 
12708  DATA  165,2,105,176,141,0 
12714  DATA  128,141,38,128,24,165 
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12720 

DATA 

12726 

DATA 

12732 
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12738 
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12744 

DATA 

12750 
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12756 
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12762 
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12768 
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12774 
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12780 
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12786 
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12792 
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12798 
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12804 
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12810 
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12816 
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12822 
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12828 
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12834 
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12840 
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12846 

DATA 

12852 
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12858 
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12864 
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12870 
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12876 
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12882 
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12888 

DATA 

12894 
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12900 
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12906 

DATA 

12912 

DATA 

12918 

DATA 

12924 

DATA 

12930 

DATA 

12936 

DATA 

12942 

DATA 

12948 

DATA 

12954 

DATA 

12960 

DATA 

12966 

DATA 

12972 

DATA 

12978 

DATA 

12984 

DATA 

12990 

DATA 

12996 

DATA 

13002 

DATA 

13008 

DATA 

13014 

DATA 

13020 

DATA 

13026 

DATA 

13032 

DATA 

13038 

DATA 

1,3044 

DATA 

13050 

DATA 

13056 

DATA 

13062 

DATA 

13068 

DATA 

13074 

DATA 

13080 

DATA 

13086 

DATA 

13092 

DATA 

13098 

DATA 

13104 

DATA 

13110 

DATA 

13116 

DATA 

13122 

DATA 

13128 

DATA 

143,105,60,133,255,165 

143,197,2  55,208,250,169 

81,133,84,133,88,169 

128,133,85,133,89,169 

1,133,255,162,2,134 

1,160,0,169,102,145 

84,169,0,133,143,166 

1,138,10,168,24,185 

255,51,101,84,133,86 

185,0,52,101,85,133 

87,160,0,177,86,201 

160,208,9,202,138,41 

3,133,1,76,217,49 

201,81,208,3,76,184 

50,169,102,145,86,169 

58,145,84,165,86,133 

84,165,87,133,85,232 

138,41,3,133,1,165 

255,240,8,160,0,132 

255,169,81,145,88,162 

0,165,151,221,7,52 

240,8,232,224,4,208 

246,76,107,50,138,10 

168,24,185,255,51,101 

88,133,90,185,0,52 

101,89,133,91,160,0 

177,90,201,160,240,25 

201,58,208,3,32,186 

51,160,0,169,81,145 

90,169,32,145,88,165 

90,133,88,165,91,133 

89,165,143,197,2,208 

250,173,98,10,201,16 

208,61,173,99,10,201 

39,208,54,169,81,133 

84,169,128,133,85,162 

0,160,0,177,84,201 

58,208,7,32,186,51 

169,32,145,84,200,192 

37,208,238,32,174,51 

232,224,21,208,228,162 

0,189,17,54,240,6 

157,51,128,232,208,245 

76,51,51,76,213,49 

169,102,145,86,169,58 

145,84,165,88,133,84 

165,89,133,85,56,165 

84,233,41,133,86,165 

85,233,0,133,87,169 

240,133,2,169,255,133 

143,165,86,133,88,155 

87,133,89,169,0,133 

1,160,0,162,0,177 

88,221,11,52,240,5 

232,224,8,208,246,134 

254,56,169,7,229,254 

170,189,11,52,145,88 

200,192,3,208,224,24 

165,88,105,40,133,88 

144,2,230,89,230,1 

165,1,201, 3,208,203 

165,143,208,252,198,2 

208,179,162,0,189,34 

52,240,6,157,55,128 

2  32,208,245,56,173,98 

10,237,96,10,141,100 

10,173,99,10,237,97 

10,13,100,10,240,17 

144,15,173,98,10,141 


Synthesound 


Fantastic  Sale! 

HES  Special  Programs 
For  VIC-20  Computer 

Call  Today! !  Call  Today! !  Call  Today! ! 

SYNTHESOUND  Sale  $19.95 

•  Fantastic  Sound  &  Music  •  Piano  Keyboard 

Now  your  VIC-20  can  be  used  as  a  state-of-the-art  music  synthesizer  and  special  effects  generator!  A 
very  user  friendly  manual  guides  you  through  sessions  of  learning  and  development  of  your  syn- 
thesizer "stylo"!  You  can  program  Synthesound  to  sound  like  many  different  instruments  like 
bagpipes,  organ,  bass  and  many  others.  Synthesound  brings  technical  musical  abilities  to  any  VIC-20 
user.  Prepare  to  step  into  the  exciting  world  of  the  futuristic  computer  musician. 

•  VIC  keyboard  used  as  a  2  octave,  fast  attack  keyboard.  •  No  additional  tiafdware  required. 

•  3  voices  with  4'/!  octave  range.  •  Spectacular  special  effects. 

•  4  low  frequency  ocillators.  •  4  voice/20  note  sequencer  for  repeating  melodies  or  rhythms. 

•  4  envelope  shaping  controls  (Attack,  Decay,  •  High  resolution  piano  keyboard  display. 
Sustain,  Release). 

List  $44.95  /  Sale  $19.95 

VIC  FORTH  LANGUAGE 

Faster  than  BASIC  —  easier  than  Assembly  language  —  Language  of  Robots. 

VIC  FORTH  is  an  exciting  new  cartridge  for  your  VIC-20  computer.  You  now  have  a  language  that  is 
more  powerful  than  BASIC  and  easier  to  program  than  assembler!  VIC  FORTH  is  a  nearly  complete 
implementation  of  the  "FORTH  INTEREST  GROUP"  (fig.)  version  of  FORTH.  The  VIC  FORTH  editor 
follows  closely  the  standard  FORTH  editor  described  in  the  book,  "Starting  FORTH",  plus  it  has  many, 
many  additional  features. 

•  Full- screen  editor  which  has  16  lines  of  64  characters  each  (standard  FORTH  Screen)  through  use  of  a  horizontal  scrolling 
window. 

•  User  definable  words;  this  means  a  function  not  already  supported  can  tie  created  by  you  and  added  to  VIC  FORTH  for 

future  use. 

•  Full  VIC  sound  and  color  capabilities. 

•  Runs  in  standard  5k  VIC. 

•  Output  to  printers  and  disks  and  tape  machines. 

•  Up  to  24k  additional  memory  can  tie  added. 

•  31  characters  for  variable  names. 

List  $59.95  /  Sale  $39.95 

TURTLE  GRAPHICS 

•  Create  colorful  pictures  and  graphics  •  Learn  how  computers  compute. 

Turtle  Graphics  is  an  exciting  and  fun  way  to  discover  computer  programming  concepts.  Turtle 
Graphics  is  an  easy-to-learn  computer  language.  It  enables  the  beginning  programmer  to  master  the 
computer  in  just  a  few  minutes.  By  telling  an  imaginary  turtle  how  to  roam  about  on  the  VIC's  screen, 
the  Turtle  Graphics  programmer  can  create  colorful  and  artistic  pictures.  As  one  becomes  more  and 
more  adept  at  teaching  the  turtle  to  paint  using  the  VIC's  rich  graphics  and  color  palette  he  or  she  is 
painlessly  learning  all  of  the  basics  of  computer  programming.  This  not  only  develops  computer 
awareness,  but  enriches  one's  math,  logic,  communication  and  artistic  skills  as  well. 

•  Turtle  Graphics  has  over  30  different  commands. 

•  Programs  may  be  listed  on  a  printer  and  saved  on  or  loaded  from  tape  or  disk. 

•  Turtle  Graphics  is  menu  driven  for  ease  of  use. 

•  Trace  mode  to  help  the  beginning  programmer  follow  the  logic  of  his  program  one  step  at  a  time. 

•  Well  written,  easy -to-fcl low  manual  with  many  examples  included. 

List  $39.95  /  Sale  $29.95 


We  Have  Alt  HES  Products  At  Super  Sale  Prices!'. 


CiyyCOpDI^CC  (we love ouh customers) 

BOX  550,  BARRINGTON,  ILLINOIS  60010 
Phom  312/382-5244  to  ordtr 


13134 

DATA 

13140 

DATA 

13146 

DATA 

13152 

DATA 

13158 
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13164 
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13170 
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13176 

DATA 

13182 
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13188 

DATA 

13194 

DATA 

13200 

DATA 

13206 

DATA 

13212 

DATA 

13218 

DATA 

13224 

DATA 

13230 
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13236 

DATA 

13242 

DATA 

13248 

DATA 

13254 
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13260 

DATA 

13266 
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13272 
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13278 

DATA 

13284 

DATA 

13290 

DATA 

13296 

DATA 

13302 

DATA 

13308 

DATA 

13314 

DATA 

13320 

DATA 

13326 

DATA 

13332 

DATA 

13338 

DATA 

13344 

DATA 

13350 

DATA 

13356 

DATA 

13362 

DATA 

13368 

DATA 

13374 

DATA 

13380 

DATA 

13386 

DATA 

13392 

DATA 

13398 

DATA 

13404 

DATA 

13410 

DATA 

13416 

DATA 

13422 

DATA 

13428 

DATA 

13434 

DATA 

13440 

DATA 

13446 

DATA 

13452 

DATA 

13458 

DATA 

13464 

DATA 

13470 

DATA 

13476 

DATA 

13482 

DATA 

13488 

DATA 

13494 

DATA 

13500 

DATA 

13506 

DATA 

13512 

DATA 

13518 

DATA 

13524 

DATA 

13530 

DATA 

13536 

DATA 

13542 

DATA 

96,10,173,99,10,141 

97,10,32,118,51,76 

58,48,162,0,189,19 

52,240,6,157,6,128 

232,208,245,162,0,189 

28,52,240,6,157,22 

128,232,208-,245,172,96 

10,173,97,10,32,188 

196,32,147,207,162,0 

189,0,1,240,6,157 

27,128,232,208,245,96 

134,84,133,85,162,0 

160,0,189,44,52,240 

10,201,255,240,12,145 

84,200,232,208,241,32 

174,51,232,208,233,96 

24,165,84,105,40,133 

84,144,2,230,85,96 

138,72,152,72,24,173 

98,10,105,2,141,98 

10,144,3,238,99,10 

162,0,181,84,72,232 

224,8,208,248,172,98 

10,173,99,10,32,188 

196,32,147,207,162,0 

189,0,1,240,6,157 

12,128,232,208,245,162 

8,104,149,83,202,208 

2  50,104, 168,104,170,96 

234,234,234,1,0,216 

255,255,255,40,0,54 

56,52,50,160,32,58 

102,170,186,127,255,19 

3,15,18,5,58,32 

48,0,8,9,7,8 

58,0,135,129,141,133 

160,143,150,133,146,0 

79,77,32,32,78,80 

99,80,32,79,99,79 

77,32,79,80,78,99 

99,99,77,79,80,32 

79,80,0,101,32,77 

78,32,103,32,103,32 

101,32,101,32,77,101 

103,32,32,79,76,100 

101,103,32,101,103,0 

101,32,32,32,32,103 

32,103,32,101,32,101 

32,32,32,103,32,32 

101,32,32,101,32,99 

32,103,0,101,103,77 

78,101,103,32,103,100 

101,32,101,103,77,32 

103,32,32,76,79,99 

101,103,99,101,103,0 

76,122,32,32,76,122 

77,100,100,100,78,76 

122,32,77,122,77,100 

100,100,78,76,122,32 

76,122,0,0,160,223 

32,32,233,231,32,233 

160,223,32,160,160,160 

160,231,160,160,160,160 

160,32,2,25,0,160 

160,223,2  3  3,160,2  31,233 

160,226,160,223,32,32 

233,160,105,160,160,0 

160,160,160,160,160,231 

160,160,98,160,231,32 


13548  DATA  233,160,105,32,160,160 
13554  DATA  160,160,32,32,7,1 
13560  DATA  18,25,0,160,160,95 
13566  DATA  105,160,231,160,160,226 
13572  DATA  160,231,233,1,60,105,32 
13578  DATA  32,160,160,0,160,160 
13584  DATA  32,32,160,231,160,160 
13590  DATA  32,160,231,160,160,160 
13596  DATA  160,231,160,160,160,160 
13602  DATA  160,32,13,1,18,19 
13608  DATA  1,0,255,32,32,32 
13614  DATA  184,32,32,32,32,32 
13620  DATA  13,15,22,5,32,20 
13626  DATA  8,5,32,34,81,34 
13632  DATA  32,21,19,9,14,7 
13638  DATA  0,32,32,32,30,32 
13644  DATA  32,32,32,32,20,8 
13650  DATA  5,32,14,21,13,2 
13656  DATA  5,18,32,16,1,4 
13662  DATA  46,0,32,32,32,93 
13668  DATA  0,180,60,67,81,67 
13674  DATA  62,182,32,32,184,32 
13680  DATA  61,32,13,15,22,5 
13686  DATA  32,21,16,0,32,32 
13692  DATA  32,93,32,32,32,32 
13698  DATA  32,180,32,61,32,13 
13704  DATA  15,22,5,32,12,5 
13710  DATA  6,20,0,32,32,32 
13716  DATA  22,32,32,32,32,32 
13722  DATA  182,32,61,32,13,15 
1372B  DATA  22,5,32,18,9,7 
13734  DATA  8,20,0,32,32,32 
13740  DATA  178,32,32,32,32,32 
13746  DATA  178,32,61,32,13,15 
13752  DATA  22,5,32,4,15,23 
13  758  DATA  14,0,255,3,8,15 
13764  DATA  15,19,5,32,19,16 
13770  DATA  5,5,4,32,6,1 
13776  DATA  3,20,15,18,58,0 
13782  DATA  0,32,32,32,177,32 
13788  DATA  61,32,6,1,19,20 
13794  DATA  44,32,178,32,61,32 
13800  DATA  13,15,4,5,18,1 
13806  DATA  20,5,44,32,179,32 
13812  DATA  61,32,19,12,15,23 
13318  DATA  0,0,15,13,32,16 
13824  DATA  18,5,19,19,32,145 
13830  DATA  32,20,15,32,17,21 
13836  DATA  9,20,46,0,255,153 
13842  DATA  143,149,167,146,133,160 
13848  DATA  129,160,151,137,142,142 
13854  DATA  133,146,161,161,0,256 

ProgrCirn  5:  Munchmaze  For  Upgrade  PETs 

List'  Program  4  but  substitute  these  lines  for  Upgrade 
PET. 


12498  DATA  4 
13176  DATA  1 
13182  DATA  2 
13272  DATA  1 
13278  DATA  2 
13314  DATA  2 
13320  DATA  5 

Program  6: 

10  1=1^288  : 

20  READ  A; IF 
30  POKE  I, A: 
35  SYS12311 


,145,84,32,127,223 

0,173,97,10,32,109 

10,32,233,220,162,0 

0,173,99,10,32,109 

10,32,233,220,162,0 

55,255,255,40,0,41 

0,42,18,160,32,58 

Munchmaze  For  The  64 

POKE53281,l 

A=256  THEN  35 
1=1+1: GOTO  20 

;END 
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h/lflffl\^l/wKK 
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American  PeripheraU 

GAMES 

EDUCATIONAL 

EDUCATIONAL 

(on  tape) 

(on  tape) 

Series  on  disk 

646  Pacacuda  19.95 

644  Type  Tutor  19.95 

Computer  Science  (30  programs)  $350 

650  Logger  19.95 

645  Assembly  Language 

HS  Biology  (70  programs)  $500 

651  Ape  Craze  19,95 

Tutor  14.95 

HS  Chemistry  (40  programs)  $450 

652  Centropod  19.95 

687  Fractional  Parts  14.95 

HS  Physics  (60  programs)  S475 

653  Escape  19.95 

902  Estimating  Fractions  14,95 

HS  SAT  Drill  (60  programs)  $99. 

641   Monopoly  19.95 

695  Tutor  Math  14,95 

Elem.  Social  Studies  (18  pr.)  S225 

642  Adventure  #1  19.95 

870  Square  Root  Trainer  14.95 

Elem,  Science  (18  programs)  $225 

648  Galactic  Encounter  9. 

699  Counting  Shapes  14,95 

Elem.  Library  Science  (12  pr,)  $170 

667  Yahtzee  14.95 

694  Money  Addition  14.95 

Librarians  Package  (4  utilities)  $110 

671   Robot  Blast  14.95 

689  Math  Dice  14.95 

3rd  Grade  Reading  (20  lessons)  S99. 

673  Moon  Lander  14,95 

678  Speed  Read  14.95 

4th  Grade  Reading  (20  lessons)  S99. 

676  Othello  14,95 

643  Maps  and  Capitals  19.95 

5th  Grade  Reading  (20  lessons)  S99. 

686  Horserace-64  14.95 

645  Sprite  Editor  19.95 

6th  Grade  Reading  (20  lessons)  $99. 

692  Snake  14.95 

904  Sound  Synthesizer  Tutor  19. 

Spanish  Teaching  (12  lessons)  S95. 

697  Football  14,95 

696  Diagramming 

PARTS  OF  SPEECH  (9  lessons)  S95. 

819  Backgammon  24.95 

Sentences  14.95 

822  Space  Raider  19,95 

690  More/Less  14.95 

r^i  lOiiLii^oo 

846  Annihilator  19,95 

688  Batting  AVERAGES  14.95 

BUSINESS 

842  Zwark  19.95 

802  TicTacMath  16.95 

(all  on  disk) 

845  Grave  Robbers  13,95 

904  Balancing  Equations  14,95 

WORD  PRO  3+   95,00 

841  Pirate  Inn  Adv,  22.95 

905  Missing  Letter  14,95 

DATAMAN-64  data  base  program.  49.95 

904  Shooting  Gallery  14,95 

864  Gradebook  15. 

PERSONAL  FILING  SYSTEM 

816  Dog  Fight  19.95 

810  French  1-4  80. 

(index  card  style)  19.95 

817  Mouse  Maze  19.95 

811  Spanish  1-4  80, 

HOME  FINANCE  19.95 

818  Ski  Run  22, 

807  English  Invaders  16.95 

CYBER  FARMER  SI 95. 

820  Metro  22, 

809  Munchword  16,95 

6A  1600  Accounting  System  395. 

823  Sub  Warfare  29, 

812  Puss  IN  Boot  20. 

PERSONAL  TAX  80. 

838  Retroball  39.95 

813  Word  Factory  20. 

ACCOUNTS  RECEIVABLE  22. 

(cartridge) 

660  Hang-Spell  14.95 

New  York  State  Payroll  89. 

839  Gridrunner  39.95 

905  Division  Drill  14.95 

MAILING  LIST  24, 

(cartridge) 

906  Multiplic,  Drill  14,95 

Manufacturing  Inventory  59, 

825  Mine  Field  13. 

907  Addition  Drill  14.95 

Stock  Market  Package  39. 

672  Dragster  14,95 

908  Subtraction  Drill  14.95 

Finance  16.95 

662  Oregon  Trail  14.95 

910  Simon  Says  14.95 

679  3-DTicTacToe  14.95 

911  Adding  Fractions  1.4,95 

655  Castle  Advent.  14,95 

912  Punctuation  14.95 

ORDERING  BLANK 

ITEM             DESCRIPTION            PRICE 

To:  American  Peripherals 

1 22  Bangor  Street 

Lindenhurst,  NY11757 
Ship  tn:       Namft 

Strfifit 

NV  State  Residents 

Town,  State.  ZIP 

nnh'  -"^'-J  "71/.0/.  t^v 

Shipping                 $1.50 
nnn  add  1  Fio 

D  Please  send  your  complete  64K  cataloa. 

free  of  charge. 

If  Canadc 

i  or  Mexico,  add  additional  2.00 

Commodore  64  is  a  requested  trademark  of  Commodore  LTD. 

TOTAI    AMnilMT 

12288 

DATA 

12296 

DATA 

12304 

DATA 

12312 

DATA 

12320 

DATA 

12328 

DATA 

12336 

DATA 

12344 

DATA 

12352 

DATA 

12360 

DATA 

12368 

DATA 

12376 

DATA 

12384 

DATA 

12392 

DATA 

12400 

DATA 

12408 

DATA 

12416 

DATA 

12424 

DATA 

12432 

DATA 

12440 

DATA 

12448 

DATA 

12456 

DATA 

12464 

DATA 

12472 

DATA 

12480 

DATA 

12488 

DATA 

12496 

DATA 

12504 

DATA 

12512 

DATA 

12520 

DATA 

12528 

DATA 

12536 

DATA 

12544 

DATA 

12552 

DATA 

12560 

DATA 

12568 

DATA 

12576 

DATA 

12584 

DATA 

12592 

DATA 

12600 

DATA 

12608 

DATA 

12616 

DATA 

12624 

DATA 

12632 

DATA 

12640 

DATA 

12648 

DATA 

12656 

DATA 

12664 

DATA 

12672 

DATA 

12680 

DATA 

12688 

DATA 

12696 

DATA 

12704 

DATA 

12712 

DATA 

12720 

DATA 

12728 

DATA 

12736 

DATA 

12744 

DATA 

12752 

DATA 

12760 

DATA 

12768 

DATA 

12776 

DATA 

12784 

DATA 

12792 

DATA 

12800 

DATA 

12808 

DATA 

12816 

DATA 

12824 

DATA 

12832 

DATA 

20,4,10,0,88,178,187 

40,171,84,73,41,58,158 

49,48,52,56,0,0,0 

234,234,169,21,141,24,208 

169,0,141,96,10,141,97 

10,169,147,3  2,210,255,169 

7,162,0,157,0,216,157 

0,217,157,0,218,157,0 

219,232,208,241,169,120,141 

229,51,169,52,141,230,51 

162,31,169,5,32,220,51 

169,0,141,98,10,141,99 

10,133,162,24,165,161,105 

2,  133,166, 165, 161, 197, 166 

208,250,169,147,32,210,255 

169,0,162,0,157,0,216 

157,0,217,157,0,218,157 

0,219,232,208,241,32,168 

51,162,39,169,160,157,39 

4,15  7,151,7,202,208,247 

169,80,133,168,169,4,133 

169,162,21,160,0,169,160 

145,168,160,38,145,168,3  2 

2  50,51,202,208,240,169,119 

141,229,51,169,53,141,230 

51,162,166,169,4,32,220 

51,162,0,169,32,157,0 

11,157,0,12,157,0,13 

157,0,14,232,208,241,169 

81,13  3,168,169,40,13  3,170 

169,11,133,169,133,171,162 

0,160,0,169,160,145,170 

200,192,39,208,249,24,165 

170,105,40,13  3,170,144,2 

2  30,171,2  32,224,23,208,229 

160,0,169,4,145,168,32 

151,224,165,143,41,3,133 

165,170,10,168,24,185,75 

52,101,168,133,180,185,76 

52,101,169,133,181,24,185 

75,52,101,180,133,170,185 

76,52,101,181,13  3,171,160 

0,177,170,201,160,208,18 

138,145,170,169,32,145,180 

165,170,133,168,165,171,133 

169,76,251,48,232,138,41 

3,197,165,208,189,177,168 

170,169,32,145,168,224,4 

240,26,138,10,168,16  2,2 

56,165,168,249,75,52,133 

168,165,169,249,76,52,133 

169,202,208,238,76,251,48 

169,13,141,229,51,169,54 

141,230,51,162,6,138,32 

220,51,32,228,255,208,251 

32,228,255,240,251,201,81 

208,32,169,147,32,210,255 

169,0,162,0,157,0,216 

157,0,217,157,0,218,157 

0,219,232,208,241,32,168 

51,169,13,76,210,255,201 

49,48,211,201,52,16,207 

56,233,48,133,166, 169 , 147 

32,210,255,169,0,162,0 

157,0,216,157,0,217,157 

0,218,157,0,219,232,208 

241,162,0,189,0,11,157 

0,4,189,0,12,157,0 

5,189,0,13,157,0,6 


12840 

DATA 

12848 

DATA 

12856 

DATA 

12864 

DATA 

12872 

DATA 

12880 

DATA 

12888 

DATA 

12896 

DATA 

12904 

DATA 

12912 

DATA 

12920 

DATA 

12928 

DATA 

12936 

DATA 

12944 

DATA 

12952 

DATA 

12960 

DATA 

12968 

DATA 

12976 

DATA 

12984 

DATA 

12992 

DATA 

13000 

DATA 

13008 

DATA 

13016 

DATA 

13024 

DATA 

13032 

DATA 

13040 

DATA 

13048 

DATA 

13056 

DATA 

13064 

DATA 

13072 

DATA 

13080 

DATA 

13088 

DATA 

13096 

DATA 

13104 

DATA 

13112 

DATA 

13120 

DATA 

13128 

DATA 

13136 

DATA 

13144 

DATA 

13152 

DATA 

13160 

DATA 

13168 

DATA 

13176 

DATA 

13184 

DATA 

13192 

DATA 

13200 

DATA 

13208 

DATA 

13216 

DATA 

13224 

DATA 

13232 

DATA 

13240 

DATA 

13248 

DATA 

13256 

DATA 

13264 

DATA 

13272 

DATA 

13280 

DATA 

13288 

DATA 

13296 

DATA 

13304 

DATA 

13312 

DATA 

13320 

DATA 

13328 

DATA 

13336 

DATA 

13344 

DATA 

13352 

DATA 

13360 

DATA 

13368 

DATA 

13376 

DATA 

13384 

DATA 

189,0,14,157,0,7,232 

208,2  29,32,163,51,24,165 

166,105,176,141,0,4,141 

38,4,24,16  5,162,105,60 

133,254,165,162,197,254,208 

250,169,81,133,168,133,180 

169,4,133,169,133,181,169 

1,133,254,162,2,134,165 

160,0,169,102,145,168,169 

0,133,162,166,165,138,10 

168,24,185,75,52,101,168 

133, 170, 185, 76, 52, 101, 169 

133, 171, 160, 0,177, 170, 201 

160,208,9,202,138,41,3 

133,165,76,37,50,201,81 

208,3,76,4,51,169,102 

145,170,169,58,145,168,165 

170,133,168,165,171,133,169 

23  2,138,41,3,13  3,165,165 

254,240,8,160,0,132,254 

169,81,145,180,162,0,165 

197,221,83,52,240,8,232 

2  24,4,208,246,76,183,50 
138,10,168,24,185,75,52 
101,180,133,19  5,185,76,52 
101,181, 133, 196,160,0,177 
195,201,160,240,2  5,201,58 
208,3,32,6,52,160,0 
169,81,145,19  5,169,32,145 
180,165,195,133,180,165,196 
133,181,165,162,197,166,208 
250,173,98,10,201,16,208 
61,173,99,10,201,39,208 
54,169,81,13  3,168,169,4 

13  3,169,162,0,160,0,177 
168,201,58,208,7,32,6 
52,169,3  2,145,168,200,192 

3  7,208,238,3  2,250,51,232 
224,21,208,228,162,0,189 
93,54,240,6,157,51,4 
232,208,245,76,127,51,76 
33,50,169,102,145,170,169 
58,145,168,165,180,133,168 
165,181,133,169,56,165,168 
23  3,41,133,170,165,169,233 
0,133,171,169,240,133,166 
169,255,133,162,165,170,133 
180,165,171,13  3,181,169,0 
133,165,160,0,162,0,177 
180,221,87,52,240,5,232 
224,8,208,246,134,253,56 
169,7,229,253,170,189,87 
52,145,180,200,192,3,208 
224,24,165,180,105,40,133 
180,144,2,230,181,230,165 
165,165,201,3,208,203,165 
162,208,252,198,166,208,179 
162,0,189,110,52,240,6 
157,55,4,232,208,245,56 
173,98,10,237,96,10,141 
100,10,173,99,10,237,97 
10,13,100,10,240,17,144 
15,173,98,10,141,96,10 
173,99,10,141,97,10,32 
194,51,76,77,48,162,0 
189,95,52,240,6,157,6 
4,232,208,245,162,0,189 
104,52,240,6,157,22,4 
232,208,245,172,96,10,173 
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COMMODORE-64 

PRO  ADVENTURES 

The  Most  Fantastic  Adventure  Experience  You'll  Ever  Have! 

Forget  The  Rest  —  Buy  The  Best 

•  Full  Color  Graphics  •  Fantastic  Sound  Effects 
•  Selectable  Levels  •  Interactive  Conflicts 

GOimOGS  jCA9R 

•  Real  Time  •  Over  80  Areas  •  70  Objects  •  40  Commands 


This  adventure  features  full-color  animated  graptiics,  sound  effects,  and  two  selectable 
levels  of  play.  It  is  a  reaf  time  adventure.  The  longer  you  take  to  find  the  treasures  the  more 
time  you  allow  the  thief  and  cut-throat  to  get  them  before  you!  Journey  through  forests,  a 
swamp,  the  haunted  mansion,  and  dungeon  in  your  quest  for  the  fabulous  Arkenstone  dia- 
mond. Battle  the  giant  spider  and  Baron  Ahriman's  undead  army.  You  may  even  find  the  en- 
chanted elven  sword  and  slay  Gothmog  himself,  But  don't  let  the  thief  or  the  cut-throat  get 
their  hands  on  you  or  the  treasures.  Fantastic  Adventure!  We  have  never  had  an  un- 
satisfied Adventurer  with  this  one! 

List  $39.95  /  Sale  $29.95 


Ttie  First  in  a  Series  of  Interactive  Arcade,  Graphic  &  Text  Adventures! 

•  Two  disks  fult  of  data  (only  one  1541  drive  req.) 

•  8  different  character  sets 

•  Over  70  sprites. 

•  Ultra  fantastic  graphics. 

•  Four  arcade  style  games  meshed  with  graphics  test  adventure. 

This  fantastic  science  fiction  adventure  challenges  you  to  accomplish  various  missions 
for  the  Cyberleague.  First  you  must  infiltrate  a  Droken  warship  by  moving  through  3  dimen- 
sional corridors  via  joystick  while  dodging  death  bats  and  exterminator  droids  that  hunt 
you  down  (all  in  stunning  3-D).  Then  you  must  steal  the  ship  and  fly  through  hazardous 
alien-ridden  quadrants  of  space.  You  must  defeat  Raiders  and  Starships  along  the  way. 
Then  you  must  defeat  the  Zaxxar  Invaders  as  they  mount  an  offensive,  you  maneuver  your 
laser  base  and  fire  at  the  Lordes  of  Meanies.  The  arcade  games  are  worth  they  money 
alone  but  with  the  graphics  -  text  adventure  meshed  in,  Cyberworld  is  worth  10  times  as 
much! 

We  have  never  seen  a  better  arcade  adventure  in  our  lives!!! 
_«_ List  $49.95  /  Sale  $39.95 

I  Add  $3.00  for  postage.  Add  S6.00  for  CANADA,  PUERTO  RICO,  HAWAII  » 

I  orders.  WE  DO  NOT  EXPORT  TO  OTHER  COUNTRIES.  | 

I  Enclose  Cashiers  Check,  Money  Order  or  Personal  Cfiech.  Allow  14  | 

I  days  for  delivery,  2  (o  7  days  (or  pfione  orders,  1  day  express  mail!  | 

I  Canada  orders  must  t*  in  U.S.  doflars.  We  accept  Visa  and  Master-  ■ 

I  Card.  I 


F^^£PPR|7FS    WElOVEOUn CUSTOMEnsI 

BOX  550.  BARRINGTON,  ILLINOIS  60010 
Phont  312/382-5244  to  ord«r 


13392 

DATA 

13400 

DATA 

13408 

DATA 

13416 

DATA 

13424 

DATA 

13432 

DATA 

13440 

DATA 

13448 

DATA 

13456 

DATA 

13464 

DATA 

13472 

DATA 

13480 

DATA 

13488 

DATA 

13496 

DATA 

13504 

DATA 

13512 

DATA 

13520 

DATA 

13528 

DATA 

13536 

DATA 

13544 

DATA 

13552 

DATA 

13560 

DATA 

13568 

DATA 

13576 

DATA 

13584 

DATA 

13592 

DATA 

13600 

DATA 

13608 

DATA 

13616 

DATA 

13624 

DATA 

13632 

DATA 

13640 

DATA 

13648 

DATA 

13656 

DATA 

13664 

DATA 

13672 

DATA 

13680 

DATA 

13688 

DATA 

13696 

DATA 

13704 

DATA 

13712 

DATA 

13720 

DATA 

13728 

DATA 

13736 

DATA 

13744 

DATA 

13752 

DATA 

13760 

DATA 

13768 

DATA 

13776 

DATA 

13784 

DATA 

13792 

DATA 

13800 

DATA 

13808 

DATA 

13816 

DATA 

13824 

DATA 

13832 

DATA 

13840 

DATA 

13848 

DATA 

13856 

DATA 

13864 

DATA 

13872 

DATA 

13880 

DATA 

13888 

DATA 

13896 

DATA 

13904 

DATA 

13912 

DATA 

13920 

DATA 

13928 

DATA 

13936 

DATA 

97,10,32,145,179,32,221 

189,162,0,189,0,1,240 

6,157,27,4,232,208,245 

96,134,168,133,169,162,0 

160,0,189,13,54,240,10 

201,255,240,12,145,168,200 

2  3  2,208,241,3  2,2  50,51,2  32 

208,23  3,96,24,165,168,105 

40,133,168,144,2,230,169 

96,138,72,152,72,24,173 

98,10,105,2,141,98,10 

144,3,238,99,10,162,0 

181,168,72,232,224,8,208 

248,172,98,10,173,99,10 

32,145,17  9,32,221,189,162 

0,189,0,1,240,6,157 

12,4,23  2,208,245,162,8 

104, 149 , 16  7 , 202 , 208 , 250, 104 

168,104,170,96,234,234,234 

1,0,216,255,255,255,40 

0,37,33,34,36,160,32 

58,102,170,186,127,255,19 

3,15,18,5,58,32,48 

0,8,9,7,8,58,0 

135,129,141,133,160,143,150 

133,146,0,79,77,32,32 

78,80,99,80,32,79,99 

79,77,32,79,80,78,99 

99,99,77,79,80,32,79 

80,0,101,32,77,78,32 

103,32,103,32,101,32,101 

32,77,101,103,32,32,79 

76,100,101,103,32,101,103 

0,101,32,32,32,32,103 

32,103,32,101,32,101,32 

32,32,103,32,32,101,32 

32,101,32,99,32,103,0 

101,103,77,78,101,103,32 

103,100,101,32,101,103,77 

32,103,32,32,76,79,99 

101,103,99,101,103,0,76 

12  2,3  2,32,76,122,7  7,100 

100,100,78,76, 122,32,77 

122,77,100,100,100,78,76 

122,32,76,122,0,0,160 

223,327,32,233,231,32,233 

160,223,32,160,160,160,160 

231,160,160,160,160,160,32 

2,25,0,160,160,223,233 

160,231,233,160,226,160,223 

32,32,23  3,160,105,160,160 

0,160,160,160,160,160,231 

160,160,98,160,231,32,233 

160,105,32,160,160,160,160 

32,32,7,1,18,25,0 

160,160,95,105,160,231,160 

160,226,160,231,233,160,105 

32,32,160,160,0,160,160 

32,32,160,231,160,160,32 

160,231,160,160,160,160,231 

160,160,160,160,160,32,13 

1,18,19,1,0,255,32 

32,32,9,32,32,32,32 

32,13,15,22,5,32,20 

8,5,32,34,81,34,32 

21,19,9,14,7,0,32 

32,32,30,32,32,32,32 

32,20,8,5,32,12,5 

20,20,5,18,19,58,32 


13944 

DATA 

32,32,0,32,32,32,93 

13952 

DATA 

0,10,60,67,81,67,62 

13960 

DATA 

11,32,32,9,32,61,32 

13968 

DATA 

13,15,22,5,32,21,16 

13976 

DATA 

0,32,32,32,93,32,32 

13984 

DATA 

32,32,32,10,32,61,32 

13992 

DATA 

13,15,22,5,32,12,5 

14000 

DATA 

6,20,0,32,32,32,22 

14008 

DATA 

32,32,32,32,32,11,32 

14016 

DATA 

61,32,13,15,22,5,32 

14024 

DATA 

13,9,7,8,20,0,32 

14032 

DATA 

32,32,13,32,32,32,32 

14040 

DATA 

32,13,32,61,32,13,15 

14048 

DATA 

22,5,32,4,15,23,14 

14056 

DATA 

0,255,160,32,160,32,32 

14064 

DATA 

32,32,3,8,15,15,19 

14072 

DATA 

5,32,19,16,5,5,4 

14080 

DATA 

32,6,1,3,20,15,18 

14088 

DATA 

58,0,0,160,32,160,32 

14096 

DATA 

32,177,32,61,6,1,19 

14104 

DATA 

20,44,32,178,32,61,32 

14112 

DATA 

13,15,4,5,18,1,20 

14120 

DATA 

5,44,32,179,32,61,32 

14128 

DATA 

19,12,15,23,0,0,160 

14136 

DATA 

32,160,32,32,32,32,32 

14144 

DATA 

32,32,32,32,32,32,32 

14152 

DATA 

32,16,18,5,19,19,32 

14160 

DATA 

145,32,20,15,32,17,21 

14168 

DATA 

9,20,46,0,255,153,143 

14176 

DATA 

149,167,146,133,160,129,137 

14184 

DATA 

142,142,133,146,161,161,32 

14192 

DATA 

255,32,256 

^E  commodore  B4 


Drills,  Puzzles,  Competitive  Games, Tutorials 

Uses  Color,  Graphics.  Sound.  Animation 

Tape  and  Disk  Versions 

Send  SASE  for  FREE  CATALOG 

SMOKY  IVIOUIMTAIIM   50FT\A/ARE 

5^  WEST  MAIN    STREET.   BREVARD   NC    Sa713 


VK-20  and  Commodore  64 


BANSHEE  CASTLE 

An  unbelJeveaEile  aduentin'e  that  will  try  your 

patience.    But    intelligence,    persisrance    and 

stamii^a  pays  otf.  An  HCl^on-pached  ga^me  that 

keeps  you  on  edgS- 

VIC  leKHeqd.  Sl9.9-i 

C^4 


WHODUNIT? 

Mystery-lover'^  dBlignt. 

How"s  yovT  anaij-ticai  mind? 

If  you  have  any  logic. .ihis  is  the 

game  for  you. 

viCT6KReqtJ. 

C^4 


sis.ga 


MAGCIE 

(ArllJIclBl  Intaltlgence) 

Ha>re  a  relationship  wiih  your  compuler  ihats 

tiard  to  believe.  Discjss  it  with  "Maggie" 

VIC16KRaqd.  S19.95 

C-64 


SCRAMBLERS? 

We  have  it.  The  ulhmaie  challenge  in  word 

scramble.  3  garnes  on  one  lape. 

Test  your  sifill  &  l^ncwledge. 

No  exp,  req,  ViC  C-6-1  519,95 


ORDER  ALL  4  FOR  70" 

CHECK  OR  MONEY  ORDER 

ADD  51.50  FOR  P  4  H 


DEALER  INQUIRIES  INVITED. 


AMiAlrm. 


3133  Sojth  Nucia  Street 

Aurora.  Colroado  80013 

303/  690-30S8 
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D.E.S.-SOFT 

a  division  of 
DES-Data  Equipment  Supply  Corp. 


ZARCON 

By  Steven  Prentiss 

Destined  to  be  one  of  the  best  arcade  style  games 
on  commodore  computers. Can  you  in  your 
Zarcon  Fighter  shoot  all  the  alien  formations 
while  flying  through  an  asteriod  field! 

5  Levels  of  excitement 

Joystick  required 

Vic-20  cassette  9.95 

Commodore  64  cassette  9.95 


SHROOMS 

Subterranean  Encounter 
By  Michael  Koberstein 

Inner  Earth  has  invaded  the  surface  world.  The 
mutant  spiders  and  the  moles  have  taken 
humans  captive  and  changed  them  into  mus- 
srooms.  To  rescue  them  you  must  enter  the 
caverns.  You  are  their  only  hope.  Good  Luck! 
Vic-20  &  8K  Expander, -Joystick-cass  9.95 


SPHINX 

3-D  ADVENTURE 

By  Cory  Christensen 

You  the  Adventurous  Explorer  are  looking  for 
the  lost  treasure  of  the  Sphinx,  It  is  rumored  to 
be  in  the  Ancient  Pyramid  of  RA.  Beware  of 
deadly  traps  and  hidden  passage  ways. 
Commodore  64-cassette  9.95 


You  are  the  commander  of  squadron  of  laser 
ships.  It  is  your  duty  to  defend  the  cities  of  earth 
against  incoming  alien  attack.  Spectacular  Hi- 
Res  graphics  and  machine  code  for  super  fast  ac- 
tion. 
Joystick  Vic-20  cassette  9.95 

SEE  YOUR  LOCAL  DEALER  TO  SEE  OUR  FINE  PRODUCTS 

Dealer  inquiries  invited  Software  Distribution  Available  Programs  wanted 


(714) 
778-5455 


Data  Equipment  Supply  Corp. 
8315  Firestone  Blvd.,  Downey,  CA  90241 


(213) 
923-9361 


VIC-20'",  COMMODORE'",  COMMODORE  64'".  and  CBM"  are  Irademafks  Of  Commodore  Business  Machines,  Inc. 


AATARI'^^  Printers/Etc.  tSS 


600XL  . 
1200XL 


1050  DBIVE    S335 

1025  PRINTER    $399 

1020  COLOR  PTR      .     J2ig 

1027  PRINTER    J279 

1010  RECORDER  S72 

850  INTERFACE   ...  CALL 
DRIVES 

RANA10D0   S319 

PERCOM  88-S1  S35B 

PEflC0HAT88-S2    ,    J539 

PERCOM  40-S1  J510 

PERCOM  *0-SZ S79a 

PERCOM  44-S1 S639 

PERCOM  44-SZ $929 


CALL 

CALL* 

'Rsllscis  $100  Atari  Rebate 
HICROBITSINFC  ...  $78 
80  COLUMN  BD  ...  $243 
TECHNICAL  NOTES       .  $25 

REAL  TIME  CLK    $38 

810  DRIVE    S419 

MEMORIES 

48KRAM(INTEC(  ...  $95 
64K  RAM  IINTEC)  ..  $118 
48K  RAH  (MOSAIC!  S109 
64K  RAM  (MOSAIC)  ,.  S145 
128K  RAM  DISK  ...  $299 
32K  RAM  (MOSAIC)  ...  $68 


GEMINI  10X 
GORILLA  .. 


$289 
$199 


ATARI  SOFTWARE 


ADVENTURE INTX 

Acfv.  1-12  each  (CI J18 

Preppie  (C/D) $20 

Preppiell(C/D)   $23 

Diskey{D|    $33 

Sea  Dragon  (C/D)    $23 

BugOtl!(C/D)  SZO 

Tulti.Fru!ti(CfO)   $17 

Saga  1-3 (ea.)(D|  $27 

Lunar Lndf  . (C)J11(D($15 
Galactic:  Emplre(C)  ..$14 
Galaclic  Trader  (C|  ...  $14 

Stral05(C/D)   $23 

RearGuard    (C)$14(D)$17 

APX 

Eastern  Front  (C/D)         $23 

747  Land  Sim.  (C/D)    . .  $17 

Fig-Forth (C)   $30 

Family  Cash  Flow  (D)  .  $17 

Downhill  (C(D)  ,_ $17 

Avaianctie(C/D)   $17 

Outlaw(Howit2Br(C/D)   $17 

Salmon  Run(C/D)  $17 

Da!aManaaemenl(D)  $17 
Galahad/Holy  Grail  |D)  $21 
Adv.  Music  System  (D)  $21 
ATARI  INC. 

Microsoll  Basic  II  |R)  .  162 
Wckey  in  Great 

Outdoors  (C/D)   $36 

Painl(D| $30 

Speed  Reading (C)  ...$54 

Qix  |R)   $30 

Dig  Dug  |R)    $30 

Atari  Writer  (R)   $68 

Time  Wise  |D)   $23 

Visicalc(D)    $139 

Juggles  House  (C/D)  ,  $22 
Juggles  Rnbw(C/D)    ..$22 

Pilol(Home)(R) $55 

GalaxianIR)    $30 

Defender  (R)    $30 

ET $34 

Microsofl  Basic  (D|  . .  $62 
MacroAss.  &Edit(D)  .$62 
Assembler  Editor  (R)  .$42 
Basic  Cartridge  (R)  . . .  $45 

PacMan(R|  $30 

Cenlipede(R)    $30 

Caverns  of  Mars  (D)    . .  $2S 

Star  Raiders  (R) $30 

Conv.  Lang.  Ea.  (C)  ...  $42 
Music  Composer  (R)  . .  $31 
Super  Breal<out(R)  . .  .  $26 
My  First  Alphabet  (D|  .$26 

Prog.2  &  E  (ea.KC) $21 

Word  Processor  (D)    .$102 

Pilot (Educ.l(R)  $92 

Touch  Typing  (C)    $19 

Home  File  MngrfD]    ..$36 

Bookkeeper  |D)  $102 

Family  Finance  (D)  ...  $35 

Prog.  1(C|    S18 

Scram(C) $18 

Asteroids  (R)  £27 

Space  Invaders  (R)  ...  $27 
Missile  Command  (R)  .  $27 

Telelirik(R)    $21 

Superman  III  (R)    $34 

Basketball  (R|  $24 

Donkey  Kong  (R) $34 

AVALON  HILL 

VC(D) $17 

B-1  Nuc.  Bomber  (C)  . .  $12 

Legionnaire(C) $23 

Empire  of  Ovefmind    

{D)$23(C)$20 

TanWics  .. .  (D)$20(C)$17 
Compir  Stock  &  Bonds  . . . 

(D)$17(C)$14 

Onieper  River  Line  ID)    $20 

Voyager  (D)   $17 

Conlroller(D)    $20 

GFS  Sorceress    

(D)  $23  (C)  $20 

Telegard    . .  (D)$19(C)$16 

Vorrak(D)    $18 

Lord  ot  Karma  (CI $14 


AVALON  HILL(Confd) 

Moon  Patrol  |C) $17 

Planet  Miners  (C)    $12 

Conllict2500(C|  $12 

Space  Station  Zulu  

(D)$17(C)$14 

Flying  Ace  .  (D)$21  (C)S18 

Gypsy (D)$18(C)$15 

Galaxy (D)$17(C)S14 

Guns  of  Fort  Def.(C)    .$14 

Nul(eWar(C) $12 

Andromeda  Conquest 

ID)  $16(0)  $13 

Close  Assll  (D)$23(C)$20 
BRODERBUND 

Sky  Blazer  (0)    $22 

Bank  St.  Writer  (D)    ...  $46 

A.E.(D) $23 

Arcade  Machine  (D)  . .  $39 
Choplifter    .  {D|$23{fi|$29 

Labyrinth  (C/D)   $20 

Serpentine  .  (D1$23(R)$27 
Sleller  Shuttle  (C/D)   . ,  $17 

Apple  Panic  (C/D) $20 

Genetic  Drift  (C/D)  . . .  $20 
David's  Midnight  (D)  ..  $23 

Sea  Fox  (D)   $20 

Track  Attack  (D)    $20 

OperalnWhrlwnd(D)  .$23 
Maich  Boxes  (C/D)  . . .  $20 
CDY  CONSULTING 

Pogoman  (C/D)  $27 

Mad-Netter(C/D) $23 

IMs-Balloon  |C/D) $23 

CBS 

Mountain  King  |R)    ...$27 

Boulders  &  Bombs  (R)    $27 

Krazy(each)(R) $27 

CONTINENTAL  SOFT. 
Home  Accountant  (D)    $48 
Tax  Advantage  (D)    ...$39 
DATA  MOST 

Pig  Pen  (D) $20 

Mating  Zone  (D)    $20 

Roundabout  (D)    $20 

Bilestoad  |D)  $20 

Night  Raiders  (D)    $20 

Monster  Smash  (D)  . . .  $20 
DATASOFT 

Text  Wizard  (D)   $65 

Graphic  Master  (O)  ...  $27 

Micro  Painter  (D) $23 

Lisp  Interpreter  (D)  ...$79 

Graphics  Gen.(D|   $17 

BasicCompiler(D)     ..$65 

Zaxxon  (C/D)  $27 

Teletalk(D)   $34 

Pac.  Coast  Hwy  (C/D)  .  $20 
Clowns/Balloons  (C/D)  $2t1 

Spell  WizafcS(D)    $53 

Canyon  Climber(C/D)  $20 
Sands  of  Egypt  (D)  ...  $27 
O'Riley's  Mine  (C/D)  . .  $23 
Rosen's  Brigade  (C/D|    $23 

Moon  Shuttle  (D) $27 

DONT  ASK 

Sam(Dj $39 

P.M.  Animator  ID) $23 

TelBtari(D) $27 

PokerSam(D)  $17 

Word  Race  .  (D)$17(C]$14 
EDU-WARE 

Prisoner  11(D)    $27 

Spelling  Bee  (D)    $27 

Rendevous  (D) $27 

Compu/Read   1 

(0)$21(C)$15 

Compu/Math-FR   

(0)$27(C)$21 

Compu/Malh-Dec    

(D)  $27(0)  $21 

EDUCATIONAL  SOFT. 
Tricky  Tutorial 

1,2,3  or4(C/0) $15 

Tricky  Tutorial 

5,6or7(C/D)    $22 


CiTQH 

Prowriter S345 

Prowriler  II    $629 

Starwriter    S1 149 

Pnntmaster $1448 

NEC 

8023  A-C    $409 

3510   $1375 

3530   $1579 

3560   $1779 

7710/7730 $1998 


PROWRITER  .  $345 
SMITH  TPI  .  .  -  $488 

SILVER  REED  P  .  .  .  $669 
QUME 11/40+  ....  $1299 
OKI-DATA 

Microline82A    S398 

Microline83A    5638 

Microline84P   $958 

Microline92    $488 

Microline93    $858 

DIABLO 

620R J939 

630R $1719 


MONITORS 


AMDEK 

Colon    $289 

V300 S139 

VSOOA    $149 

Color  II $449 


NEC 

GRN(JB1260)    $115 

GRN(JB1201)    S155 

Color  Composite    .,.$298 
RGB  Color $598 

MODEMS 

HAYES 

Smartmodem    $209 

Sriiartmodem  1200  . .  $498 


Micromodem  II  $259 


NOVATION 

JOal $99 

AppleCatll  $259 

D-Cat   J149 

ANCHOR  AUTOMATION 
Mark  I  or  II  Modem   . . .  $78 


SPECIALS 

Gemini  15X  Printer    $379 

Axiom  AT-100  Printer  (with  interface    $229 

Astra  Double  Density  Dual  Drive $469 

Rana  1000  Drive    $319 

Bit-3  80  Column  Board   $245 

Mannesmann  Talley  160L  Printer  $589 

Atari  400  Keyboard  (In  Home)    $35 

Programmer  Kit    ..$48    Entertainer  Kit    ...$64 
Wico  Joystick    ...  $23   Wico  Trackball  ...  $49 

COSMIC 
COMPUTERS 

UNLIMITED 

727  BREA  CANYON  RD.,  SUITE  16 

WALNUT,  CA  91789 

ORDER  LINES  OPEN  MON-SAT  8  am  -  8  pm 

(800)  626-7642 

PLEASE  FOR  ORDERS  ONLY 
SORRY,  NO  COD'S 

(714)  594-5204 

FOR  TECHNICAL  INFO,  ORDER  INQUIRIES, 
OR  FOR  CALIFORNIA  ORDERS 

Add  $250  shipping  per  soltware  order  in  mnlinentat  U  S.  Ada  S5.00 
shipping  per  soltware  order  lor  AK,  HI.  FPO-APO.  Add  $10  00  or  15% 
(whictiever  is  grsalBf)  per  sollwaie  order  lor  non-U. S,  Call  lor  cosi  ol 
hardware  shipping.  Calil  residents  add  6*%  sales  tai.  Cashiers 
checks  or  money  orijers  filled  within  24  hours  lor  items  in  slocic 
Personal  checks  require  4  weeks  lo  clear  MaslorCariJ  and  Visa  OK  lor 
sollwareonly  within  conhnenlsl U.S..  add  3'A  surcharge.  Include caril 
no.,  expiration  date  and  signature.  Due  lo  our  low  prices,  ali  sjles  are 
linal.  All  deleclive  returns  must  have  a  return  authorisation  number. 
Please  call  lo  obtain  one  betore  returning  goods  lor  replacement  or 
repair.  Prices  &  availability  subject  to  change 


MORE  FOR  YOUR  MONEY 

DOUBLE  OR  SINGLE  DENSITY 

TWO  DRIVES 

SPECIAL    $469 


EPYX-AUTO.  SIMULATION 

Hescucai  Rigel(CJO|  .  $20 
Datestonesrfiyn  (C/D)  $14 
UprRclis  ApshailC/D)   $14 

Ricochsl  (C/D) $14 

Keys/Acheron  (C/D)  .  .  $14 
Curse  of  Ra  (C/D)  ...  $14 
Danger/Drindisli(C/D)    $14 

Jumpman(C/D) $27 

Escp  Vulcanslsle(D|  .  $20 
Crypl  ol  Undeafl  (D)    . .  $20 

NightfTiafe(D)  $20 

Armor  Assault  (D)  ....  $27 
Monster  Maze  |R)  ....  $27 

Alien  Garden  (R)   $27 

Plattermarn3(R)  $27 

Mof  Iocs  Tower  (C)  ...  $14 

King  Arthur's  Heir  

(D|$20(C)$14 

Helllire Warrior(C(D)  .$27 
Invasion  Orion  (C/D)  .  ,  $J7 
Temple  ol  Aps,  (C(D)    ,$27 

Star  Warrior  (C/D)  $27 

Dragon's  Eye (D) $20 

Crush  Crumble  (C/D)  .  $20 
GEBELLI 

FirebirC  (R)    $27 

Embargo  (R)    $30 

Candy  Factory  (D)  .  .  .  $20 
Maich  Racers  (C/D)  S20 
Dr.  Goodcode  (D)  .  .  $20 
HAYOEN 

Go  , (D)$23(C)$20 

Sargonll  ..  (D)$23(C)$20 
Bulldog  Pinbail(C)  ...  $20 
HES 

Coco(C(D) $34 

CocolliC/D)    $27 

INFOCOM 

Suspended  (D)    $34 

Zork  I,  II  or  111(D)    $27 

Starcrass(D) $27 

Deadline  ID)    $34 

Witness  (D)    S34 

INHOME 

Basobail    ,  .  (R)$23(D)$23 

C/yptsc'f  Terror  ...... 

(D)  $23  (C)  $20 

INNOVATIVE  DESIGN 

Pool  1  5(D)    $23 

Juggler  (D)  $20 

Spoedv^ay  Blast 

(D)$20(R)$27 

Pool40Ci(R)    $27 

JV  SOFTWARE 

Jrnylo  Pints  (C/D) $20 

Aclton  Quest  (C/D)  ...  $20 

Ghost  Encoun!.  (C/D)  .  $20 

LJK 

Letter  P.jrlect(D)    , . .  $)04 

DaiaPerlect(D)    $74 

Letter  Purled  (R)    . ..  $137 

Edit  6502  |R)    $137 

MONARCH  DATA  SYS- 
ABC  Compiler  |Dl  ...  $48 
ODESTA 

Chess  (El) $45 

Checkers  (D)  $34 

Odin(D)   $34 

OPTIMirED  SYSTEMS 

C-65(D) $58 

Bug-e5(D)    $23 

Vax-65(0)    $58 

Basic  A -f  (D) J58 

Action  (D)    $65 

Speed  Read  Plus  (D)  . .  $40 

PHOENIX 

Birth  of  Phoenix  (D)    ..$16 

A(Jv.  In  Time  ID) $20 

QUALITY 

Fastgammon(C)  . $14 

Name  That  Song   

...  (D)$13(C)$n 

Starbase  Hyperion    

|0)$17|C)$14 

AiiBaba,'40Thvs(D)  . .  S20 
Jeeper  Creepers  (D)  . .  $20 
fiOKLAN 

Gorl |D)$27|R}$30 

Wizard/Wor  .  (D)$27(H)$30 
DIx  Invaders  (D)$23(R)$27 
AntiSubPIrl    (D)S20(C)$14 

Telecom  (D) $49 

SpaceJcurney(n)  ...$30 
SENTIENT 

Gold  Ruth  (D)    $23 

Cyborg  (D)  $23 

SIERRA  ONLINE 
Mission  Asteroids  (D)    $17 
Ulys.l  Gidn  Fleece  (D)  $27 
ClOSSlire    ..  (D)$20(R)$23 

Mouseatlack(D)  $23 

Jawbreaker   (D)$20(R)$23 

Threshold  (D)    $27 

Soltporn(D) $20 

Ullima  11(D)  $39 


SIERRA  ON-LINE 

Marauder(D) $23 

Lunar Leeper(O)  ...  S20 
WizS  Princess  (D)    ...  $22 

Frogger(C/D)    $23 

SIRIUS 

Alpha  Shield  (R)    $27 

Wavy  Navy  (D) $23 

Bandits  (0)    $23 

Space  Eggs  (0)  $20 

Sneakers  |0)   .    $20 

Way  Out  (D)  . .  $27 

Type  Attack  (D)  $27 

Repton(D)  $27 

Critical  Mass  (D) $27 

Fast  Eddy  (R)    $23 

Worrrr  War(R)    $23 

SPINNAKER 

Snooper  Troop  1.2(D)  .  $30 

Kindercomp  (D) $20 

Rhymes  &  Riddles  (D)  $20 
Hey  Diddle  Diddle  (D)  ,  $20 
SrchAm2ngThngs(D)    $27 

Story  Machine  (D) $23 

Face  Maker  (D)   $23 

STRATEQIC  SIM. 
Cosmic  Balance  (D)  ,  .  S27 
Cosmic  Balance  II  (D)  $27 
Tigers  In  Snow  (C/D)  ..  $27 
Battle  olShilon  (C/D)  .  $27 
Batlleof  Norm  (C/D)  .  $27 
Galaclic  Gladiator{D)  $27 
Cytron  Masters  (D)  ...  $27 
Knignts/De5Brl(C/D)  .$27 
Combat  Leader(C/D)  .$27 
SU8L0GIC 

Pinball(C/D)    $20 

SWIFTY 

J.  While  Music  Lessons 

(C/0)  $20 

Space  Shuttle  (D)    $20 

SYNAPSE  SOFTWARE 

File  Mngr  800 -f     $65 

Protector  II  (D)$23(R)$29 
Shamus  . ..  (D)$23(R)$29 
Fori  Apocalypse  (C/DJ    $23 

SfiamuslllC/D) $23 

Necromancer  (C/D)  ,  .  .  $23 
Pharoh's  Curse  (C/D)      $23 

Slime  (C/D)    $23 

Page6(D)    $23 

Reptilian  (C/D)    $23 

Picnic  Paranoia  (C/D)  .  $23 
Claim  Jumper  (C/D)    ..$23 

Drelbs  (C/D) $23 

Shadowi  World  (C/D)  ..  $23 

Survivor  (C/D)    $23 

T.N.T(C/D)    $23 

r^-YC.  (C/D) $23 

Slamball(C/D) $23 

Blue  Max  (C/D)    ...        $23 

Nautilus  (C/D)  $23 

Chicken  (R/D)    $23 

Quasimodo  (C/D)    $23 

River  Quest  (C/D)    $23 

SYNERGISTIC 
ProgramrWkshp(D)  .  .  $23 
Graph  Workshop  (D)  .  .  $27 
Disk  Workshop  (D)  ..,$23 
Worlock"s  Revenge  (D)  $23 
THORN  EMI 

Soccer  (fl) S34 

JumboJet(R)    $34 

Submarine Comm,(R)    $34 

Kick  Back  (R) $34 

Pool  (C)   $22 

HumplyDumpiy(C)  ,.$22 
Hckry  Dckry  Dck  (C)   .  .  $22 

Dart5(C)    $22 

USA 

Atari  World  (D)    $39 

3-DSprgrphcs(C/D)    .  .  $27 

Sun/tval  Adv.  (C/D)   ...  $17 

VERSA 

Mind  Bggirs  I  (D)S14  (C)$12 

Globe  Master  (0) $20 

MISCELLANEOUS 
Financial  Wizard  (D)  ,  .  $41 
CaslleWoltensteinID)  $20 

Master  Type  (D) $27 

Astro  Chase  (D) $22 

Miner 2049er(R)   $34 

Cypher  Bowel  (C)    ....  $33 

Bug  Attack  (C/D) $20 

Raster  Blaster  (D) $20 

Air  Strike  IC/D)    $27 

Prism  (D)    $18 

Megalegs  (C) $23 

Cap'nCosmo(D) $19 

Spy's  Demise  (D)    $14 

Galac.  Chase  (D)$20  (C)$18 

Kid  Grid  (C/O)    $20 

Battle  Trek  (0) $20 

Snapper(D)  . $19 

T&F-PMP  Property 

Management (D)  . .  S149 
Millionaire  (D)  $39 
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LATE  ARRIVALS 
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1541  DISK  DRIVE $239 

1701  Cofor  MDnttor  . .  SZ55  1530  Recordaf    SS9 

1525Prin1er   $239  1600  Modem    559 

1 520  Color  Ptr $169  1 650  Auto  Modem      . .  SI  SB 

Hflscard    . .  _ S23  Mlcmtak  16K  Ram      ...  J8Z 

Hes  Sound  Box  J13  UHI 3K  Ram   J56 

Data  20  Exp.  Chassis      $56 


Large  Selection 

of  Vic  20  Software 

at  Great  Prices! 

VIC  20  SOFTWARE  VIC  20 


APPLIED  SYSTEMS 

NumberGulper(C)  ...S17 
Number  Chaser  (C)  ...  $17 
BRODERBUND 
Martian  Ha{der(C)    ...  $14 
Multisound  Synth.  (C)    $14 

Sharl(Trap{C) $14 

Sl<y  Blazer  (R)  $27 

Seafox(R|    $27 

AE  (R) $27 

CBS 

K-Rajy  Patrol  (R) $29 

K-RazyAntiks(R)   $29 

COMMOATA 

Pakacucta(C| J13 

Sketch  and  Paint  (C)  - .  $13 

Eight  Ball  (C| $13 

Invader  Educ.  Series 

(each)|C)  $13 

COMPUTERMAT 

ParatroopefS  |C)  $15 

Bug  Blast  (C) *12 

Cricket  (C)  .- $12 

CREATIVE  S.W. 

Black  Hole  (R) $36 

Trashman  (R)    $36 

Astroblitz{R) $36 

City  Bomber  (R)    $20 

Apple  Panic  (H) $36 

Chopllfter(R)    $36 

Serpentine  {R[ $36 

Videomania(R)  $36 

Terraguard  (R) $36 

EPVX 

Monster  Maze  (R) $27 

Sword  of  Fargoal  (C)    -  $20 

Ricochet  (C)    $14 

Rescue  at  Rigel  (C)  ...  $20 
Temple  of  Apshai(Dl  .$27 
HES 

GridrunnerfR]  $27 

Raid  of  Isram  (C) $14 

Robot  Panic  (R) S27 

Protector  (R)  $29 

Shamos  (R)   $27 

Predator  |R) $27 

Syn  The  Sound  |R)    ...$39 

Aggressor |R)   $27 

HeswfitBr(H| $27 

Turtle  Graphics  (R)  ...  $27 

Hesmon(R)  $27 

Vic  Forth  (R)    $39 

6502Prof.Oev.Sys.(C}    $20 

Torg(C)   $13 

Concentration  (C)  ....  $12 

Fuel  Pirates  |C) $12 

Simon  (C) $12 

VicTrek(C)  $13 

CoColl(C/D( $27 

IMAGIC 

Demon  Attack  {R} $25 

Allanlis(R|    $25 

LITTLE  WIZARD 

Pro  Football  (C) $15 

Cosmic  Crusader  (C)  .$12 
LOGISTIC 

X-Ralsd  (C)    $9 

Algebra  Wiz(C) $9 

Profess.  Journal  (C)   . .  S36 

Viccalc  (C) $36 

Budget  &  Bill  Payor  (C)  $15 
Accounts  Payable  (C)    $36 

Mad  Bomber  (C)    $10 

MIS 

VicVango(C)    $10 

Galactic  Crossfire  (C)    $11 

Checkbook  (C)    $14 

FtuitdyfC)  $10 

Alien  Soccer  (C)   $11 

NUFEKOP 

KrazyKong(C)    $11 

3-D  Man  (C)   $17 

ExIerminator(C) $20 

ON  LINE 

Crossfire  (C)    $20 

UltlmarC)    $14 


aUICK  BROWN  FOX 

Prof.  Word.  Proc $48 

SIR!  US 

Snake  Byle{R)    $27 

Fly  Wars  (R) $27 

Type  Attack  (R)  $27 

Fast  Eddy  (R) $27 

OeadlyDuckIR)    $27 

Turmoil  (R) $27 

Pla5mania(R)    $27 

Spider  City  (R|  -- $27 

Squish 'Em  (R|    $27 

Final  Orbit  (R)   $27 

Bumper  Bash  (R) $27 

SPECTRAVISION 

Cave  In (R) $27 

Number  Crunch  (R|  ...  $27 
Reaganomics(R)    ..,,$27 

Gold  Mine  (D|    $27 

Ape  Escape  |D)  $27 

STAHTECH 

Asteroids  (C) $18 

Backgammon  (C)   ....$18 

Ski  Run(C) $12 

Meteor  (C)  $9 

Vic  Men  (C)   $18 

Vic  Panic  (C)    $18 

SYNAPSE 

HarrierjCj    $23 

Squeeze (C|  $23 

Astro  Patrol  (C) $23 

TAYLORMADE 
Fun  Fractions  (C|   ....  $18 
Vic  Lemonade  (C|  ....  $1 2 
Teh  Typing  Tutor  (C)  . .  $13 
T4F  SOFTWARE 

Word  Search  (C) $14 

Sports  Search  (C) $14 

Arcade  Search  (C)  ...  $1 4 
TOIL 

Mailing  List  (C)  $14 

Time  Management  fC)  $22 
Research Asst.(C)  ...$22 
THORN  EMI 

River  Rescue  (R) $29 

Vic  Music  Comp.  (R|  . .  $29 
Submarine  Comm.  (R)    S29 

Mutant  Herd (R)    $29 

Fou  rill  Encounter  (R|  .$29 
THONIX 

Galactic  Blitz (C) $17 

Swarm  (C)   $20 

Sidewinder  (CJ    $20 

Scorpion  (Rl    $27 

GoidFeverlR) $27 

Deadly  Skies  (R)    $27 

UMI 

Video  Vermin  (R) $27 

Amok  |C(R)    $20 

Outworld(R)   $27 

Satellites  &  Met.  (R)    ..  $27 

Subcnase(C[ $17 

Kosmic  Kamikaze  (C)  .  $17 
MeteorShower(C)  ,,.$11 
Super  Hangman  (C)  ..$14 
Spiders  of  Mars  (R)  , . .  $27 

Meteor  Run  (R)   $27 

Vicalo(C) $11 

ViTermA(C)  $14 

ViCatIC)  $17 

VlCtieck(C) $17 

Ailen  Blitz  (C(R) $20 

Sky  Math  |C)    $11 

Space  Division  (C)    ...$li 

The  Alien  (CI   $17 

Grand  Master  (C|    $27 

Renaissance  (R) $33 

Cloud  Burst  (R)  $20 

Sklbbereen  (R)    $20 

Wordcraft20(R)   $65 

VICTORY 

Adv.  Pak  1(C) $14 

Adv.  Pakll(Cj    $14 

Annihilator(C|    $18 

Grave  Robbers  jC)    ...  $12 

Kongo  Kong  (C)    $18 

Trek(C)    $12 


BATTERIES  INCLUDED 

□elphis  Oracle(D)  ....  114 
Paper  Clip(D)  69 

COMM— DATA 

(New  Veriloni) 

Suparcuda(C/D) 18 

PegasSLs  Odyssey(C/P|  18 

Escape  MCP(C/D) 18 

Toddler  Tulor(C/DJ 18 

Prim    Math  Tulor(C/D)  .  18 

Math  Tulor(C/D)    18 

English  lnvaders(C/D)  .  18 

DATA  20 

Pro  Word  Proc.(C) 21 

General  LBdger(C| 21 

Accounts  Rbc,(C) 21 

Elec  Spreectsheel(C)  .,  21 

EN— TECH 

Studio  64(D)   28 

Sprite  Fun(C)   18 

EPYX 

swofd  Fargoal(C/D)    20 

Crush  Crumble(Dl 20 

Upper  Reaches  APS(D1    14 


HES 

Synthe  Sound  64(R|  . 

64  Forth(R) 

Time/Money  Mgr,(D) 


TO 


INFO-DESIGNS 

G/L  (D)  61 

A/P  (D)   61 

A/R  (D) 61 

NUFEKOP 

ExterminatoriC) 20 

3-D  Man(C)  16 

RAINBOW 

Pers.  Finance  Assist. (D)  41 

PSYCOM  SOFTWARE 

Personality  Analyzer(D)  24 

SIERRA  ON— LINE 

Crossflre(D) 20 

SOUTHERN  SOLUTIONS 

Br  II  Payer(A/P)   68 

Business  Man(G/L) 68 

Paymaster(Payroll)  68 

Sill  Collector(A/R) 68 

Widget(lnventory)  66 

T  »  F  SOFTWARE 

Word  Search(C) 15 

Sport  Search(C| 15 

Arcade  Starch(C)  15 

TIMEWORKS 

Programming  Kit  1(D|  .  18 
Programming  Kit  2(D)  ,  18 
Programming  Kit  3  (D)  -  18 


SPECIALS 

Gemini  10X  Printer  $289 

Prowriter  Printer   S345 

Gorilla  Banana  Printer   $199 

Card  ?  Printer  Interlace    $60 

The  Connection  Printer  Interface   $85 

1541  Disk  Drive    $239 

Koala  Graphics  Tablet   $69 

Flip  N'  File  Diskette  Box    S21 

Elephant  Disks  (10) $21 

The  Boss  Joystick  (Wico) $15 

Wico Joystick  $23 

Wico  Trackball    $49 

COSMIC 
COMPUTERS 

UNLIMITED 

727  BREA  CANYON  RD.,  SUITE  16 

WALNUT,  CA  91789 

ORDER  LINES  OPEN  MON-SAT  8  am  -  8  pm 

(800)  626-7642 

PLEASE  FOR  ORDERS  ONLY 
SORRY,  NO  COD'S 

(714)  594-5204 

FOR  TECHNICAL  INFO,  ORDER  INQUIRIES, 
OR  FOR  CALIFORNIA  ORDERS 


C^ 


CBM  64    CALL 

1541  DISK  DRIVE  ...  $239 

1701  Color  MrniHor  . .  $255  1530  Hecarder   $59 

1525  Printer  J239  1600  Modem    $59 

1520  Color  Ptr S169  ISSOAuloHotiam    ...$158 

Card  ?  (Inic)  $60  CMB  64  Ref  GuldO $1S 

Light  Pen    $29  Tlie  Coflnectienllnic)  . .  $S5 

Cassette  Infc $29  MSD  Disit  Drive    $339 

Card  ?  Software    $16  PTI45  Let  Board $S9 

Large  S^ec^Km  of 

64  Software  at 

Great  Prices 
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SOFTWARE 


64 


ACCESS  SOFTWARE 

Neutral  Zone  (C/D)  .  - .  S26 
Sprite  Master  (CID)  ...  $27 

AVALON  HILL 

NukBwar(C)    S12 

Planet  Miners  (C)   $12 

Androm.  Conquest  (Ct  S14 
Midway  Campaign  (C)  S12 
North  Atl.  Convoy  (CJ  $12 
Comp.  Stck5;Bnds(C)  $15 
Computer  Football  (C)  Jta 

TslangardtC)    $16 

BATTERIES  INCLUDED 

Paperclip (D)   $89 

D.Base  $114 

BRODERBUND 

Chopllfter(R|    $29 

Serpentine  (R) $27 

Seafon  (R)   $27 

David's  Midnight  (D)  . .  $23 

COMMODORE 

EasyFils(D)   $75 

Easy  Finance  (O)    $38 

Easy  Mail  (D) $38 

Easy  Script  (D)    $75 

Easy  Schedule  (D)    ...  $59 

Logo(R) $75 

Pilot  (0)   $75 

Assembler  (D) $38 

Music  Machine  (O)  ...  $25 
Music  Composer  (D)  . .  $25 

Meza  Music (D)  $75 

Video/Music  Supt.(O)    $38 

Jupiter  Lander(R) $25 

Radar  Rat  Race(R)  . . .  $25 

Sea  Wolf  (R)    $25 

Klckman(H| $25 

COMMDATA 

Pakacuda  .  (C)  $14(0) $18 
Escp.  MCP  .  (C)  $14(0)  $18 
Centropods   (C[$14(D)$18 

COMPUTERMAT 

Arcade-Pak(C)    $18 

Education-Pak{C) $18 

CREATIVE  SOFTWARE 

Moondust  (R)    $25 

Trashman  (R)    $25 

Save  New  York  (R)    ...  $25 

Astfobltti(R) $25 

Household  Frn.  |D)  ...  $25 

DATA  20 

Video  Pak  80  $139 

Z80  Video  Pak $229 

EN-TECH 

Finance Ca)c64  $34 

Data  Base  64 $56 

Invoice  Ease  64     $56 

EPYX 

Temple  of  APS  (D)  ...  $27 
Upper  Reach.  APS  (D)  $14 
Jumpman(D) $27 

HES 

HES  Modem    $59 

6502  Prof.Dev.Sy3.(C|  .  $22 

Hesmon  64  (R) $27 

Turtle  Graplcs  II  (R|    .,  $41 

Haswrlter64(R)    $32 

Gridrunner(R) $27 

HetrobalUR)   $27 

INFOCOM 

Zork  I.  II  or  III  (D)   $.27 

Deadlir)e(D)    $35 

Starcross  (D) $27 

JIN  SAM 

Mln|.JIni(R) J75 

LITTLE  WIZARD 

Pro.Mall.Llst  (C)$22(D)$25 
Stockmaster 

(inventory)  (C)$25(D)$2B 
LOGISTIC 

Datacalc64  (C)$S5(D)$59 
Home  Journal  ID)  , . , ,  $S5 


MICROSPEC 

Payroll  System  (D)   . . .  $73 

Inventory  Pkg  (D)    $73 

(general  Ledger  (D|  ...  $73 

Disk  Data  Mgr(Dl   $62 

Mail  List  Mfir(D)  $41 

Checkbook Mgr(D)  ...  $39 
M.SOFT 

M-File(D) $89 

ON-LINE 

FroggertDj    $23 

Jawbreaker(D)   $20 

PACIFIC  COAST  SOFT. 
PCS  (80  Col  BD,  Word  Proc, 
D.Base, Spreadsheet)  CALL 
Account  PAC(C/D)  ...  $34 

File  PAC(D) $30 

Editor  PAC(D) $39 

Inquire  PAC(D)  $57 

Happy  Tutor  Typng(D)  $18 
PROFESS.  SOFTWARE 
WordPro  3 -f/64(D[  ...  $68 
QUICK  BROWN  FOX 
Prof.Word  Proc.  (fi)  . . .  $50 
RAIKSOW 

Writers  Assistant $95 

Spreadsheet  Assist.  . .  $95 

File  Assistant  $95 

SIRIUS 
Blade/Blackpoodle  (O)  $27 

Type  Attack  (D)  $27 

Repton  (0|  $27 

Critical  Mass(O) $27 

Snake  Byte  (D)    $23 

Way  Out  (D) $27 

Fast  Eddie  (D)  $23 

Turmoil  (D) $23 

Spider  CiIy(D| $27 

Squish'Em(D)  $23 

Final  Orbit  (D)  $27 

Alpha  Shield  (D)    $27 

SKYLES  ELEC.  WORKS 

Busloalc(C/D) $52 

Busiwriter(D)   $72 

SPINNAKER 

Snooper  Troops  1  (0)  .  $29 

Pacemaker  {Dl    $23 

KindercompID) $20 

Hey  Diddle  (D) $20 

Most  Amaz.  Thing  (D)  .  $27 

SYNAPSE 

Fort  Apocalypse  (C/D)    $23 

Survivor  (C/D)   $23 

Drelbs(C;D) $23 

Pharoh's  Curse  (C/D)  .  $23 

Protector  11(0) $23 

Morgal  (D)   $23 

Shamus(D)  $23 

TAYLORMADE 
Touch  Typing  Tutor 

3.0(D) $21 

TIMEWORKS 

Rbbrs/Lost  Tomb  (C/D)  $21 

Wall  Street  (C/D) $21 

Money  Manaoer  (C/D)    $21 

Data  Master  (C/D) $21 

Dungeons  of  Alg. 

Dragons  (C/D)  $21 

TOTL 

Text 2,6  ..,(C)$32(D)$34 
Ubel2.6  ..  (C)$15|D)$17 
Time  Manager  2.6(C)  .$24 
Time  Manager  2,6  (Di  .  $27 
Resrch  Assist.  2.0  (C)  .  $24 
Resrch  Assist,  2,0  (D)  .  $27 
UMI 

Motor  Mania  |C)   $20 

Renaissance  (C) $27 

VICTORY 

Annlhllator(C/Dl $16 

Kongo  Kong  (C/D) $16 

Trek  (C/D) $14 

Adv,  (Jack #1  |C/D)  ,..$16 
Adv.  Pack  #2  (C/D)  ...  $16 
Grave  Robbers  (C/0)  . .  $13 
Chomper  Man  (C/D)   ..$18 


Apple  Sounds- 
From  Beeps  To  Music 


Parti 

Blame  Mathieu 


In  this  first  of  a  tioo-part  series,  the  author  takes  us  from 
the  simplest  possible  sound  on  the  Apple  to  musical  notes. 
Several  useful  demonstration  programs  are  included. 


Since  I  first  acquired  an  Apple  11+  about  a  year  and 
a  half  ago,  1  have  been  fascinated  by  the  strange 
noises  I  often  hear.  In  this  first  of  two  articles  I  hope 
to  save  you  all  the  trouble  I  went  through  in  learning 
how  to  use  APPLE  sounds.  Readers  who  already 
understand  how  to  use  CTRL-G  and  -16336  may 
want  to  skip  the  next  section  and  go  on  to  "Paddle 
Sounds." 

Beeps  And  Clicks 

Before  you  read  this  section,  you  should  enter  Pro- 
gram 1  on  your  computer  and  save  it.  Now  run  the 
program.  If  you  entered  it  correctly,  you  should  see 
SOUND  #1  at  the  top,  a  line  from  the  program, 
and  a  small  menu. 

Probably  the  first  sound  that  you  ever  heard 
from  your  Apple's  speaker  was  the  bell  sound.  You 
can  reproduce  this  in  immediate  mode  by  holding 
down  the  control  key  (labeled  CTRL)  and  pressing 
the  G  key.  In  SOUND  #1,  you  see  that  in  line  30  a 
CHR$(7)  is  being  printed  -  7  is  the  numeric  code  for 
CTRL-G.  If  you  are  in  Integer  BASIC,  you  will  have 
to  use  the  format  shown  in  line  35.  In  this  line  you'll 
see  a  PRINT  with  two  quotes.  Inside  these  quotes  is 
a  CTRL-G.  The  REM  statement  in  line  37  shows 
how  to  type  line  35.  As  you  can  see,  control  charac- 
ters don't  show  up  in  a  line  listing  or  when  you 
type  them.  An  interesting  side  effect  is  that  when 
you  LIST  your  program,  you  will  hear  all  the  bell 
sounds  in  your  program  that  are  printed  using  the 
method  in  line  35. 

In  Program  1,  the  computer  waits  for  you  to  hit 
a  key.  If  you  hit  R,  it  will  repeat  any  sound  that 
might  be  produced  by  the  above  program  lines.  If 
you  hit  C,  you  will  proceed  to  the  next  sound  in 
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Program  1.  Any  other  key  {except  RESET)  will 
cause  no  change. 

Clicking  -16336 

Now  hit  C  to  go  on  to  SOUND  #2.  In  this  program 
a  simple  FOR/NEXT  loop  is  set  up  to  beep  the 
Apple's  speaker  ten  times.  Note  the  semicolon  at 
the  end  of  line  80;  this  pr.events  the  screen  from 
scrolling.  If  I  hadn't  used  the  semicolon,  as  each 
CTRL-G  was  printed  the  imaginary  cursor  would 
move  down  the  screen  until  the  screen  started  to 
scroll  upward,  which  is,  in  most  cases,  undesirable. 

Looking  at  SOUND  #3,  you  will  notice  the 
number  -16336,  which  is  the  memory  address  of 
the  Apple's  speaker.  Every  time  this  address  is 
accessed,  the  Apple  gives  a  little  push  on  its  speaker, 
creating  a  small  click.  PEEKing,  as  I  have  done  in 
line  130,  is  just  one  simple  way  of  accessing  this 
address.  If  you  missed  the  sound  the  first  time, 
press  R  to  hear  it  again. 

SOUND  #4  includes  another  simple  loop  that 
will  PEEK  the  speaker's  memor)'  address  100  times. 
Instead  of  typing  -16336  every  time  we  wanted  to 
use  it,  we  assigned  -16336  to  the  variable  NO  (for 
NOise).  You  may  use  any  variable  you  wish,  of 
course. 

In  SOUND  #5  you'll  notice  line  250,  which 
strings  a  lot  of  "clicks"  together.  This  produces  a 
longer  noise  than  in  SOUND  #3  and  a  higher- 
pitched  noise  than  in  SOUND  #4.  As  a  rule,  the 
closer  your  PEEKs,  the  higher-pitched  your  noise  is 
going  to  be.  In  line  250  you  will  notice  that  we 
PEEKed  -16336  a  total  of  15  times,  a  purely  arbitrary 
number. 

Finally,  SOUND  #6  demonstrates  most  of 
what  we've  learned  about  clicks.  It  uses  a  FOR/ 
NEXT  loop  to  cause  line  320  to  repeat  100  times. 
Line  320  has  an  assortment  of  minus  and  plus  signs 
to  show  that  it  rarely  makes  a  difference  what  you 
do  to  this  location,  as  long  as  you  access  it. 


Now  on  to  something  a  little  more  exciting 
and  complicated. 

Paddle  Sounds 

Program  2  requires  paddles  or  joystick.  It  is  a  simple 
BASIC  program  which  reads  a  byte  from  the  DATA 
statement  and  POKEs  it  into  memory  locations  768 
($300)  to  786  ($312).  The  routine  begins  by  CALLing 
768.  If  you  entered  the  program  correctly,  you 
should  hear  a  fairly  high-pitched  whine,  and  as 
you  move  the  paddles  or  joystick,  this  whine  will 
change  in  pitch.  You  may  leave  the  program  by 
pressing  RESET  or  CTRL-RESET,  depending  on 
your  model. 

Program  3  is  the  source  code  for  this  little 
machine  language  routine.  Here  is  a  quick  expla- 
nation of  the  routine: 

1.  Put  the  paddle  number  in  the  X  register. 

2.  Jump  to  the  PREAD  subroutine  (see  Apple 
U  Reference  Mmnial).  PREAD  acts  as  a  delay, 
dependent  on  the  paddle  setting. 

3.  Tweak  the  speaker  by  accessing  -16336 
($C030). 

4.  Repeat  for  next  paddle. 

5.  Jump  to  beginning. 

Since  the  pitch  of  the  noise  depends  on  how 
close  together  the  tweaks  are,  the  lower  the  paddle 
setting,  the  higher  the  pitch  of  the  noise. 

Making  Music 

Now  we'll  look  at  a  program  that  lets  you  produce 
notes  (and  thus  music)  on  your  Apple.  Of  course, 
there  are  some  limitations.  For  example,  you  won't 
be  playing  Beethoven's  Fifth  Symphony  in  five- 
part  harmony  with  snare  drum  accompaniment, 
if  you  want  that,  many  peripheral  boards  are  avail- 
able for  the  Apple  which  do  amazing  things.  How- 
ever, you  can  do  quite  a  lot  with  the  hardware 
already  in  your  Apple. 

Program  4  is  a  simple  BASIC  program  that 
POKEs  in  a  machine  language  subroutine,  sets 
up  a  few  parameters,  and  CALLs  the  subroutine. 
The  program  continues  running  until  a  key  is 
pressed.  Try  running  it.  If  you've  never  heard 
notes  from  your  Apple,  you  will  be  quite  pleased. 

After  the  program  has  POKEd  in  the  sub- 
routine, it  POKEs  a  random  number  (the  pitch) 
into  location  768  ($300)  and  POKEs  a  random 
number  (the  duration)  into  769  ($301).  The 
maximum  value  that  can  be  POKEd  into  these 
locations  is  255. 

Program  5  is  the  source  code  for  the  "Note 
Producer"  program  that  is  POKEd  into  memory 
in  Program  4.  In  essence,  the  program  works  much 
like  "Paddle  Sounds."  The  main  difference  is  that 
instead  of  the  paddles  controlling  the  pitch  of  the 
sound,  locations  768  and  769  control  the  pitch 
and  duration  of  the  tone.  The  source  code  contains 


comments  that  should  help  you  understand  what 
is  happening. 

As  you  can  see  by  now,  whenever  you  want 
a  sound  routine,  you're  going  to  have  to  access 
location  -16336  ($C030).  Try  experimenting  with 
Program  5  by  POKEing  in  your  own  note  values 
and  hearing  the  results. 

Next  month,  we'll  look  at  a  program  called 
"Apple  Music  Writer,"  which  will  enable  you  to 
edit  and  play  your  own  song.  Until  then,  experi- 
ment with  the  programs  here,  and  you're  sure  to 
come  up  with  some  surprising  results. 

Program  1:  Sounds  And  Variations 

5   REM   PRDGRAMttl 

10  I  =  10:  HOME 

20   PRINT  "SOUND  #1":  PRINT  :  LIST  30,3 

7 
30   PRINT   CHR*  (7) 

35   PRINT  REM   CTRL-G 

37   REM   PR  I  NT  "CTRL-G '■ 

40   GOTO  10000 

50  I  =  50:  HOME 

60   PRINT  "SOUND  #2":  PRINT  :  LIST  70,9 

0 
70   FOR  LOOP  =  1  TO  10 
80   PRINT   CHR*  <7>J 
90   NEXT 
100   GOTO  10000 
110  I  =  110:  HOME 
120   PRINT  "SOUND  tt3":  PRINT  :  LIST  130 

130  X  =   PEEK  (  -  16336) 

140   GOTO  10000 

150  I  =  150:  HOME 

160   PRINT  "SOUND  *4":  PRINT  :  LIST  170 

,200 
170  NO  =   -  16336 
180   FOR  LOOP  =  1  TO  100 
190  X  =   PEEK  (NO) 
200   NEXT 
210   GOTO  10000 
220  I  =  220:  HOME 
230   PRINT  "SOUND  *5":  PRINT  :  LIST  240 

,260 
240  NO  =   -  16336 
250  X  =   PEEK  (NO)  +   PEEK  (NO)  +   PEEK 

(NO)  +   PEEK  (NO)  +   PEEK  (NO)  +   PEEK 

(NO)  +   PEEK  (NO)  +   PEEK  (NO)  +   PEEK 

(NO)  +   PEEK  (ND)  +   PEEK  (NO)  +   PEEK 

(NO)  +   PEEK  (NO)  +   PEEK  (NO)  +   PEEK 

(NO) 
260   REM   FIFTEEN  TIMES 
270   GOTO  10000 
280  I  =  280:  HOME 
290   PRINT  "SOUND  #6":  PRINT  :  LIST  300 

,330 
300  NO  =   -  16336 
310   FOR  LOOP  =  1  TO  100 
320  X  =   PEEK  (NO)  -   PEEK  (NO)  +   PEEK 

(NO)  -   PEEK  (NO)  +   PEEK  (NO)  -   PEEK 

(NO)  +   PEEK  (NO) 
330   NEXT 
10000   POKE   -  16368,0:  VTAB  20:  HTflB  1 

:  CALL   -  958:  PRINT  "'R'  FOR  REPE 

AT,  'C    TO  CONTINUE  ";:  GET  AS 
10010   IF  At  <   >  "R"  AND  A*  <   >  "C"  THEN 

10000 
10020   IF  A*  =  "C"  THEN  10100 
10030   IF  I  =  10  THEN  30 
10040   IF  I  =50  THEN  70 
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10050 

IF    I    =    110    THEN    X    = 

PEEK     (    -    16 

336);     GOTO    130 

10060 

IF    I    =    150    THEN    170 

10070 

IF    I    =    220    THEN    240 

10080 

IF    I    =    230    THEN   300 

10100 

IF    I    =    10    THEN    50 

10110 

IF    I    =    50    THEN    110 

10120 

IF    I    =    110    THEN    150 

10130 

IF    I    =    150    THEN    220 

10140 

IF    I    =    220    THEN    280 

10150 

TEXT    :    HTAB    1;    PRINT 

"END    OF   PRO 

BRAM#1" 

Program  2:  Paddle  Sounds 

10      REM       PR0GR(=iM#2 

20      FOR    LOC    =    768    TO    786:     RE 

:AD    BYTE:     PD 

30 


40 


LOC, BYTE:  NEXT  LOC 
DATA  162,0,32,30,251, 141,48, 192, 162 

,1,32,30,251, 141,48, 192,76,0,3 
CALL  768 


Program  3:  Source  Code  For  Paddle  Sounds 


1  ORG       *300 

2  t*tt*t*ttt**tt**t****** 

3  * 

4  *PR0GRAM*»3    -       PADDLE 

5  * 

6  ******t***tttttttt*tttt 

7  PDLZERO   EQU   *00 
a  PDLDNE    EQU   *01 

9  PREAD     EQU   *FB1E 

10  SPEAKER   EQU   SC030 

11  START     LDX   #PDLZERO 


12 

13 

14 


15 
16 
17 


JSR   PREAD 

STA   SPEAKER 
LDX   #PDLDNE 


JSR   PREAD 
STA   SPEAKER 
JMP   START 


;76a  DECIMAL 

SOUNDS  « 

« 

t*ttt*ttt 


;SET  UP  FOR  PADD 

LE  ZERO 

;GET  DELAY  FROM 

PADDLE  ZERO 

; TWEAK  SPEAKER 

; REPEAT  P 

ROCESS  FOR  PADDL 

E  ONE 


; START  OVER 


Program  4:  Note  Producer 


5 

10 

20 


30 


40 


REM   PR0GRAM#4 
FOR  LOC  =  770  TO  790:  READ  BYTE:  POKE 

LOC, BYTE:  NEXT 
POKE  768,  INT  (  RND  (1)  *  2SS)  +  1: 
POKE  769,  INT  (  RND  CD  »  100)  + 

1:  CALL  770: X  =   PEEK  (  -  16384):  IF 

X  <  127  THEN   POKE   -  16368,0:  GOTO 

20 
DATA   173,48, 192, 136,208,5,206, 1,3, 

240,9,202,208,245, 174,0,3,76,2,3,96 
POKE   -  16368,0 


Program  5:  Source  Code  For  Note  Producer 

1  ORG      $300  ;76a    DECIMAL 

2  ««»««««««»««« «««««l|i«l|[»it(«»t «««»«« 

3  «  « 

4  *PRDGRAM*»5  -   NOTE.  PRODUCER     * 

5  *  « 

6  «««»*««t ««««*«**»*«*««»««»«»«»«« 

7  TWEAK     EQU   *C030 

8  PITCH     EQU   S300 

9  DURATION  EQU   *301 
DS    2 


10 


11  START 


LDA   TWEAK 


;MAKE  SPACE  FOR 

PITCH  AND  DURATI 

ON 

; TWEAK  THE  SPEAK 

ER 


12 

BRANCH 1 

DEY 

13 

BNE 

BRANCH2 

14 

DEC 

DURATION 

15 

BEQ 

RETURN 

16 

BRANCH2 

DEX 

17 

BNE 

BRANCH 1 

IB 

LDX 

PITCH 

19 

JMP 

START 

20 

RETURN 

RTS 

; DURATI ON  =  DURAT 

lON-l 

; IF  DURATI aN=0  T 

HEN  RETURN 


;  CONTINUE  TO  SOUN 
D  NOTE 

;GD  BACK  TO  OPERAT 
ING  SYSTEM      fi 


•     VIC  20     « 

►     COMMODOR  64     •     ATA 

21 

< 

-1 
0 

z 

• 

-1 

a 
a 
< 

• 

THERE  IS  STRENGTH  IN  NUMBERS 

JOIN 

THE  SOFTWARE  CO-OP 

NOW!  For  ihe  cost  of  a  single  game  cartridge  you 
can  join  THE  SOFTWARE  CO-OP.  Use  the  advantage 
of  bulk-purchasing  and  pay  only  SI  over  whole- 
sale for  games,  utilities  and  educational  software. 
Rock-bottom  prices  on  all  equipment  and  supplies. 
Savings   up  to  40%.   Guaranteed.   Specializing  in 
VIC  20,  Commodor  64.  Atari,  Apple  and  Sinclair. 

Write  today  for  tree  details  aboul  our  exciling  new  catalog 
and  other  sensaiional  Co-op  beneflis  including  special  swap 
system  and  free  lechnicsl  assistance 

THE  SOFTWARE  CO-OP 

PO  BOX  275             ELIZABETH.  NJ  07207 

2 

lUVXV     < 

•     179  UOQOl^l^OO     • 

•     03  OIA     •  1 

cobsStar 


Alir  SHIPPING  WITHIN  Z  DAYS 

SEND  SLOOFOfl  COMPLETE  LIST 


VIC^20 


16KRAM    $59 

CARDBOARD  (3  SLOT  EXP) 33 

BANANA  PRINTER  (80  COLUMN)    225 

DISPLAY  MANAGER  (40/80  COL)  JWITH  WORD  PROC.)    ..  89 

RABBIT  (EASTERN  HOUSE)  [VIC  OR  64)   35 

HES  MODEM  (WITH  SOFTWARE)  |UIC  OR  64)    59 

HES  MON  ASSEMBLER  (C)  fVIC  OR  64)    29 

OUST  COVER  [VIC,  64,  800.  400.  810.  or  410)  7 

QUICK  BROWN  FOX  (C)  (VIC  OR  64)   54 

SWORO  OF  FARGOAL  (T)  21K   23 

COM-64 

WORDPRO  3  ■  |D|  69 

VIDEOPAK  80  IBO  CGLUMKI  159 
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6502  PROF.  BEV.  SySTEM  ITl  23 
PRACTICALC  SPREAD  SHEET  |D|      42 

LASER  STRIKE  (T)  22 

ELEMENTARY  64  (BOOK)  14 

TOTL  LABEL  (T)  [VIC  OR  B4)  17 

JUMP  MAN  [O.TI  29 

ROBBERS  OF  LOST  TOMB  (O.Tj  21 

FDFT  APOCALYPSE  (D.Tj  26 

JAWBREAKER  |C|  26 

FROGGER  |D,T|  26 

ANNIHILATQR  |T|  IB 

TEMPLE  OF  APSHAI  (D.T|  29 

C  =  CARTRIDGE  0     DISK 


AATARI 

64K  RAM  (FOR  4001  109 

4eK  RAM  (FDR  400)  89 

MONKEY  WRENCH  H  52 

JUMP  MAN  JR.  |C|  29 

ALIEN  GROUP  VOICE  BOX  |0|  40K  119 

TECHNICAL  NOTES  25 

NEWPORT  PROSTICK  23 

MICROBITS  MODEM  159 

MICROBITS  PRINTER  INTERFACE  83 

OE  RE  ATARI  |BOOK|  IB 

VAL  FORTH  |D|  24K  45 

STAR  LEAGUE  BASEBALL  |D,T)24K  25 

DONKEY  KONG  |C1  37 

DIG  AUG  |C|  34 

ALOG  PAGEWRITER  (Dt  32K  34 
T     C*SSETT£              •  HOST  ITEMS 
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Extra 
Instructions 


Joel  C.  Shepherd 


Combining  machine  language  instructions  by  creating 
neio  opcodes  can  result  in  more  efficient  programming 
in  certain  situations.  Machine  language  progranuners 
can  conserve  memory  and  increase  execution  time  with 
the  methods  discussed  here.  This  article  explores  the 
unofficial,  hidden  "commands"  you  can  give  the  6502. 


The  6502  microprocessor  can  execute  151  instruc- 
tions. There  are  56  different  types  of  instructions 
in  its  library,  and  each  can  be  used  with  at  least 
one  of  the  13  addressing  modes  available.  Each 
instruction  performs  one  operation,  such  as 
loading  a  register,  setting  a  flag,  or  rotating  a  byte, 
and  deals  with  one  byte  of  data  or  one  memory 
location.  The  6502's  machine  language  consists  of 
nothing  more  than  variations  on  these  simple 
instructions.  It  is  an  extremely  low-level  language 
which  is  both  a  boon  and  a  bane  to  programmers. 
While  machine  language  is  versatile  and  applicable 
to  any  programming  problem,  it  can  also  be  tedi- 
ous in  a  particular  sense.  It  can  require  program- 
mers to  use  several  instructions  of  the  same  type 
performing  similar,  yet  separate,  operations. 

Consider  the  LDA  and  LDX  instructions; 
both  load  a  register  and  set  the  same  processor 
status  flags.  They  also  share  four  addressing 
modes.  One,  however,  loads  the  accumulator 
and  the  other  loads  the  X  register.  There  is  no 
instruction  which  will  load  both.  The  language  is 
so  simple  that  it  has  no  instructions  with  more 
than  one  memory  location  or  register  as  an 
operand. 

There  is  no  reason  why  the  6502' s  instruction 
set  cannot  be  expanded  to  include  more  sophisti- 
cated instructions.  Such  expansion,  however, 
would  probably  also  drive  up  the  processor's  cost. 
The  designers  of  the  6502,  in  an  effort  to  keep  its 
cost  low,  decided  to  give  it  a  simple  machine 
language. 

Creating  New  Opcodes 

A  possible  solution  to  the  problem  would  be  to 
"trick"  the  processor  into  executing  instructions  it 


didn't  "know."  Imagine  being  able  to  load  two 
registers  simultaneously  or  being  able  to  AND 
two  registers  with  one  instruction.  There  is  a 
simple  way  to  do  just  that  and  more. 

If  you  examine  a  list  of  6502  opcodes,  you'll 
notice  that  none  of  the  codes  have  the  form  a7  or 
aF  (a  is  any  hexadecimal  digit).  Codes  of  this  form 
are  not  "official"  6502  opcodes,  yet  all  are  execut- 
able and  potentially  useful. 

An  example  is  opcode  AF.  Opcodes  AD  and 
AE  are  the  LDA  $aaaa  and  LDX  Saaaa  instructions 
respectively.  Opcode  AF  combines  the  two:  it  loads 
the  accumulator  and  the  X  register  from  the  same 
location.  For  instance,  these  two  instructions: 


;load  accumulator 
;and  X 


;load  AandX 


AD    00      16      LDA      $1600 
AA  TAX 

can  be  replaced  by: 

AF    00      16      LDAX    $1600 

(LDAX  is  a  new  mnemonic.  I've  included 
mnemonics  to  represent  the  operations  performed 
by  the  new  instructions.)  Using  LDAX  saves  one 
byte  and  two  cycles  of  execution  time.  That  might 
not  seem  like  much,  but  in  a  loop  routine  the  time 
savings  may  be  significant.  (The  execution  times 
given  for  the  routines  using  the  new  opcodes  are 
estimates.  More  on  that  later.)  Additionally,  with 
this  instruction,  it  is  possible  to  load  the  ac- 
cumulator from  a  zero-page  location  indexed  by 
the  Y  register;  this  is  not  possible  with  the  LDA 
instruction. 

Opcode  87  is  another  example.  Opcode  85  is 
the  STA  $aa  instruction,  and  86  is  the  STX  Saa 
instruction.  Opcode  87  executes  both  85  and  86, 
but  with  a  twist.  It  is  impossible  for  a  location  to 
contain  two  different  values  at  one  time.  Opcode 
87  logically  ANDs  the  accumulator  with  the  X 
register,  changing  neither,  and  stores  the  result 
in  the  address  specified.  In  other  words,  only  the 
bits  which  are  set  in  both  the  accumulator  and  the 
X  register  are  set  in  the  byte  which  is  stored.  So, 
the  routine: 


AS     AD 
87     AD 


LDA      SAD 
ANDX  $AD 


;getchar 
;maskwithX 
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Summary  Of  Extra  6502  Instructions 


Name/Description       Operation 


Addressing 
Mode 


ANDX 

AND  A  with  X 


Machine  Hex 

Language  Op- 

Form  Code 


N 


#     NZCV 


A&X-M 


Zero  Page        ANDXSaa  87  3         2 

ZeroPage,Y    ANDXSaa,Y        97  4         2 

Absolute  ANDXSaaaa         8F  4  3 


DCMP 

Decrement  M, 

A-(DECM) 

Zero  Page 

DCMPSaa 

C7 

8 

2 

■?->7. 

Compare  to  A 

Zero  Page, X 

DCMPSaa,X 

D7 

10 

2 

Absolute 

DCMPSaaaa 

CF 

10 

3 

Absolute,X 

DCMPSaaaa,X 

DF 

ir 

3 

ISBC 

Increment  M, 

A-(INCM)-C-A,C 

Zero  Page 

ISBCSaa 

E7 

8 

2 

?■}•>•> 

Subtract  from  A 

Zero  Page,X 

ISBC$aa,X 

F7 

10 

2 

Absolute 

ISBCSaaaa 

EF 

10 

3 

Absolutc,X 

ISBC$aaaa,X 

FF 

11* 

3 

LDAX 

Load  A  and  X 

M-A,M-X 

Zero  Page 

LDAXSaa 

A7 

3 

2 

??-- 

Zero  Page,Y 

LDAXSaa,Y 

B7 

4 

2 

Absolute 

LDAXSaaaa 

AF 

4 

3 

Absolute, Y 

LDAXSaaaa,Y 

BF 

4* 

3 

RLAN 

Rotate  M  [eft. 

(ROLM)&A-A 

Zero  Page 

RLANSaa 

27 

8 

2 

■>77. 

AND  with  A 

Zero  Page,X 

RLANSaa,X 

37 

10 

2 

Absolute 

RLANSaaaa 

2F 

10 

3 

Absolute,X 

RLANSaaaa,X 

3F 

11* 

3 

RRAD 

Rotate  M  right. 

(RORM)  +  A  +  C-A,C 

Zero  Page 

RRADSaa 

67 

8 

2 

im 

Add  with  carry 

Zero  Page,X 

RRAD$aa,X 

77 

10 

2 

Absolute 

RRADSaaaa 

6F 

10 

3 

Absolute,X 

RRADSaaaa,X 

7F 

11* 

3 

SLOR 

Shift  M  left. 

(ASLM)VA-A 

Zero  Page 

SLORSaa 

07 

8 

2 

777. 

OR  with  A 

Zero  Page,X 

SLOR$aa,X 

17 

10 

2 

Absolute 

SLORSaaaa 

OF 

10 

3 

Absolute, X 

SLORSaaaa,X 

IF 

11* 

3 

SREO 

Shift  M  right. 

(LSRM)VA-A 

Zero  Page 

SREOSaa 

47 

8 

2 

777. 

Exclusive  OR  with  A 

Zero  Page,X 

SREO$aa,X 

57 

10 

2 

Absolute 

SREOSaaaa 

4F 

10 

3 

Absolute,X 

SREOSaaaa,X 

5F 

11* 

3 

TSTA 

Test  bit  2  in  A 

A&#S04  -r  A 

Absolute 

TSTASaaaa 

9F 

4 

3 



TSTX 

Test  bit  2  in  X 

X&#$04-A 

Absolute 

TSTXSaaaa 

9E 

4 

3 

— - 

The  following  notation  applies  to  this  summary: 


A  Accumulator 

X,Y  Index  Registers 

M  Memory 

C  Carry  Flag 

?  Change 


No  Change,  orSubtract  V 

+       Add  Saa 

&       Logical  AND  $aaaa 

V       Logical  Exclusive  OR  N 

-       Transfer  To  ^ 


Logical  OR 

8-bit  Zero- Page  Address 

16-bit  Absolute  Address 

Number  Of  Clock  Cycles 

Number  Of  Storage  Bytes 

Add  I  if  page  boundary  is  crossed 
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Complete  Personal  Accountant: 
we've  made  the  best 
much  more  friendly. 


If  you  have  any  doubts  that  we  offer  the  best  and 
most  complete  personal  financial  package  available, 
look  over  the  features  listed  below.  Now  we  have 
the  only  package  with  full  screen  editing  for  Atari 
400/800f  TRS-80  COLOR,  Commodore  64*  and 
VIC-20;  the  ability  to  move  the  cursor  in  any  direc- 
tion makes  our  accountant-designed  package   ^^ 
even  more  friendly  than  before.  No  one  else     ^^ 
offers  all  of  these: 

1.  CHECKBOOK  MAINTENANCE-  . 
automatically  balances  your  checkbook    A 
with  each  entry;  manages  checks, 
charges,  deposits,  and  interest  quick-,  i' 
ly  and  accurately.                                ■^ 

2.  CHART  OF  ACCOUNTS- 
maximum  of  user  flexibrlty  with 
up  to  99  accounts  plus  9  sub- 
categories may  be  defined. 
3.CHECKSEARCH-mul- 
ti-reference;  tracks  items 
on  every  field  including 
tax  deductibles. 

4.  NET  WORTH/ 
INCOME/EXPENSE 
STATE  ME  NT- 
know-exactly- 
where-you-stand 
program  generates 
statements  with  the 
touch  of  a  key. 

5.  DETAIL  &  SUMMARY 
BUDGET  ANALYSIS-an 
absolute  necessity  in  financial 
planning. 

6.  CHECK  WRITER-prints 
personalized  checks?* 


7.  PAYMENTS/APPOINTMENTS  CALENDAR- 
monthly  displays  of  up  to  250  bills  and  200 
appointments. 

8.  COLOR  GRAPH  DESIGN  PACKAGE -graphs 
all  monthly  files. 

9.  MAILING  LIST-maintains  all  records,  sorts  by 
name  or  zip,  allows  add/change/delete. 

10.  FRIENDLY  USER  MANUAL-complete 

with  indexing,  flow  charts  and  diagrams;  the 
' .     most  thorough  documentation  on  the 
^     market. 

This  all  adds  up  to  the  finest  personal 
'     financial  system  available— compre- 
hensive enough  for  a  small  business, 
k     Less  than  one  hour  of  data  input 
per  month  will  allow  this  menu- 
driven  package  to  help  you 
"^    handle  your  finances  with  a 
lot  more  fun  than  drudgery. 

Plus,  ours  is  the  only 
^    expandable  system;  pur- 
chase the  package  in 
sections  and  add  on 
^   as  your  financial 
needs  grow.  Fea- 
tures 1,2, 3  and  6: 
$39.95  diskette, 
$36.95  cassette;  Fea- 
tures 4  and  5:  $29.95 
diskette,  $26.95  cassette; 
Features  7, 8  and  9:  $29.95 
diskette,  $26.95  cassette;  or 
save  S19.90  or  $15.90 
respectively  by  buying  the 
entire  system  for  S79.95  dts- 
itette,  S74.95  cassette. 


Prices  subfect  to  change  without  notice.  See  your  local  dealer  or  order  direct.  New  catalog  available. 
Add  S3.00  for  postage  and  handling.  Credit  card  orders  call  toll  free: 

1-800-334-SQFT 

DEALER  INQUIRIES  INVITEB 

programiner'sSmil^Wfe 

a  division  of  flltUTetoS^© 
P.O.  box  3470,  dept.  C,  chapel  hill,  north  Carolina  27514, 919-967-0861  .  - 


(ANDX  is  a  mnemonic  for  87)  loads  the  ac- 
cumulator, ANDs  it  with  the  X  register,  and  stores 
the  result  in  location  SAD.  It  occupies  four  bytes 
and  takes  six  cycles  to  execute.  Compare  that  to 
the  following  equivalent  routine: 


Generally,  the  same  operand  is  used  for  both 
sub-instructions.  Consider: 


SA 

25      AD 

85      AD 


TXA 

AND     SAD 

STA       SAD 


;Xinto  A 

;AND"X"  with  SAD 
;store  result 


which  requires  five  bytes  and  eight  cycles  to 
execute.  One  byte  and  two  cycles  are  saved  by 
using  the  first  routine. 

Opcode  DF  is  an  interesting  instruction.  Op- 
code DD  compares  the  accumulator  to  an  X  in- 
dexed address,  and  opcode  DE  decrements  the 
value  in  an  X  indexed  address  by  one.  Opcode  DF 
first  decrements  the  value  in  the  address  given 
and  then  compares  the  result  to  the  accumulator. 
For  example: 


A9     A5 

LDA      #$A5 

;Iooplerininator 

DF    00 

16 

DCMP  $1600 

;done? 

DO    aa 

BNE       $.... 

;no,  do  next 

(DCMP  is  a  mnemonic  for  DF)  loads  the  ac- 
cumulator with  #$A5,  decrements  the  value  in 
$1600  by  one,  compares  $1600  to  the  accumulator, 
and  branches  if  they  are  not  equal.  This  could  be 
used  to  control  a  loop. 

How  The  New  Opcodes  Execute 

In  the  table,  I  have  included  ten  new  instruction 
types,  creating  41  new  instructions.  The  opera- 
tions performed  by  the  new  instructions  are  com- 
binations of  the  "original"  6502  instructions.  There 
are  some  general  rules  for  predicting  what  one  of 
the  new  opcodes  will  do. 

First,  all  of  the  new  instructions  execute  the 
two  preceding  instructions.  Opcode  DF  executes 
both  DD  and  DE,  for  example.  The  two  preceding 
instructions  we'll  call  the  "sub-instructions"  of 
the  new  instructions.  So,  a5  and  a6  are  sub- 
instructions  of  a7,  and  aD  and  aE  are  aF's  sub- 
instructions. 

If  the  sub-instructions  are  different  types  of 
instructions,  the  sub-instruction  with  the  greatest 
opcode  will  be  executed  first;  otherwise  the  sub- 
instructions  will  be  executed  simultaneously.  For 
instance,  since  LDA  and  LDX  are  both  load  in- 
structions, LDAX  will  execute  them  simultane- 
ously. But,  since  ASL  and  ORA  are  different  types 
of  instructions,  ASL  (opcode  06)  will  be  executed 
first,  followed  by  ORA  (05)  when  opcode  07  is 
executed.  There  is  a  definite  inconsistency  in  this 
rule:  it  implies  that  the  processor  examines  the 
current  instruction  and  then  decides  to  execute 
the  sub-instructions  either  one  at  a  time  or  simul- 
taneously. The  6502  isn't  that  sophisticated.  The 
rule,  however,  is  the  only  one  that  explains  the 
operations  of  the  new  opcodes.  The  given  execu- 
tion times  are  based  on  this  rule. 
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07      19 


SLOR    $19 


(SLOR  is  a  mnemonic  for  07).  This  ASLs  $19  and 
then  ORAs  $19  with  the  accumulator.  Location 
$19  is  the  operand  for  both  sub-instructions. 

Opcodes  97,  B7,  and  BF  are  special  cases  of 
the  preceding  rule.  All  three  have  sub-instructions 
which  use  different  addressing  modes,  X  indexed 
and  Y  indexed.  The  operands  used  by  the  new 
instructions  are  the  given  addresses  indexed  by 
the  Y  register.  For  instance,  35  is  the  LDA  $aa,X 
instruction  and  B6  is  the  LDX  $aa,Y  instruction. 
Opcode  B7,  then,  is  the  LDAX  $aa,Y  instruction. 

Two  Exceptions 

There  are  two  additional  opcodes- which  are  ex- 
ceptions to  all  of  the  rules  discussed:  9E  and  9F. 
Opcode  9E  logically  ANDs  the  X  register  with  the 
value  #$04,  keeping  the  X  register  intact.  The 
result  is  stored  in  an  absolute  memory  location. 
For  example: 


A6     F6 

9E      40      03 


LDX       SF6 

TSTX     S0340 


;isbit2set? 


(TSTX  is  a  mnemonic  for  9E)  loads  the  X  register, 
ANDs  it  with  #$04  and  stores  the  result  in  $0340. 
The  origin  of  the  #S04  is  unknown. 

Opcode  9F  is  similar  to  9E:  the  accumulator  is 
ANDed  with  #$04  and  the  result  is  stored  in  an 
absolute  location.  So,  these  instructions: 

A9     06  LDA       #$06 

9F      00      00      TSTA    $0000 

(TSTA  is  a  mnemonic  for9F)  AND  the  accumulator 
with  #$04  (yielding  #$04)  and  store  the  result  in 
$0000.  The  accumulator  will  contain  #$06  when 
this  routine  is  finished. 

The  execution  times  of  the  new  instructions 
in  the  table  are  based  on  whether  the  sub- 
instructions  are  of  the  same  type  or  not. 

It  seems  that  one  of  the  major  shortcomings 
of  the  new  instructions  is  their  specialization.  For 
example: 


4A     aa 
45      aa 


LSR       Saa 
EOR       Saa 


is  probably  not  used  in  too  many  programs.  The 
SREO  (mnemonic)  instruction  (which  replaces 
the  above  instructions)  is  too  specialized  to  be  of 
much  use  to  anybody. 

Currently,  there  are  no  assemblers  which 
accept  the  new  mnemonics  as  valid  instructions. 
The  opcodes,  however,  can  be  POKEd  directly 
into  the  computer.  An  interesting,  and  useful, 
project  would  be  to  write  an  assembler  which 
could  handle  the  new  instructions.  It  wouldn't  be 
difficult  to  modify  an  assembler  written  in  BASIC 
to  recognize  these  new  mnemonics.  © 
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ripheral. As  an  educa- 
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it  is  without  equal,  espe- 
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the  pen  and  a  display  is  altered 
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comparable  utility  to  a  joystick. 
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Cormrmodore  DOS  Wedges: 

An  Overview 


Jim  Butterfield,  Associate  Editor 


Most  Commodore  machines  ha~oc  a  small  program 
called  a  "DOS  Wedge"  which  allows  convenient  use  of 
various  disk  commands.  Recently,  copies  of  this  program 
have  been  in  circulation  without  information;  many 
users  who  have  it  don't  know  how  to  use  it.  Here  are 
the  details. 

What  It  Does 

DOS  Wedge  programs  provide  for  three  types  of 
capability: 

-  the  disk's  error  status  may  be  checked  with 
a  simple  command; 

-  a  disk  directory  (or  catalog)  may  be  obtained 
without  disturbing  a  program  which  has  al- 
ready been  loaded; 

-  a  number  of  "disk  commands"  may  be  easily 
transmitted  to  the  disk. 

How  To  Start  The  Wedge 

Wedge  programs  are  often  self-relocating.  If  you 
LOAD  the  wedge  program  and  say  RUN,  the 
program  will  find  a  spare  place  in  memory  and 
pack  the  DOS  wedge  system  there.  After  this, 
you  may  type  NEW  and  the  wedge  will  remain  in 
place:  it's  been  packed  into  a  safe  part  of  memory. 

Some  wedge  programs  come  in  "pieces,"  or 
as  a  set  of  programs  on  the  disk.  The  first  program, 
called  the  "boot,"  loads  in  the  others  as  necessary. 
This  is  usually  the  case  with  the  C-64  Wedge,  for 
example. 

Commodore  64  and  VIC-20  wedge  programs 
often  also  come  with  a  how-to  program,  explaining 
the  system  and  how  it  works.  Many  PET/CBM 
wedge  programs  print  brief  instructions  on  the 
screen  as  tihey  self-relocate. 

For  other  systems,  you  may  find  it  necessary 
to  use  the  last  resort  of  reading  the  instructions. 
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First  Rules  In  Using  The  Wedge 

DOS  Wedge  commands  must  be  typed  in  as  direct 
commands.  You  cannot  include  them  as  part  of  a 
program.  This  is  deliberate:  programs  will  run  at 
full  speed  without  the  need  to  check  for  the  extra 
wedge  commands. 

Wedge  commands  should  start  in  column  1 
of  the  screen.  The  primary  wedge  commands  are 
flagged  with  either  of  two  symbols: 

>  or  @ 

The  "greater  than"  sign  was  the  original.  It  looks 
like  a  wedge  and  is  partly  responsible  for  giving 
the  wedge  program  its  name.  On  later  Commo- 
dore computers,  this  character  needed  the  shift 
key;  to  save  finger  work,  the  (a  (at  sign)  character 
was  allowed  as  an  alternative. 

A  few  supplementary  commands  which  use 
other  starting  symbols  are  available.  They  tend  to 
be  less  important,  since  their  functions  can  be 
performed  easily  with  conventional  commands. 
The  most  common  of  these  are: 

/  -  to  load  a  program;  and 

*  -  to  load  and  run  a  program. 

Thus,  a  command  such  as  /DOGLEG  will  cause  a 
program  named  DOGLEG  to  be  loaded  from 
disk. 

Pattern  Matching 

In  many  cases,  a  program  name  does  not  have  to 
be  specified  exactly.  We  can  give  part  of  the  name 
and  use  "pattern  matching"  to  find  one  or  more 
programs  that  match  the  name.  The  pattern 
matching  characters  are: 

?  -  to  match  any  single  character;  and 

*  -  to  match  any  stream  of  characters. 

Thus,  a  command  such  as  /DOG*  will  load  the 
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first  program  it  comes  to  whose  name  starts  with 
the  characters  DOG.  This  might  include  DOGLEG, 
DOGHOUSE,  DOG,  and  DOGOOD.  Similarly,  a 
command  such  as  /D?G  will  load  a  three-character 
name  such  as  DIG,  DOG,  or  DRG. 

Pattern  matching  can  be  used  for  many  DOS 
Wedge  commands.  You  must  not  use  it,  of  course, 
when  you  SAVE  a  program,  since  the  program 
must  have  an  exact  name. 

Disk  Status 

This  is  perhaps  the  most  useful  (and  the  briefest) 
DOS  wedge  command  of  all.  Simply  type  the  >  or 
@  character,  followed  by  the  RETURN  key,  and 
you'll  get  the  status  of  the  disk. 

Most  of  the  time,  the  disk  will  not  report  an 
error,  but  will  give  you  a  message  like: 
00,OK,00,00.  If  there's  an  error,  or  immediately 
following  a  SCRATCH  command  (more  on  this 
later),  you'll  get  a  different  message.  Following  a 
SCRATCH,  you'll  be  told  how  many  files  have 
been  removed  from  disk.  If  the  disk  is  signalling 
an  error  condition,  you'll  be  told  what  the  error  is. 

Most  of  the  time,  the  error  will  be  an  obvious 
one,  and  you'll  spot  the  difficulty  right  away.  You 
might  have  attempted  to  write  to  a  protected  disk, 
or  one  that  is  full.  You  might  have  tried  to  create 
a  new  file  giving  a  name  that  already  exists.  You 
might  be  trying  to  read  or  load  a  file  that  isn't 
there.  You  won't  need  to  translate  the  number  if 
the  disk  reports  62,FILE  NOT  FOUND,00,00. 
Sometimes,  however,  the  disk  error  number  can 
give  useful  information;  look  it  up  in  the  manual. 

4.0  Equivalent:  Users  with  a  4.0  BASIC  system 
can  type  PRINT  DS$  and  receive  the  equivalent 
information. 

Non-wedge  Equivalent:  If  you  don't  have  a 
wedge,  you'd  need  to  write  a  program  to  open 
secondary  address  15  and  INPUT  from  that  chan- 
nel. (INPUT  works  only  from  within  a  program.) 
Get  a  wedge. 

Directory  Or  Catalog 

You  may  obtain  a  catalog  from  disk,  without  dis- 
turbing a  program  already  loaded,  by  typing  >$  or 
@$.  If  you  have  a  dual  disk  (two  drives  ganged 
together  in  a  single  housing),  you  may  specify  the 
drive  by  adding  a  number,  yielding  commands 
such  as  >S0  or  («$!.  Many  experienced  users 
suggest  that  you'll  do  well  to  specify  drive  0  for 
single  disks:  the  zero  in  (ft  $0  won't  hurt  and  might 
help. 

You  may  take  a  "specific"  catalog  by  using  a 
filename  with  pattern  matching.  For  example, 
>SO:D*  will  give  only  programs  whose  names  start 
with  the  letter  D.  (<>  $0:???  will  report  programs 
with  exactly  three  characters  in  their  names. 

4.0  Equivalent:  The  command  CATALOG  or 
DIRECTORY  will  produce  a  directory.  There's  no 
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simple  way  to  get  a  pattern  match  with  this. 

Non-wedge  Equivalent:  You'll  need  to  get  a 
directory  using  a  LOAD  "$0",8  command.  This 
destroys  the  program  you  have  in  place.  (Get  a 
wedge.) 

Other  Disk  Commands 

By  following  the  >  or  (ci)  sign  with  command  char- 
acters, you  may  send  a  number  of  special  com- 
mands to  the  disk.  We'll  list  them  below. 

4.0  Equivalent:  Specific  commands  are  often 
available,  such  as  SCRATCH,  COLLECT,  or 
HEADER.  We'll  deal  with  them  individually 
below. 

Non-wedge  Equivalent:  You  must  do  this  by 
opening  secondary  address  15,  and  then  sending 
the  command  as  part  of  a  PR1NT#  sequence.  For 
example,  >I0  could  be  matched  with  OPEN 
15,8,15:PRINT#15,"I0".  This  is  no  hardship  since 
it  can  be  done  with  direct  commands.  The  wedge 
is  slightly  more  convenient. 

initialize 

The  command  >I0  or  (cUl  causes  the  disk  elec- 
tronics to  "shake  hands"  with  the  appropriate 
disk  drive  for  a  smoothei-  transfer  of  data.  It 
shouldn't  be  needed,  but  can  be  most  useful  if 
you  start  encountering  DRIVE  NOT  READY  er- 
rors. On  single  disks,  (ci  10  is  recommended. 

4.0  Equivalent:  None.  You'd  have  to  use  the 
secondary  address  15  equivalent. 

Header  (Or  New) 

Watch  this  one:  It's  powerful,  and  will  wipe  the 
previous  contents  of  a  disk.  (crNO:DISKNAME,JB 
will  format  the  drive  over  all  its  tracks,  using  the 
ID  of  "JB",  and  will  prepare  an  empty  directory 
with  the  title  "DISKNAME".  This  job  will  take  a 
few  minutes. 

@N0:ANOTHER  will  not  format  the  disk. 
Instead,  it  will  just  wipe  the  directory  and  put  the 
new  title  in  place,  in  this  case  "ANOTHER".  It 
only  takes  a  couple  of  seconds  to  do  this,  but  all 
your  disk  information  will  immediately  disappear. 
The  disk  must  have  previously  been  formatted 
before  this  version  of  the  command  can  be  used. 

You  cannot  use  a  disk  until  it  has  been  for- 
matted. Be  very  careful  that  all  your  working  disks 
have  different  IDs  (the  two  letter  identifiers);  this 
will  give  your  disk-stored  programs  and  files  im- 
portant protection  against  harm. 

4.0  Equivalent:  HEADER.  The  4.0  system 
asks  ARE  YOU  SURE?  before  it  dives  in  and  wipes 
the  data  from  the  disk. 

Scratcti 

Removes  one  or  more  files  from  a  disk  and  frees 

the  directory  and  disk  space.  A  command  of  (aSO: 
TURNPIKE  removes  the  file  called  TURNPIKE, 
if  there  is  one  by  that  name  on  the  disk. 


Everyone  Needs  A 


Disk  Drive  Doctor 

Sale  1^19  95 

FACTS 

•  It  has  been  estimated  that  60%  of  all  drive  downtime  is  directly  related  to  poorly  maintained  drives. 

•  Drives  should  be  cleaned  each  week  regardless  of  use. 

•  Drives  are  sensitive  to  smoke,  dust  and  all  micro  particles. 

•  Systematic  operator  performed  maintenance  is  the  best  way  of  ensuring  error  free  use  of  your 
computer  system. 


The  Cheetah  disk  drive  cleaner  can  be  used  with  single  or  double  sided  5  Va "  disk  drives.  The  Cheetah  is  | 
an  easy  to  use  fast  method  of  maintaining  efficient  floppy  diskette  drive  operation. 
The  Cheetah  cleaner  comes  with  2  disks  and  is  packed  in  a  protective  plastic  folder  to  prevent 
contamination.  List  $29.95  /  Sale  $19.95 


Features 

Cheetah 

3M 

Discwasher 

Verbatim 

Cleanings  Per  Kit 

40  + 

25 

30 

2  original  -  10  refill 

Price 

$19.95 

$34.95 

$24.95 

$12.95 

Abrasivity 

None 

Minimum 

High 

Moderate 

Programming 
Required 

No 

No 

Yes 

No 

Add  S3.00for  postage.  Add  S6.00  for  CANADA,  PUERTO  RICO.  HAWAII  • 

orders  WE  DO  NOT  EXPORT  TO  OTHER  COUNTRIES.  | 

Enclose  Cashiers  Check,  Money  Order  or  Personal  Check.  Allow  14  | 

days  tor  delivery,  2  to  7  days  for  phone  orders,  1  day  express  mail!  | 

Canada  orders  must  be  in  U.S.  dollars  We  accept  Visa  and  Master-  ■ 

Card.  9 


CfU*rCOpDI7CC    {WE  LOVE  OUR  CUSTOMERS) 

BOX  S50,  BARRINGTON.  ILLINOIS  60010 
Phone  312/382-5244  to  order 


You  may  use  pattern  matching,  but  watch  it! 
A  command  of  >SO:C*  will  remove  all  files  which 
start  with  the  letter  C.  A  command  of  (a  SO:*  will 
remove  all  files,  giving  the  same  effect  as  New, 
but  slower. 

4.0  Equivalent:  SCRATCH. 

Verify  (Validate,  Collect) 

A  widely  misunderstood  command.  This  causes 
the  disk  unit  to  try  to  rebuild  its  map  of  free  blocks, 
removing  incomplete  files  as  it  does  so.  It  does 
not  report  errors;  it  just  reconstructs  the  Block 
Availability  Map  (BAM),  using  information  from 
the  directory. 

If  you  have  somehow  created  an  incomplete 
file,  it  will  appear  in  the  directory  with  an  asterisk 
beside  the  file  type  (e.g.,  *SEQ}.  You  should  im- 
mediately remove  it  with  (d  VO  in  order  to  avoid 
complications.  {Do  not,  repeat  do  not,  try  to  scratch 
such  a  file.)  You'll  probably  need  to  wait  awhile: 
rebuilding  the  BAM  often  takes  time. 

4.0  Equivalent:  COLLECT. 

Rename  (Nome) 

Lets  you  change  the  name  of  a  file.  To  change 
WATER  to  ICE,  you  type  (^*  RO: ICE  =  0: WATER. 
Think  of  the  syntax  as  similar  to  BASIC:  the  value 
to  the  left  of  the  equals  sign  indicates  what  has 
been  changed. 

4.0  Equivalent:  RENAME  ...  TO  ... 

Copy 

Lets  you  make  a  new  copy  of  a  program  on  disk. 
Most  useful  on  dual  disk  units,  but  you  can  make 
an  extra  copy  even  when  you  have  a  single  disk. 
A  command  such  as  C0:DOG  =  0:CAT  will  make 
an  extra  copy  of  file  CAT,  naming  the  new  copy 
DOG. 

A  lesser-known  feature  of  the  Copy  command 
is  that  it  allows  two  or  more  files  to  be  put  together 
(or  "concatenated")  into  a  single  file.  This  can  be 
done  with  a  command  such  as  (a  CO:FRACAS  =  0: 
DOG,0;CAT  which  puts  files  DOG  and  CAT  to- 
gether into  a  single  new  file  called  FRACAS.  This 
feature  is  most  useful  for  data  files,  by  the  way; 
you  can  stick  programs  together,  but  the  result 
won't  be  very  useful. 

4.0  Equivalent:  COPY  ...  TO  ...;  or  CONCAT 
...TO... 

Duplicate  (Backup) 

Only  for  dual  drives.  Allows  a  disk  to  be  copied, 
block  for  block,  from  one  drive  to  the  other. 
Dangerous!  Be  sure  you  specify  the  correct  direc- 
tion, or  you're  in  big  trouble.  So  (a  Dl  =0  will 
make  an  exact  copy  of  the  information  on  drive  0 
placing  it  onto  drive  L  If  you  intended  to  go  the 
other  way,  it's  too  late. 

4.0  Equivalent:  BACKUP  DO  to  Dl.  The  system 
does  not  ask  ARE  YOU  SURE?  It  just  goes  ahead. 
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Other  Commands 

There  are  other  commands  that  may  be  sent  down 
the  command  channel,  but  I  don't  recommend 
their  use  with  a  wedge.  In  fact,  I  recommend  care- 
ful study  of  the  manual  or  sample  programs  before 
using  them  in  any  form. 

There  are  several  DOS  wedges;  it's  impossible 
to  cover  details  on  each  of  them.  But  they  have 
similar  patterns. 

Learning  to  use  the  DOS  wedge  effectively  is 
almost  the  same  as  learning  to  use  the  disk  effec- 
tively. More  correctly,  it's  learning  how  to  use  the 
disk  -  easily  and  effectively.  © 


r4tvJ 


•  24K  MEMORY  EXPANSION  ,si2».s2.», 

Give  youf  PET/C6M  a  boost  to  32K  ! 
Loaded  with  nifty  features.  Low,  low  power. 

•"Real  World" SOFTWARE  (s,7  s«, 

Word  Processor,  Mailing  Lisl.  Catalog.  Ham  Raflio.  Frequency  Counler 

"OLD"  8K  PETs 


I    •  21 14-TO- 6550  RAM  ADAPTER  (s,j.s25, 

I  Replace  6550  RAAfls  wiih  low  cost  21 14s.  Hundreds  Sold! 

L|^      •4K  MEMORY  EXPANSION    (sis.s62i 

J^^^nl^         Low  cost  memory  tmpansron  using  21  Ids  for  bigger  programs 

W 


PfO(*S*ior[aF  Procucls  at  Pcrscnal  Puces 

OPTIMIZED  DATA  SYSTEMS 

Dept.  C,  P.O.  Box  595  •  Placentia,  CA  92670        

DISft-O-MATB  Iraaetnark  Oprjm.jarf  Dala  Syjtems  ■■  PET.  CBM  irjtdemark  Commoao'f; 


VIC-20  /  CBM  64 

*The  Accountant $29.95 

IC/L,  B/S.  PSL) 

•Accounts  Recefvable/Payable  $21.95 

•Tapeworm $12.95 

(Keep  track  of  vour  records  and  tapes) 

Sigma  Stat $19.95 

!A  sophisticated  Stat  prog,  for  VIC  +  8kl 

Snakman $15.95 

(Just  like  your  favorite  arcade  game  VIC  only) 
•Available  for  Vies  CBM  M 

EMBASSY  COMPUTER  PRODUCTS 

P.O.  Box  88.  Little  Neck,  N.Y.  11365 
Check  or  money  order.  No  COD's.  N.Y,  Residents  add  8.25% 
sales  tax.  Add.  Si.50  for  postage  and  handling, 
DEALER  INQUIRIES  INVITED  ~  PROGRAMMERS  WANTED 


VIC20  /COM  64/  ATARI  400/800 
SOFTWARE  RENTAL  CLUB 

•  RENT  SOFTWARE  for  up  to  a  month  for  10%  of 
th«  litt  pric«  (20%  for  castettet)  with  option 
to  purchase 

•  Membership  $25/year  with  $10  Renewal  fee 

•  VISA/MC  accepted 


M 


VIDEO  HOME  LIBRARY 

RT.  3  BOX  309A52 
CLINTON,  TN  37716 
(615)457-5068,  482-3893 


Qcommodore 

NEW  COMMODORE  PRODUCTS 

Tlie  ExecuJive  64 Call 

CBMC128-80 S  795 

CSM  BX700 2990 

B  Series  Software Call 

CBM  1520  Plotter 169 

CBM  1526  Printer 349 

SOFTWARE  FOR  CBM  MZ 
BUSINESS 

Word  Processing  (WordPro  3+) S  69 

Quick  Brown  Fox 56 

Writers  Assistant 99 

Spell  Master 75 

Gale  Result 125 

Busicalc  II 95 

Spread  Sheet  Assistant 99 

Data  Manager 70 

M  File  (merge  witti  WordPro) 89 

Info  Mast 139 

64  Moiling  List 28 

The  Manager 50 

Home  Accountant  (continental) 75 

Finance  Assistant 45 

Stock  (investment  analysis) 80 

Agricultural  Management Call 

General  Ledger,  A/R,  A/P,  P/R,  Inv  . , .  Call 

RECREATION 
Assembler  Package  (cassette  or  disk, 

compiled,  includes  editor,  loader, 

disossembler) 39 

Sprite  Master  (access) 30 

Neutral  Zone  (occess) 35 

Space  Belt 19 

Pet  Emulator 30 

Coco  II  (build  your  own  games) 40 

Vic  Tree  (programmers  utilities) 75 

Micro -Term  (save  to  printer.disk)  ....  39 

Hesmon 35 

Synthesound 45 

Gothmogs  Lair 30 

Road  Toad 15 

Commodore  Games Call 

INTERFACES  &  ACCESSORIES 

80  Column  Expander $159 

VIC  1600  Modem 95 

ViC  1 650  (outo  answer,  auto  dial), . .  1 50 

VIC  !525  Graphic  Printer 225 

VIC  1530  Dofosette  Recorder 65 

VIC  1541  Disk  Drive 249 

VIC  Switch  (connect  8  64's  or  Vies 

to  printer,  dd) 149 

PET-IEEE  coble 33 

IEEE-IEEE  coble  (2m) 49 


Porallel  Interface  (Epson,  Okidata, 

IDS,  NEC) 

Programmers  Reference  Guide  . . . 
Verbatim  Diskettes  (10  per  box). . 
Hes  Modem 


70 
18 
26 
75 

ADA  1450 149 

ADA  1800  (new) 129 

Numeric  Keypod 65 

VIC  PRODUCTS  a  ACCESSORIES 
8K  RAM  Memory  Expansion  Cartridge  . . .  S  40 

16KRAM 70 

24KRAM 105 

VIC  3  Slot  Expander 27 

VIC  6  Slot  Expander. 70 

Cassette  interface 30 

Gorf  (64  oiso) 30 

Omega  Race 30 

Arcade  Joystick  -  Heavy  duly  w/2  tiring 

buttons!  Greof  lor  the  VIC  or  64 25 

Auto  Clock 125 

MONITORS  -  GREAT 
RESOLUTION  (64  OR  VIC) 

CBM  1701  Color  Monitor S  249 

Amdek  Color  Plus 299 

Panasonic  TR-120  (w/speaker) 155 

Panasonic  CT-160 279 

BMC  (green  screen) 95 

Tronstar  20  (high  resolution 

green  phospfiof) 1 29 

Video/Audio  Cable 15 

PRINTERS  -  LETTER  QUALITY 

CBM  6400,  40cps SI  450 

Diablo  620,  25  cps 949 

Tronstar  140  (serial) 1395 

Transtar  130,  16  cps  (auto  load, 

wp  features!) 769 

NEC  3500  Series 1600 

NEC  7700  Series 2350 

PRINTERS  -  DOT  MATRIX 

CBM  8023,  1 50  cps/grophics S  545 

CBM  4023  Printer 395 

Epson  FX  Printer,  1 60  cps ■ 549 

Epson  MX -80  R  w/graftrax Call 

Epson  FX-lOO 859 

Okidata  82A,  1 20  cps  (serial 

and  parallel) 429 

NEC  8023A  (parallel) 429 

Okidata  92 559 

Star  Gemini,  10 329 

Star  Gemini,  15 499 

Tronstar  315  (til -res,  color) 575 

COMMODORE  BUSINESS 
SERIES 

SuperPei  (5  languages, 

2  processors) S1059 

CBM  8032  Computer,  80  Column  . . .     595 


CBM  Memory  Expansion,  64K 259 

CBM  8050,  1  mg.  Duo!  Drive 995 

CBM  8250,  2  mg.  Dual  Drive 1 295 

CBM  D9060,  5  mg.  Hard  Disk 1 995 

CBM  D9090,  7.5  mg.  Hard  Disk  ....    2250 
CBM  2031 ,  1 70K  Single  Drive  (New)      395 

DC  Hayes  Smart  Modem 220 

BUSINESS  SOFTWARE-8032 

WordPro  4'  or  5* S  309 

InfoPro 219 

Administrotor 489 

VisiCalc  (expanded) 199 

BPI  A/R,  G/L,  Job  Ccst,  Inventory, 

Payroll ea.325 

MasterCard,  Visa, 

Money  Order,  Bank  Check 
COD  (add  S5)  accepted. 
Add  3%  surcharge  for  credit  cords. 
In  stock  items  shipped  wittiin  48  hours. 
F.O.B,  Dallas,  Texas 

All  products  shipped  with  monufacturer's  won'onty. 
Prices  are  subject  to  change  without  notice. 

TO  ORDER 

CALL  TOLL  FREE 

aOO-527-4893 

800-442-1048 

(Within  Texas) 

Business  Hours 

Mon.-  Fri.  8  to  6,  Sat.  10-2 

Write  for  tree  cotolog. 


GAME  OF  THE  MONTH 

Adventu -Writer  (make  your 
own  adventure  gomes)  Join  the 
Adventu -Writer  Club S    49 

PRODUCT  OF  THE  MONTH 

INTERPOO  (intelligent  IEEE 
RS232,  serial  interfoce 
lorVICorC64) S  179 


SJB  DISTRIBUTORS  INC. 

1 0520  Plono  Rood,  Suite  206 

Dallas,  Texos  75238 

(214)  343-1328 


Protector  For  VIC-20 


George  Trepal  and  Doug  Sinoak 


Disabling  certain  commands  on  the  VIC  can  be  a  very 
useful  way  to  protect  your  programs.  This  article  dem- 
onstrates how  to  disable  the  SAVE,  RESTORE,  STOP, 
and  LIST  commands  with  a  few  simple  POKEs.  There 
are  some  techniques  here  for  the  64,  too. 


Sometimes  it's  nice  to  have  a  VIC  that  isn't  fully 
functional.  Maybe  you're  a  teacher  and  you  don't 
want  your  program  listed  by  students.  Or  perhaps 
you've  written  a  game  you  don't  want  someone 
to  save.  Let's  look  at  a  few  ways  to  block  your 
VIC'S  SAVE,  RESTORE,  STOP,  and  LIST. 

Obviously,  it's  nice  to  have  a  program  that 
can't  be  SAVEd  (that  is,  copied).  When  you  SAVE 
a  program,  the  VIC  goes  to  a  table  (a  list  of  memory 
addresses  in  RAM)  to  get  the  address  of  the  SAVE 
routine.  Once  it  has  the  address,  it  jumps  to  the 
routine  and  puts  the  program  on  tape.  Guess 
what  happens  if  it  gets  the  wrong  address. 

If  you  POKE  the  two  values  under  the  pro- 
tection method  for  SAVE,  the  address  now  points 
to  the  LOAD  routine.  When  you  tell  the  VIC  to 
SAVE,  it  tries  to  LOAD  instead.  It  would  have 
been  just  as  easy  to  give  the  address  of  the  NEW 
or  LIST  routine  or  anything  else.  In  fact,  as  long 
as  the  value  of  818  is  not  113,  or  the  value  of  819  is 
not  246,  the  machine  will  not  SAVE.  You  can  try 
any  numbers  you  want  and  see  what  happens. 
To  reactivate  the  SAVE  routine,  POKE  in  the  nor- 
mal values  in  the  table.  Or  you  can  press  the  RUN/ 
STOP  and  RESTORE  keys  at  the  same  time,  and 
that  will  reassign  the  correct  addresses. 

Now  let's  get  the  RESTORE  key  out  of  action 
so  that  it  can't  correct  the  wrong  address.  Check 
the  table  and  use  the  two  POKEs.  Notice  that  the 
table  doesn't  give  the  normal  values  for  the  RE- 
STORE key.  The  normal  values  are  obtained  by 
PEEKing  the  table  values  used  before  POKEing  in 
your  values.  With  the  RESTORE,  POKEing  in  the 
normal  values  after  the  new  values  are  in  will  not 
reactivate  the  RESTORE  key. 

The  STOP  key  is  easy  to  do  away  with.  If 
you're  using  the  VIC  for  a  demonstration,  it's 
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nice  to  have  it  unstoppable. 

LISTing  is  a  bit  more  complicated  to  disable. 
One  way  to  do  it  is  to  embed  a  control  character 
that  will  cause  the  listed  characters  to  be  the  same 
color  as  the  screen.  For  example,  white  letters  on 
a  white  screen  result  in  a  blank  screen.  The  table 
gives  the  method.  Put  a  REM  line  in  the  program 
and  follow  the  instructions.  Everything  after  the 
REM  "  will  be  invisible. 

The  super  POKE  is  POKE  808,100.  STOP, 
RESTORE,  and  LIST  are  now  all  dead.  LIST  isn't 
fully  dead,  but  it  might  as  well  be  since  it  prints 
only  nonsense. 

Before  you  use  any  of  these  commands,  make 
sure  that  your  program  is  running  the  way  you 
want  it  to.  Now  add  the  lines  that  you  want  from 
the  table.  Usually,  adding  them  as  the  first  line  of 
the  program  is  best.  Do  Jiot  RUN  the  program  yet, 
however.  Double-check  to  make  sure  all  the  num- 
bers are  right,  and  SAVE  the  program.  The  table 
POKEs  won't  take  effect  until  the  program  is  RUN. 
The  program  is  now  safe  on  tape.  When  it  is 
LOADed  and  RUN,  the  POKEs  will  take  effect. 


VIC  Memory  Addresses  In  RAM 

(Some  64  addresses  also  given) 

Function 

Protection  Method 

Normal  Values 

STOP, 

(VIC)  POKE 808,100 

(VIC)  POKE  808,112 

RESTORE, 

(64)  POKE  808,225 

(64)  POKE  808,237 

and  LIST 

STOP 

(VIC)  POKE  808,127 

(VIC)  POKE  808,112 

(64)  POKE  788,52 

(64)  POKE  788,49 

RESTORE 

POKE  792,90 
POKE  793,203 

M.^M.JK^  m  ^L^  M.^^* 

SAVE 

POKE  818,73 

POKE  818,113 

POKE  819,245 

POKE  819,246 

LIST 

(VIC  or  64) 

1. 

REM  "  " 

2. 

press  CONTROL  and  9 

3. 

move  cursor  to  second  quote  mark 

4. 

press  SHIFT  iind  INST  DEL 

5. 

press  SHIFT  iind  M 

6. 

press  SHIFT  and  INST  DEL                           | 

7. 

press  CONTROL  and 

screen  color 

8. 

press  RETURN 

c 

USR  Sort 


Walter  D.  Thompson,  Jr. 


One  way  to  create  your  own  operands  (commands)  is  to 
write  subroutines  that  can  be  called  from  a  BASIC 
program.  You  can,  for  example,  use  the  Atari's  USR 
function  to  create  a  routine  with  the  speed  of  machine 
lajiguage.  The  tijue-saving  routine  can  be  especially 
important  in  sorting  programs. 


How  many  times  have  you  created  a  simple  file  to 
which  you  have  made  several  additions?  Later, 
you  discover  that  you  want  to  list  the  records  in 
the  file  in  some  order  other  than  the  sequentially 
entered  order.  Or  perhaps  you  would  even  like  to 
rewrite  the  file  in  a  new  order. 

A  sort  utility  in  DOS  could  very  well  handle 
all  possible  demands.  However,  a  simple  array 
sort  can  handle  many  smaller  applications  by 
reading  the  fields  or  records  into  an  array  in  mem- 
ory and  sorting  the  array.  The  only  limitation  is 
available  memory. 

The  Sort  Routine 

A  sorting  routine  is  a  method  by  which  related 
elements  are  compared  and  ranked.  In  the  Atari, 
this  ranking  is  accomplished  by  comparing  the 
ATASCII  values.  Thus,  if  we  had  an  array  with  26 
elements,  each  one  byte  long,  we  could  load  the 
array  with  each  letter  of  the  alphabet,  and  after 
sorting  the  array,  we  would  have  the  letters  in 
order  from  A  to  Z. 

The  sort  routine  that  we  want  would  need  to 
compare  a  string  of  letters  to  another  string, 
perhaps  of  unequal  length.  The  sort  order  is  left 
justified  so  that  an  element  beginning  with  a  D 
would  come  before  an  element  starting  with  an 
N,  However,  we  also  want  DUSTY  to  come  after 
DUST  and  before  DUTY. 

Our  sort  routine  must  compare  each  element 
byte  to  the  corresponding  byte  of  the  elements 
before  and  after. 


Some  languages  have  built-in  operands  which 
accomplish  this  in  some  manner.  For  example, 
IBM  BASIC  operands  AIDX  and  DIDX  return  a 
second  array  which  has  sorted  pointers  to  the 
first  array. 

Atari  Restrictions  And  Solutions 

When  Atari  BASIC  was  written,  several  operands 
were  omitted  simply  because  there  was  not  suffi- 
cient internal  memory  for  all  of  the  special 
operands  available.  However,  BASIC  does  allow 
the  user  to  build  assembler  subroutines,  which 
can  be  called  from  the  BASIC  program.  The  utility 
of  the  Atari  is  greatly  enhanced  by  the  user's  ability 
to  write  many  special  applications.  These  applica- 
tions can  then  use  the  far  greater  speed  of  machine 
language. 

Speed  is  particularly  important  in  sort  func- 
tions. Anyone  who  has  written  a  BASIC  program 
to  do  a  bubble  sort  on  a  string  array,  and  has  then 
waited  for  many  minutes  for  strings  of  moderate 
length  to  process,  can  attest  to  the  importance  of 
speed  in  a  sort.  A  string  of  file-size  proportions 
could  very  well  take  hours.  This  is  because  a  sort, 
of  any  type,  requires  many  repetitive  compares  to 
accomplish  its  final  result.  These  are  time- 
consuming  operations  in  BASIC,  but  they  are 
extremely  fast  with  machine  language. 

Locating  The  Sort 

So  it  seems  that  we  must  simply  load  a  machine  ' 
language  sort  module  and  call  it  from  a  BASIC 
program.  But  first  we  must  consider  where  to 
locate  the  machine  language  module.  It  could  be 
in  the  same  place  for  any  program  which  would 
load  and  access  it,  yet  it  must  not  interfere  with 
the  operating  system  or  with  our  BASIC  program 
which  has  called  it.  We  would  not  accomplish 
very  much  if  the  sort  module  were  located  in  the 
very  middle  of  the  array  to  be  sorted. 
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The  first  sort  utility  I  wrote  worked  extremely 
well  and  fit  entirely  into  page  six.  So  what  more 
could  I  want  from  a  sort  that  handled  a  large 
(32,000)  element  array  and  executed  in  mere 
seconds? 

The  answer  is  safety.  Upon  closer  examina- 
tion, I  realized  that  a  simple  error  in  programming 
could  result  in  the  programmer  sorting  all  of  his 
or  her  program  and  memory  above  the  array. 
This  could  include  the  display  list,  screen  memory, 
and  even  BASIC  itself.  The  routine  needed  a 
method  of  validating  the  total  length  of  the  sort 
array.  We  could  have  in  memory  an  array  of  100 
elements  of  127  bytes  each,  but  through  error, 
pass  a  value  of  1000  elements  to  the  sort  routine. 
And  the  sort  routine  would,  of  course,  attempt  to 
sort  124K  of  memory,  being  forced  to  stop  only 
when  it  attempted  to  sort  ROM. 

After  developing  and  adding  an  error-check 
to  make  the  program  safe,  I  discovered  that  my 
original  memory  location  was  no  longer  able  to 
hold  the  improved  version.  After  some  more 
juggling,  1  decided  the  solution  was  to  make  the 
object  code  relocatable.  This  means  that  the  pro- 
gram permitted  no  jumps  to  a  specified  address; 
it  allowed  only  relative  branches. 

Although  the  sort  routine  is  relocatable,  it 
does  make  use  of  a  number  of  page  zero  and  page 
six  memory  locations  when  executed.  During  the 
course  of  a  sort,  the  program  will  alter  the  contents 
of  locations  $CB-$D1  and  $6F8-$6FF. 

Building  TKie  Array 

We  want  to  sort  a  group  of  unequal  fields  in  a 
string  array  of  as  yet  unspecified  size.  We  must 
work  with  elements  of  a  specified  length,  padding 
with  blanks  to  the  right  for  alphanumeric  fields 
and  zeros  to  the  left  for  numeric  fields.  For  exam- 
ple, a  name  field  to  be  sorted  may  have  a  maximum 
length  of  25  characters.  There  are  100  names  or 
elements  to  be  sorted.  And  so: 

LETMLENGTH  =  25 

LET  ELEMENTS  =  100 

LET  X  -  MLENGTH'ELEMENTS 

DIM  SARRAY$(X) 

In  order  to  load  the  array  so  that  the  sort 
routine  has  equivalent  elements  to  compare,  we 
assign  each  field  the  maximum  length  using  the 
following  technique: 

DIM  FIELD$(MLENGTH) 
FOR  1  =  1  TO  MLENGTH:LET  FIELD$(I)  =  "  ": 

NEXT  I 
LETL=LEN(NAME$) 
LET  FIELD$(1,L)  =  NAMES 
LET  P  =  ELEMENT'MLENGTH 
LET  SARRAY$(P,P  +  MLENGTH-1)  =  FIELDS 

If  numeric  fields  are  to  be  loaded  into  a  string 
array  for  sorting,  the  following  technique  will 
build  equal  length  elements  with  leading  zeros: 
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DIMFIELD$(MLENGTH»,TEST$(MLENGTH) 
FOR  I  =  1  TO  MLENGTH:LET  FlELDSd)  =  "0": 

NEXT  I 
LET  TESTS  =  STRS(2IPCODE) 
LETL  =  LEN{TEST$) 

LET  nELDS(MLENCTH  + 1  -L,MLENGTH)  = 
TESTS 

We  have  now  built  an  array  for  sorting,  re- 
taining the  number  of  elements  and  the  length  of 
each  element. 

The  USR  Call 

upon  calling  the  sort  routine,  we  specify  the 
number  of  elements  to  be  sorted,  the  length  of 
each  element,  the  sort  order,  and  the  relative  var- 
iable number  of  our  array. 

We  call  the  sort  routine  by  executing  the  fol- 
lowing USR  call: 

LET  EFLAG  =  USR(STARTADDR,ELEMENTS, 
MLENGTH,ORDER,RELVARNUM) 

As  long  as  the  program  does  not  change 
graphics  modes,  at  least  prior  to  all  sorting,  a  very 
handy  place  to  locate  the  sort  routine  object  code 
is  just  below  RAMTOP.  The  STARTADDR  = 
PEEK(741)^-256*PEEK(742)  -339.  Or  in  BASIC 
A  +  ,  STARTADDR  =  DPEEK(741)  -339.  ELE- 
MENTS should  be  the  actual  number  of  elements 
loaded  into  the  array.  The  additional  routine 
which  validates  the  length  of  the  array  is  based 
on  the  LEN  value  of  the  variable,  not  its  DIMed 
length.  This  helps  to  prevent  garbage  from  being 
mixed  in  accidentally  with  good  data.  In  our  case, 
MLENGTH  is  25,  although  the  range  of  values  for 
length  is  from  1  to  255  bytes.  ORDER  determines 
whether  we  will  sort  the  array  elements  in  as- 
cending or  descending  order;  1  represents  as- 
cending order,  and  255  indicates  descending 
order.  RELVARNUM,  or  the  relative  variable 
number,  is  the  relative  appearance  of  our  string 
array  in  the  BASIC  progj-am.  Looking  back  to  our 
first  example,  we  see  that  MLENGTH  was  the 
first  variable  in  our  example,  ELEMENTS  was 
second,  X  third,  and  SARRAY$  fourth.  The  first 
variable  has  a  relative  number  of  zero,  so  REL- 
VARNUM =  4  -1  or  RELVARNUM  =  3. 

When  a  USR  routine  is  called,  a  value  may  be 
returned  to  the  BASIC  program.  This  value  is 
used  to  return  error  conditions.  Those  error  con- 
ditions are  represented  by  values  of  EFLAG,  which 
are  described  as  follows: 

A  Value  of       Indicates 

0  An  error-free  sort 

1  ELEMENTS*MLENGTH  >  ARRAY  LENGTH 

2  SortORDER<>lor2SS 

3  MLENGTH  =  0  or  >255 

4  ELEMENTS  =  0 

5  Variable  not  a  DIMed  string  array 
or   relative  variable  number  exceeds  31 

6  Invalid  number  of  parameters  passed 


The  Sort  UtilitV  ^^^     L  =  LEN(ELEMENT*):1F     L  =  0     then     450 

„                        .,•                 ,      ,                          .                      J      .  430     S  =  LENBTH*1  +  1  :  E  =  LENGTH*  CI  +  1  >  :  WORK 

Oursorl  Utility  works  by  comparisons  made  in  a  *  (  i,l)  =element*:  array*  cs,  e)=work 

loop,  from  the  most  significant  byte  to  the  least  *:next    i 

significant  byte.  Comparisons  are  made  until  two  ^40    i=elements:  rem    *»*      establish    i 

compared  bytes  are  found  out  of  order  or  until  ^       ^^    '^'l'-    ^Jr^'^f'i^T^    ^^M^^S-.,.    r,,-,^,-,-    ., 

S       •  r  ,,       ,  -T^,      ,    r        -  4S0  EFLA6  =  USR  (START,  I  ,  LENGTH,  order,  V 

the  element  IS  rully  tested.  The  order  of  compan-  num) 

son  reduces  the  number  of  passes  through  the  460    on   eflag    boto    470,  4B0,  490,  500,  si 

loop  to  a  minimum.  0,520:  goto   530 

To  further  increase  efficiency,  only  one  pass  ^^^    ^^^^^    "  **^'''^°^^f,i'2^l^^V  "    ~   '^^^ 

^             ^              ^  ^YLENOTH     EXCEEDED     "STOP 

is  made  through  the  array.  When  one  element  is  ^g^   print    "**error   5/ ■■ ;  eflag;  •■    -    inv 

exchanged  with  a  lower  one,  it  is  tested  against  alid   sort    order":  stop 

thenext  lower  element,  until  it  is  no  longer  ex-  490    print    "**errqr    s/ " ;  eflaB; '■    -   ele 

changed  or  untilit  is  placed  at  the  bottom  of  the  ment   length    invalid- =  stop 

".r.          ,      ■        .u    ,.„i^     ^    I-    n,^    „    i.-. „  500     PRINT     "itERROR     S/";EFLAG;"     -     ELE 

array.  Atter  placing  that  element,  the  routine  re-  ment    count    =    0"-stop 

turns  to  the  element's  original  position  and  moves  510    print    "**error    s/";EFLAG;"    -    inv 

to  the  next  element.  In  this  way,  each  element  is  alid   variable    type":  stop 
ranked  among  all  previously  sorted  elements. 
Of  course  this  is  not  a  DOS  utility  sort,  and  it 


520  print  "**ERR0R  S/";EFLA6;"  -  INV 
ALID  «  PARAMETERS" : STOP 

IS  hmited  by  available  memory.  However,  the  54^   s=len6TH*  J  +  i -.e=len6TH«  ( J  +  i )  :prin 

USR  function  allows  us  to  use  machine  language  t   arrays  cs,  e)  :  next   j 

speeds  in  our  routine.  And  with  a  little  pro-  550    stop 

^  .        .r       .    700  ptE„  ,,   LOCATE  OBJECT  BELOW  OS  M 

EMTOP 
ST ART= PEEK  < 74  1 ) +256 » PEEK (742) -33 


gramming  and  thought,  most  files  can  be  sorted 

on  any  field  by  placing  the  sort  field  first  in  the  7^0 

element  string,  followed  by  the  entire  record.  <? 

For  convenience,  the  machine  language  sort  720   trap   725:  for    1=0   to   33B:READ   a:p 

routine  is  provided  as  a  BASiCloader  program.  ^^^   oke^^start  +  i  )  ,  a:  next    i 

For  anyone  who  would  prefer  a  copy  on  diskette  ^^g    print    "error    During    object    load" 
or  tape,  please  send  a  self-addressed,  stamped  :  stop 

mailer,  a  blank  tape  or  diskette,  and  $3  to:  750    data    167,    0,     133,    212,     133,    213, 

Walter  D.  Thompson,  jr.  ^^^    Di?A'2i0!    109,     201,     4,    240,    7,     1 

P.O.  Box 6602  04,     104 

Greensboro,  NC 17405  770    data    136,    20B,    251,    240,    98,     104 

All  diskettes  will  be  written  in  DOS  2.0  format.  In  ^„„    ^^.i^J    ^?^^      ^„-r      ,r.„      .  ., ,       r.^« 

,  ,.^.  ,,  .  .  ^,       o  Ac-ir-  1-   t    J  780    data    6,      133,     207,      104,     141,     250, 

addihon,  all  copies  ot  the  BASIL  program  listed  ^      j^33 

here  will  be  accompanied  by  an  Assembler  version  790    data    206,     104,    240,    4,     169,     1,     1 

and  the  original  version  of  the  object  code  which  33,    213 

fits  in  page  six 


B00  DATA  104,   133,   205,   133,  203,   10 

4,  240,  4 
810  DATA  169,   2,   133,   213,   104,   133, 


204,   104 


USR  Sort 

290  print  " tCLEARy " : PRI NT  "ARRAY  SOR  820  DATA  240,   4,   169,   4,   133,   213,   1 

T  PROGRAM" -  print  04,   10 

300  TRAP  300: print  "INPUT  #  OF  ELEME  830  DATA  176,   55,   10,   176,   52,   10,   1 

NTS  TO  SORT";: INPUT  ELEMENTS  76,   49 

310  TRAP  3i0:PRINT  "INPUT  MAXIMUM  EL  840  DATA  168,   165,   213,   240,   B,  201, 

EMENT  LENGTH" ;:  I  NPUT  LENGTH  2,   4B 

320  TRAP  320:PR1NT  "INPUT  SORT  ORDER  850  DATA  44,   240,   44,   16,   36,   177,   1 

-  ENTER  1  OR  255";: INPUT  ORDER         34,  201 

330  PRINT  :PRINT  "INITIALIZING..."  860  DATA  129,   208,   30,   165,   140,   200 
340  DIM  ARRAY*  (LEN6TH*ELEMENTS)  , ELEM         ,   200,   24 

ENT*  (LENGTH)  ,  BLANK*  (LENGTH)  ,  WORK  970  DATA  11^.,   134,   141,  252,  6,   141, 

$ (LENGTH) : GOSUB  700  254,   6 

350  PRINT   ■  tCLEAR:  "  iREM  ****    CLEAR  B80  DATA  165,   141,   105,  0,   200,   113, 

SCREEN  134,   141 

360  PRINT  "ARRAY  SORT  ENTRY":PRINT  890  DATA  253,   6,   141,   255,   6,   208,   1 
370  VNUM=3:REM  ***»   ARRAY*  IS  THE  4         7,   230 

TH  VARIABLE  TO  APPEAR  IN  PROGRAM  900  DATA  212,  230,  212,   230,  212,  23 
380  FOR  X=l  TO  LENGTH:  BLANK*  (  X ) ="   ":         &,      212,   230 

NEXT  X  910  DATA  212,  230,  212,   169,   0,   133, 
390  FOR  1=0  TO  ELEMENTS-1  213,   96 

400  WaRK*=BLANK*  920  DATA  200,   200,   169,   0,  24,   141, 
410  TRAP  410:PRINT   "INPUT  UP  TO  " ; LE         249,   6 

NGTH; "  CHARACTERS" : INPUT  ELEMENT  930  DATA  141,   248,   6,   162,  8,   102,  2 


$  03,   144 
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<?40  DATfi  26,  24,   173,  248,  6,   J.  0 1  ,  2 

06,  141 

950  DATA  248,   6,   173,  249,  6,   101,   2 

07,  14t 

960  DATA  249,  6,   176,   213,   165,   205, 

56,  229 
970  DATA  203,   144,   206,  6,   206,  38, 

207,  202 
9B0  DATA  208,   219,   177.   134,  205.   24 

9,  6,  43 
990  DATA  192,  208,  8,   136,   177,   134, 

205,  248 

1000  DATA  6,  48,   182,   165.  205,   240, 

174,   165 
1010  DATA  204,   201,   1,  240,  4,  201, 

255,  208 
1020  DATA  166,   173,   250,   6.   13.  251, 

6,   240 
1030  DATA  154,   173,  254,  6,   133,  208 

,  24,   10  1 
1040  DATA  205,   141,  254,  6,   173,  255 

,  6,   133 
1050  DATA  209,   105,  0,      141,   255,  6. 

206,  250 

1060  DATA  6,   208,  6,   206,   251,   6,   16 

,   1 
1070  DATA  96,   160,   0,   24,   165.  208, 

101 ,  205 
1080  DATA  133,  206,   165,  209,   105,  0 

,   133,   207 
1090  DATA  177,  206,  209,  208,  240,  8 

,  B,   104 
1100  DATA  69,  204,  48,  9,   16,   195,  2 

00,   196 
1110  DATA  205,  240,   190,  208,  235,  1 

60,  0,   177 
1120  DATA  206,   170,   177,   208,   145,   2 

06,   138,   145 
1130  DATA  208,   200,   196,   205,   208,   2 

41 ,   165,  208 
1140  DATA  56,  229,   205,   176,   2,   193, 

209,   133 
1150  DATA  20B,   165,   209,   205,   253,   6 

,  43,   153 
1160  DATA  208,   183,   165,   208,   205,   2 

52,  6,   16 
1170  DATA  176,   48,   142  © 


NEW 


Also  Ava^^able  .  .  . 


n 


Pro- 
Geny 

GENEALOGY      "^ 


•pro-frle* 

FANTASTIC  NEW  SOFTWARE 

your  COMMODORE64E  $49.95 


].     AN  EASY  TO  USE  DATA  BASE 
II.     FILE  MAINTENANCE  |  teoamrng,  copyins.  etc.) 

III.  UP  TO  500  RECORDS  per  FILE 

IV.  PRINTS  ADDRESS  LABELS 

V.    Master  Card   ■   Visa  ■    C.O.D.  Ofd»i  Accepted 
VI.    S«nd  Orders  and  Inquiries  to: 

A-1  SERVICES 
7ia3W.  Clearwatet  H-228  •  Kennewick.  WA   99336 
D..I.,  I  nquiri.,  Welcom.  '5"'  7834980 
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Commodore  64 
and 
VIC-20 


DRAW 

with  your  Joystick  I 


Novi/,  you  can  create  high-resofutton  pictures 

on-screen  with  your  joystick  as  a  "pen."  Design  critters, 
objects,  pje-charts  —  whatever  your  imagination  wishes! 
SAVE  your  creatfons  to  tape  or  disk,  and  PRINT 
them  on  a  VIC  printer.  Educational  and  fun! 

Draw  narrow  or  wide  lines,  curvy  or  straight;  set  points; 
add  captions;  create  background  patterns;  change 
picture,  background,  and  border  colors;  reverse  colors  for 
a  negative;  even  connect  dots  with  straight  l/nes 
automaticallyl  You  control  every  dot  on  the  screen. 
A  large  "Picture  Library"  is  included  to  get  you  started, 
plus  a  20-page  instruction  manual.  Joystick  required.  VIC 
printer  and  disk  drive  optional.  Now  on  disk  or  cassette  I 

For  the  Commodore  64: 

'64  Panorama S 2 9.95 

For  the  VIC-20. 

VfC-PrCS    S29.95 

(Full  fealures  need  BK  mem  exp,  reduced 
veriion  included  tor  unexpanded  VICJ 

■■FLV"  rrom  Picture  hb:ary~    Available  for  other  printers  — Call! 

PRINT  (the  unprintable!  ■  ■  • 

with  Smart^iSCnPlus-S59.95 

Now.  print  the  unprintable  Cominodore  graphics  on 
your  dot-addr«sabIe  parallel  printer*  with  Smart 
ASCII  Plus.  This  poNverful,  low-cost  software 

interface  converts  your  user  port  into  a  fast,  intelligent 
port  for  "Centronics"  protocoi  printers,  and  we  even 
supply  the  cable! 

Six  flexible  print  modes:  GRAPHICS,  TRANSITME, 
DaisyTRANSWTE,  CBM  ASCII.  True  ASCII,  PIPELINE. 
GRAPHICS  mode  creates  actual  VIC/64  keyboard 
graphics.  TRANSLATE  converts  normally  unprintable 
control-codes  into  text;  |CLR|.  (RVS),  (BLU).  etc..  with  an 
extended  mode  for  Daisywheel  printers.  Convenient 
set-up  menu  and  simplified  operation.  Compatible  with 
most  application  programs:  WordPro  3-F.  EasyScript, 
Qu/ck  Brown  Fox  [for  the  VIC),  Writer's  Assistant,  etc. 
Complete  with  connecting  cable  for  printer  and 
instruction  manual.  On  cassette.  Copy  to  your  disk  for 
quick  loading.  (Upgrades  available  for  original  Smart 
ASCII  owners. J 

•Requires  dol-addressable  printer  such  as  Epson  FX-80  or  MX-80/100 
witri  Grattrax;  Okidata  Wicrolmc  84.  C-  lloh  Prownter  1  S  2.  Star 
MicronlcsGemini-IOor  15.   Other  printers  — Call  I 

Send  (or  a  fne  braeftm 

HAH.  OROEft  Md  *i  jo  Mppklg  «ral 
^inUferr   '^•xons  9atD  tor  com  VKAMMMmnl 

rill/ncal    MxafMai(ima»mwtt  tinn mo mtnoii 

imU  IU2SH  MM*  tax.  Fomian  ontat  p^iMt 
lJAI.HAewfcOfft.Y;tdJ|8*f*ind»    ' 


(816)  333-7200 


HICRO 


inc. 
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Working  With  SID 


Jerry  M.  Joco 


In  this  unique  approach  to  the  Commodore  64's  SID 
chip,  the  author  discusses  the  SID  chip's  anatomy  ami 
capabilities  in  the  context  of  its  essential  similarity  to 
the  design  of  music  synthesizers. 


if  you've  decided  you  want  to  make  music  on 
your  Commodore  64,  and  you've  read  all  the  lit- 
erature on  the  subject  and  still  don't  know  where 
to  begin,  perhaps  a  look  at  how  an  analog  synthe- 
sizer is  used  in  an  electronic  music  studio  will 
clarify  many  aspects  of  the  64's  amazing  sound 
capabilities.  Once  we  have  covered  the  physical 
aspects  of  a  synthesizer,  we  can  begin  to  under- 
stand some  of  the  techniques  used  to  create 
sounds  artificially. 

Electronic  music  studios  usually  include  at 
least  one  analog  synthesizer.  Most  synthesizers 
have  a  modular  design  which  allows  the  synthe- 
sizer to  be  built  and  expanded  according  to  the 
dictates  of  budget,  space,  and  ability.  Each  module 
on  the  synthesizer  has  a  different  function,  and 
the  builder-user  is  free  to  duplicate  or  omit  these 
functions  in  any  way  he  sees  fit. 

Each  module  on  the  synthesizer  is  indepen- 
dent of  all  the  others.  The  only  way  to  connect 
them  is  either  by  a  panel  of  fancy  selector  switches 
or  via  the  more  common  patdi  cords.  Patch  cords 
are  simply  pieces  of  electrical  cable  of  varying 
lengths  which  have  standard  plugs  attached  on 
each  end.  Plugging  one  end  of  a  patch  cord  into 
the  output  socket  of  one  module  and  the  other 
end  of  the  patch  cord  into  the  input  socket  of 
another  module  creates  an  electrical  pathway 
called  a  patch. 

If  a  patch  leads  from  a  Source  module,  such 
as  an  oscillator,  to  an  Output  module,  such  as  a 
mixer,  the  resulting  sound  will  be  audible  to  the 
outside  worki.  (See  Figure  1.)  The  term  signal  is 
used  to  describe  the  electrical  current  being  passed 
from  one  module  to  another.  A  source  signal  is  one 
that  will  eventually  be  heard  as  a  real  sound.  A 
control  signal  is  a  varying  voltage  used  to  electron- 
ically control  another  module.  It  does  not  contain 
sound  information  per  se. 


A  "Patch"  For  The  SID  Chip 

In  Figure  1,  there  is  only  one  source  signal  being 
processed  by  the  mixer.  A  mixer  can  handle  up  to 
three  source  signals  on  our  hypothetical  system, 
which  it  combines  into  one  composite  signal  that 
gets  sent  on  to  the  speakers,  and  to  your  ears. 
(See  Figure  2.)  On  the  64,  Program  1  accomplishes 
exactly  what  the  analog- synthesizer  does  in 
Figure  2. 
Program  1:  Three  voices  -  Or  A  Chord 

10  FOR1=0TO24:POKE54272+I,0:NEXT 

20  POKE54272,37:POKE54273, 17;REM  OSCl 

30  POKE54279,229:POKE54280,22:REM  0SC2 

40  PDKE54286,214:POKE54287,28:REM  0SC3 

50  POKE54276, 17 jPOKE54283,17 :POKE54290, 17 
:  REM  TRIANGLE  WAVE  FOR  ALL  OSC ' S 

60  POKE54278,245:POKE54285,245:POKE54292, 
245: REM  SUS/REL  VALUES  FOR  ALL  OSC'S 

70  POKE54296,15:REM  MASTER  VOLUME  ON 

7  5  FORT=1TO500: NEXT: REM  CHORD  DURATION 

80  POKE54276 , 16 :POKE542e3 , 16 :POKE54290, 16 

90  FORT=1TO250:NEXT:REM  RELEASE  DURATION 

95  POKE54296,0:REM  TURN  OFF  VOLUME: rem  29 

96  END 

This  is  a  very  basic  "patch"  for  the  Sound 
Interface  Device  (SID)  chip  on  the  64.  Lines  20, 
30,  and  40  set  the  frequencies  of  the  three  oscil- 
lators. Line  20  POKEs  the  values  for  middle  C 
into  Voice  1.  Line  30  POKEs  the  values  for  F  into 
Voice  2,  and  line  40  POKEs  the  values  for  A  into 
Voice  3.  This  gives  us  a  "chord,"  which  is  simply 
three  notes  (voices)  sounding  simultaneously. 
Line  50  selects  a  triangle  wave  output  for  all  three 
voices.  Line  70  is  the  mixer  volume  control.  When 
the  value  15  is  POKEd  into  this  location,  the  master 
volume  control  is  turned  all  the  way  up.  When  0 
is  POKEd,  the  volume  control  is  turned  off,  as  in 
line  55.  The  other  lines  will  become  clearer  as  we 
go  along. 
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Figure  i:  Processing  a  single  Source  Signal 
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Figure  2:  Processing  Three  Source  Signals 
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®  SANYO  MONITOR  SALE!! 


9"  Data  Monitor 
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Up  front  brightness  control 
High  resolution  graphics 
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Equally  important,  all  are  built  with  Sanyo's  commitment 
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synonymous  with  reliability  and  performance.  And  Sanyo  quality  is 
reflected  in  our  reputation.  Unlike  some  suppliers,  Sanyo  designs, 
manufactures  and  tests  virtually  all  the  parts  that  go  into  our  products, 
from  cameras  to  stereos.  That's  an  assurance  not  everybody  can 
give  you! 
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On  an  analog  synthesizer,  pots  (potentiome- 
ters) are  controls  that  do  things  such  as  raise  and 
lower  the  volume  of  a  sound  signal  or  change  the 
frequency  (pitch)  of  an  oscillator.  Pots  are  also  the 
main  components  of  game  paddles  and  TV  volume 
controls.  To  make  new  sounds  on  an  analog  syn- 
thesizer, the  user  will  twist  pots  on  each  module 
and  listen  for  the  resulring  effect.  When  he  finds 
one  he  likes,  he  either  records  the  sound  on  tape 
or  writes  down  the  patch  on  a  patch  chart,  marking 
the  pathways  made  by  the  patch  cords  and  the 
positions  of  the  pots  for  future  reference.  Analog 
synthesizers  are  very  useful  in  this  way  because 
drastic  changes  in  a  sound  can  be  quickly  made 
by  simply  twisting  a  knob  or  plugging  a  patch 
cord  into  something  else. 

Turning  Knobs  With  POKEs 

A  digitally-controlled  synthesizer,  such  as  our 
SID  chip,  uses  numbers  POKEd  into  control  reg- 
isters to  accomplish  the  same  things  that  knob- 
twisting  and  patch-cord-plugging  do  on  an  analog 
synthesizer.  For  example,  if  you  POKE  a  16-bit 
value  into  the  first  two  registers  of  the  SID  chip 
(54272  and  54273),  you've  set  the  frequency  value 
for  Oscillator  1 .  POKE  a  four-bit  number  into  the 
high  nybble  of  the  sixth  register  on  the  chip,  and 
you've  set  the  Attack  value  of  the  envelope  for 
Oscillator  1.  POKEing  different  values  into  other 
registers  will  activate  them  in  the  same  way  that 


turning  the  pots  or  setting  switches  will  activate 
the  analog  synthesizer  modules. 

Envelope  Generation 

Look  at  Figure  1  again.  It  shows  a  direct  path  from 
an  oscillator  (VCOl)  to  the  mixer.  If  we  were  to 
break  that  path,  sending  the  output  of  VCOl  to 
the  input  of  the  amplifier  module  (VGA),  we 
would  then  need  to  send  the  output  of  VCA  to 
the  mixer  so  that  the  sound  from  VCOl  could  still 
be  heard.  The  patch  shown  in  Figure  3  would  be 
the  result.  Now  we  can  make  VCOl's  signal  even 
louder  by  adjusting  the  pot  on  VCA  or  on  the 
mixer.  The  real  reason  for  taking  this  route  is  that 
the  envelope  generator  can  be  brought  into  play, 
since  it  directly  controls  the  VCA. 

There  are  four  pots  on  the  envelope  generator 
module.  The  first  controls  the  Attack  time;  the 
second,  the  Decay  time.  The  third  sets  the  Sustain 
level,  and  the  fourth  controls  the  Release  time. 
On  the  SID,  two  registers  in  high-low  nybble  for- 
mat control  these  functions.  The  most  important 
function  is  perhaps  the  Sustain  level.  It  is  not  a 
timing  value,  but  is  rather  the  level  at  which  the 
amplifier's  volume  control  is  set  while  the  note  is 
being  sounded.  If  the  Sustain  level  is  zero,  no 
sound  will  be  heard  after  the  Attack  and  Decay 
phases  have  ended. 

The  envelope  generator  puts  out  an  electrical 
signal  which  tells  the  amplifier  when  to  turn  up 


Figure  3:  Using  The  VCA 
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80  COLUMN  PRINTER  SALE— $149.00* 


COMSTAR  T/F 


Tractor 
Friction 
Printer 


only 


1  n 


(Parallel  or  Serial) 


•   Lowest  price  quality  tractor  friction  printer  in  the  U.S.A.  •  Fast  80  characters  per  second 
40,  46,  66,  80,  96,  or  132  characters  per  line  spacing  •  Prints  labels,  letters,  graphs,  and  tables 
•  List  your  progranr:s  •  Print  out  data  from  modem  services 


*STX-80  COLUMN 
PRINTER— $149.00 

Prints  full  80  columns.  Super  silent  operation, 
60  CPS,  prints  Hi-resolution  grapliics  and 
block  graphics,  expanded  character  set,  ex- 
ceptionally clear  characters,  fantastic  print 
quality,  uses  inexpensive  thermal  roll  paper! 

DELUXE  COMSTAR  T/F 
PRINTER— $219.00 

The  Comstar  T/F  is  an  excellent  addition  to 
any  micro-computer  system.  (Interfaces  are 
available  for  Apple,  VIC-20,  Commodore-64, 
Pet,  Atari  400  and  800,  and  Hewlett  Packard). 
At  only  $219  the  Comstar  gives  you  print  quali- 
ty and  features  found  only  on  printers  costing 
twice  as  much.  Compare  these  features. 

•  BI-DIRECTIONAL  PRtNTINQ  with  a  LOGIC 
SEEKING  CARRIAGE  CONTROL  for  higher 
through-put  in  actual  text  printing.  80 
characters  per  second. 

•  PRINTING  VERSATILITY:  standard  96  ASCII 
character  set  plus  block  graphics  and  interna- 
tional scripts.  An  EPROM  character  generator 
Includes  up  to  224  characters. 

•  INTERFACE  FLEXIBILITY:  Centronics  is 
standard.  Options  include  EIA  RS232C,  20mA 

Current  Loop. 

•  LONG  LIFE  PRINT  HEAD:  100  million 
character  lite  expectancy. 

•  THREE  SELECTABLE  LINE  SPACINQS:  6,  6 

or  12  lines  per  inch. 


•  THREE  SELECTABLE  CHARACTER 
PITCHES:  •  10,  12  or  16.5  characters  per  Inch. 
132  columns  maximum.  Double-width  font  also 
Is  standard  for  each  character  pitch. 

•  PROORAMMABLE  LINE  FEED:  program 
rfiable  length  from  1/144  to  255/144  inches. 

•  VERTICAL  FORMAT  CONTROL:  program- 
mable form  length  up  to  127  lines,  useful  tor 
short  or  oversized  preprinted  forms. 

•  FRICTION  AND  TRACTOR  FEED:  will  accept 

single  sheet  paper. 

•  224  TOTAL  CHARACTERS 

•  USES  STANDARD  SIZE  PAPER 

11  you  want  more  try  — 

Premium  Quality 

COMSTAR  T/F  SUPER-10X 

PRINTER— $299,00 

More  Features  Than  RX-80 

For  S299  you  get  all  of  the  features  of  the 
Comstar  T/F  plus  10"  carriage  120  cps,  9x9 
dot  matrix  with  double  strike  capability  for  18 
X  18  dot  matrix.  High  resolution  bit  Image  (120 
X  144  dot  matrix),  underlining,  backspacing, 
left  and  right  margin  settings,  true  lower 
descenders,  with  super  and  subscripts,  and 
prints  standard,  Italic,  Block  Graphics,  special 
characters,  plus  2K  of  user  definable  char- 
acters. For  the  ultimate  in  price  performance 
the  Comstar  T/F  Super  10"  leads  the  pack! 


Doubfe 

Immediate  Replacement 

Warranty 

We  have  doubled  the  normal  90  day  warranty 
to  180  days.  Therefore  if  your  printer  fails 
within  "160  days"  from  the  date  of  purchase 
you  simply  send  your  printer  lo  us  via  United 
Parcel  Service,  prepaid.  We  will  IMMEDIATELY 
send  you  a  replacement  printer  al  no  charge 
via  United  Parcel  Service,  prepaid.  This  warran- 
ty, once  again,  proves  that  WE  LOVE  OUR 
CUSTOMERS! 

15   DAY   FREE  TRIAL 

OTHER  OPTIONS 

Extra  Ribbons S  5.95 

Roll  Paper  Holder 32.95 

Roll  Paper 4,95 

5000  Ubels 19  95 

1 100  Sheets  Fan  Fold  Paper 1395 

Add  $17.50  shipping,  handling  and  insurance. 
Illinois  residents  please  add  6%  tax  Add 
S40.00  for  CAI^ADA.  PUERTO  RICO.  HAWAII, 
ALASKA  orders.  WE  DO  NOT  EXPORT  TO 
OTHER  COUNTRIES.  Enclose  cashiers  check, 
money  order  or  personal  check.  Allow  14  days 
for  delivery,  2  to  7  days  for  phone  orders.  1 
day  express  mail  availatiiel!  Canada  orders 
must  be  in  U.S.  dollars. 
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GRAFSTAR  (Apple  interface  card  -  "Like  Grappler  Plus")  SALE  $69.00. 


the  volume  and  how  long  it  should  take,  as  well 
as  how  high  to  set  the  volume,  and  when  and 
how  long  to  turn  it  all  the  way  off  again.  This  is 
why  the  amplifier  module  in  the  diagrams  is  called 
"VCA."  This  stands  for  Voltage  Controlled 
Amplifier  and  means  that  the  amplifier  can  be 
controlled  by  an  incoming  variable  voltage,  such 
as  the  one  supplied  by  the  envelope  generator. 

ADSR  Values 

On  the  SID  chip,  each  voice  has  its  own  envelope 
generator.  Within  the  group  of  seven  registers  (0- 
6)  that  control  the  three  oscillators,  register  5  con- 
tains the  Attack  and  Decay  values  in  high-low 
nybble  format,  and  register  6  contains  the  Sustain/ 
Release  values.  All  values  are  four-bit  numbers 
(nybbles).  The  Attack  value  determines  how  long 
the  amplifier  should  take  to  reach  peak  amplitude 
(maximum  volume). 

The  Decay  value  determines  how  long  the 
amplifier  should  take  to  go  from  peak  amplitude 
to  the  level  specified  by  the  Sustain  value.  The 
Release  value  is  the  time  the  amplifier  will  use  to 
return  to  the  lowest  amplitude  level  ("off")  from 
the  Sustain  level. 

Remember,  though,  that  on  the  analog  syn- 
thesizer as  well  as  on  the  SID  chip,  the  envelope 
will  not  go  into  effect  until  it  is  "triggered."  The 
lowest  order  bit  (bit  0),  the  Gate  bit,  triggers  each 
envelope  on  the  SID  chip.  On  the  analog  synthe- 
sizer, triggering  of  the  envelope  is  accomplished 
through  the  use  of  an  attached  keyboard  module. 
When  a  key  is  pushed  down  (and  as  long  as  it  is 
held  down),  the  Attack,  Decay,  and  Sustain  values 
will  go  into  effect  in  order.  When  the  key  is  re- 
leased, the  Release  phase  is  triggered,  and  the 
VCA  will  close  down  the  volume  of  the  signal  it  is 
operating  on  over  the  length  of  time  specified  by 
the  Release  value. 

Program  2  demonstrates  the  effect  of  the  var- 
ious ADSR  values: 

Program  2:  Effects  Of  The  ADSR  values 

100  FORI=0TO24 : POKE542  7  2+I , 0 : NEXT 

110  POKE54272,37:POKE54273,17:REM  OSCl 

120  POKE54276,129:REM  NOISE  WAVE  OSC  1 

130  P0KE54277, 240:REM  SLOW  ATTACK/FASTEST 

DECAY  RATE 
140  POKE542  78,240:REM  HIGHEST  SUSTAIN  LEV 

EL/FASTEST  release  RATE 
150  POKE54296,15:REM  FULL  VOL.  AT  MIXER 

160  FORT=lTO4500iNEXT:REM  DURATION  FOR  AT 

TACK, DECAY,  AND  SUSTAIN 
170  POKE54276, 128:REM  BEGIN  RELEASE  CYCLE 

180  FORT=1TO4500: NEXT: REM  REL .  DURATION 

190  POKE54296,0:REM  TURN  OFF  VOLUME 

191  END 
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In  line  130,  the  Attack  value  is  all  the  way  on,  and 
the  Decay  value  is  all  the  way  off.  In  line  140,  the 
Sustain  value  is  all  the  way  on  and  the  Release 
value  is  off.  Each  value  is  a  four-bit  number,  0  to 
15.  With  the  Attack  and  Sustain  setting,  the  actual 
POKE  value  is  shifted  to  the  high  nybble;  thus, 
240  is  actually  the  Attack  value  equal  to  15  (for 
slowest  Attack)  multiplied  by  16.  The  sound  gen- 
erated is  a  random  noi.se  that  gradually  gets  louder 
and  then  stops  suddenly.  It  stops  suddenly  be- 
cause we  have  set  the  Release  value  to  0,  allowing 
no  time  for  a  gradual  decrease  in  volume. 

Change  the  value  240  in  line  140  to  255  and 
RUN  the  program  again.  The  sound  should  slowly 
fade  away.  The  high  nybble  of  54278  (Sustain)  is 
now  240  and  the  low  nybble  (Release)  15,  making 
a  total  of  255,  the  value  we  just  POKEd  into  54278. 
Try  lowering  the  Sustain  value  by  two  or  three  (2* 
16  or  3n6);  that  is,  POKE  54278  with  either  223  or 
207  and  see  what  happens.  The  sound  should 
build  up  as  before  but  should  then  fall  off  mark- 
edly. Change  the  Decay  value  from  0  in  line  130 
to  about  8  (POKE  54277,248)  and  hear  how  the 
drop-off  is  now  smoothed  out.  Similarly,  shorten 
the  Attack  time  to  vary  the  start  of  the  sound  the 
same  way  the  Sustain  value  was  altered.  The  re- 
sults should  be  vastly  different  from  those  we 
started  with,  and  we've  been  working  with  only 
two  registers! 

Look  now  at  line.  170.  Notice  that  we  sub- 
tracted one  from  the  value  we  originally  POKEd 
into  54276  in  line  120.  This  zeros  the  Gate  bit  in 
54276,  and  it  is  the  same  as  taking  your  finger  off 
the  keyboard  on  the  analog  synthesizer:  the 
Release  cycle  gets  triggered.  Of  course,  it  works 
only  if  the  VCA  Sustain  level  has  been  previously 
raised  high  enough  to  hear  the  tone.  The  delay 
loop  in  line  180  is  also  necessary  to  allow  the  Re- 
lease cycle  to  reach  its  lowest  level. 

Using  Filters  To  Color  Sound 

Let's  add  a  filter  to  the  path  in  Figure  3.  The  path 
from  the  VCA  to  the  mixer  is  broken  so  that  fil- 
tering the  modulated  signal  will  be  more  easily 
heard.  In  our  diagram,  we  have  a  choice  of  a  high- 
pass  or  low-pass  filter.  On  the  SID  chip,  we  can 
also  utilize  a  Band-Pass  filter. 

The  pot  on  each  filter  is  used  to  adjust  the 
cutoff  frequency,  which  is  the  frequency  above 
which  a  high-pass  filter  allows  frequencies  in  the 
sound  spectrum  to  be  heard  and  below  which  the 
filter  suppresses  them.  The  low-pass  filter  is  the 
opposite  of  the  high-pass  filter  in  that  it  suppresses 
the  frequencies  above  (he  cutoff  value  and  allows 
those  below  it  to  sound.  A  Band-Pass  filter  allows 
frequencies  to  be  heard  within  a  narrow  band 
surrounding  the  cutoff  frequency  (called  a  center 
frequency  in  this  case),  while  suppressing  all  the 
rest.  Use  of  filters  constitutes  a  technique  called 
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Put  yourself  in  the  pilot's  seat!  A  very  challenging 
realistic  simulation  of  instrument  flying  in  a  light 
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Figure  4:  Using  a  High-Pass  Filter 
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subtractive  synthesis,  which  selectively  eliminates 
available  frequencies  of  the  sound  spectrum,  pro- 
ducing widely  var\dng  sound  colors. 

Figure  4  indicates  that  we've  decided  to  filter 
VCOl  through  a  high-pass  filter.  VCOl  is  set  to 
produce  a  sawtooth  wave.  The  path  of  the  patch 
runs  out  of  VCOl  into  the  VCA,  and  from  the 
VCA  into  the  HIPASS  filter.  From  there,  the  signal 
heads  to  the  mixer  and  out  to  the  speaker.  Program 
3  is  a  routine  that  does  the  same  thing. 

Program  3:  Filtered  sound 

200  FORI=0TO24 : POKE54272+I , 0 : NEXT 

210  POKE54272,37:POKE54273,17:REM  OSCl 

220  POKE54276,33;REM  SAWTOOTH  WAVE  OSCl 

230  POKE54277,120:REM  MED.  ATTACK/MED.  DE 

CAY 
240  P0KE54278,245:REM  HIGHEST  SUSTAIN/MED 

.  RELEASE 
245  POKE54293,40:POKE54294, 5:REM  CUTOFF  F 

REQUENCY  FOR  HIGH-PASS  FILTER 
250  POKE54295, 129:REM  MED  RES ' NCE  AND  QSC 

1  TO  BE  FILTERED 
255  POKE54295,79:REM  FULL  VOL.  AND  CHOOSE 

HIGH-PASS  FILTER 
260  FORJ=1TO250:POKE54294,J:NEXT:REM  SWEE 

P  CUTOFF  FREQ.  UPWARDS 

270  POKE54276, 32:REM  BEGIN  RELEASE  CYCLE 

280  FORT=1TO500:NEXT:REM  REL.  DURATION 
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290  POKE54296,0:REM  TURN  OFF  VOLUME 

295  END 

To  hear  the  effect  of  the  filter,  in  line  260  we  will 
sweep  the  value  of  the  cutoff  frequency  from  low 
to  high.  This  will  allow  less  and  less  of  the  available 
sound  spectrum  to  be  passed  by  the  filter.  Listen 
carefully  to  the  richness  of  the  tone  as  it  is  di- 
minished. Switch  the  wave  form  to  Noise  in  line 
220  by  POKEing  129,  instead  of  33,  into  54276  to 
hear  a  different  version  of  the  effect.  Many  effects 
are  possible  using  filters. 

Frequency  Modulation 

Figure  5  introduces  another  technique  called  Fre- 
quency Modulation.  Notice  now  that  the  signal 
from  VCOl  is  entering  the  control  input  of  VC02, 
and  that  the  signal  from  VC02  is  going  through 
the  VCA  and  on  to  the  mixer.  The  frequency  of 
VC02  is  now  being  controlled  automatically  by 
the  output  voltage  of  VCOl  instead  of  manually 
by  the  pot.  This  is  another  example  of  voltage 
control.  The  envelope  generator  controlled  the 
VCA  before  and  an  oscillator  now  controls  a  VCO 
{Voltage-Controlled  Oscillator). 

Frequency  Modulation  (FM),  along  with  fil- 
tering and  envelope  control,  is  one  of  the  most 
significant  techniques  of  sound  synthesis.  Using 
one  signal  source  to  alter  the  sound  quality  of 
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Figure  5:  Frequency  Modulation 
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another  provides  incredibly  powerful  and  varied 
tools  for  sound  manipulation.  Program  4  is  one 
simple  example  of  the  FM  technique. 

Program  4:  siren 

300  FORI=0TO24:POKE54272+I,0:NEXT 

310  POKE54276,33:REM  SAWTOOTH  WAVE  OSCl 

320  POKE54286,3:REM  CONTROL  FREQ.  0SC3 

330  POKE54290,16:REM  TRIANGLE  WAVE  0SC3 

340  POKE54296,175:REM  FULL  VOL.S.  SELECT  B 
AND-PASS  &  DISC.  0SC3  FROM  AUDIO 

350  POKE54295,l:REM  NO  RES ' NCE  &  CHOOSE  0 

SCi  FOR  FILTER 
360  POKE54293,255:POKE54294,78:REM  CUTOFF 

FREQUENCY 
370  POKE54278,240:REM  FULL  SUSTAIN/FASTES 

T  RELEASE  RATE 
375  FORT=1TO300 
380  F=20000+PEEK{ 54299 )*20: REM  ADD  0SC3  O 

UTPUT  TO  BASE  FREQUENCY 
390  HF=INT{F/256) :LF=F-256*HF:REM  SPLIT  N 

EW  FREQUENCY  INTO  HIGH/LOW  BYTES 

400  POKE54272,LF:POKE54273,HF:REM  SET  NEW 

OSCl  FREQUENCY 
410  NEXT:POKE54276,32 :POKE54296,0 
420  END 

The  third  oscillator  on  the  SID  chip  is  our  control 
oscillator,  as  VCO I  is  in  Figure  5.  We  get  access 
to  a  value  corresponding  to  the  wave  shape  of 
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Oscillator  3  in  register  27  (54299).  If  Oscillator  3  is 
set  to  a  triangle  wave,  the  values  in  register  27 
will  go  up  from  0  to  255  and  then  down  from  255 
to  0  in  a  symmetrical  rhythm. 

This  is  a  nice  shape  for  a  siren  sound,  which 
is  what  Program  4  creates.  Notice  that  the  fre- 
quency of  Oscillator  3  in  line  520  is  very  low.  This 
value  allows  the  tracing  of  the  waveform  to  be 
heard  as  a  siren.  The  range  of  frequencies  under 
approximately  32Hz  is  called  the  sub-audio  range 
and  refers  to  the  fact  that  the  actual  waveform  at 
these  frequencies  is  discernible  as  individual 
pulses  instead  of  as  a  continuous  tone.  When 
Oscillator  3's  frequency  is  increased  into  the  audio 
range  (above  about  29),  the  quality  of  the  resulting 
tone  becomes  enjoyablv  less  predictable. 

Try  POKEing  220  into  54286  at  line  320  and 
running  the  routine.  Note  how  the  information  in 
register  27  (54299)  is  utilized  in  line  380.  It  is  in- 
creased by  a  factor  of  20  and  then  added  to  the 
base  frequency  of  20000.  Program  4  also  uses  a 
Band  Pass  filter,  but  for  no  particular  reason  other 
than  simply  to  stick  one  in.  Try  a  different  value 
for  the  waveform  in  line  330.  If  you  use  64  as  your 
value,  be  sure  to  add  a  line  to  set  Oscillator  3's 
pulse  width. 

The  techniques  of  sound  manipulation  de- 
scribed above  as  used  with  an  analog  synthesizer 
have  perhaps  given  you  a  better  picture  of  the 
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workings  of  the  SID  chip.  As  you  learn  more  about 
the  internal  registers  which  control  other  func- 
tions, you  will  discover  others  just  as  interesting 
as  those  discussed  here. 

Get  a  copy  of  the  Commodore  64  Programmer's 
Reference  Guide  and  read  about  Ring  Modulation, 
Filtering,  and  other  advanced  techniques.  Sound 
effects  are  the  most  directly  useful  sound  patches 
to  work  with  at  the  start.  Program  5  is  an  example 
of  one  I  used  for  a  Hangman  program:  it's  the 
sound  of  nails  being  driven  into  wood.  Imagine 
the  other  sound  effects  you  can  create  for  new 
game  ideas. 

The  User's  Guide  and  Programmer's  Reference 
Guide  have  suggested  patches  for  you  to  try  out. 
Put  some  FOR.. NEXT  loops  in,  as  we  did  in  line 
260  of  Program  3,  to  have  the  computer,  in  effect, 
"adjust  the  pots"  for  you,  as  it  alters  individual 
registers.  Once  you've  found  a  patch  you  like, 
save  the  register  values  for  future  reference.  As 
you  become  more  acquainted  with  the  ways  that 
sounds  can  be  altered,  you  will  find  yourself 
noticing  the  subtler  shades  of  sound  color.  You'll 
also  begin  to  really  know  how  the  sounds  on  a  TV 
commercial,  videogame,  or  science  fiction  movie 
are  created. 


Program  5:  Driving  Nails  Into  Wood 

700  FORI=0TO24 : P0KE54272+I , 0 :NEXT 

710  CT=0 

720  POKE54278, 5:REM  SUSTAIN/RELEASE 

730  POKE5427  7, 5:REM  ATTACK/ DECAY 
740  POKE54276,129:RKM  NOISE  WAVEFORM 

750  P0KE54295,241:REM  RES'NCE  &  VOICE 

760  POKE54293,54:POKE54294,28:REM  CUTOFF 

770  READA;REM  INPUT  HI  BYTE  FREQ.  VALUE 

780  READS: REM  INPUT  LO  BYTE  FREQ.  VALUE 

790  IFB=-1THEN900:REM  BRANCH  ON  END-OF-DA 

TA 
800  POKE54273,A:POKE54272,B:REM  SET  FREQ 

810  F0RT=1T035:P0KE54296,79:NEXT:REM  TURN 

ON  VOLUME  &  FILTER 
820  POKE54276,12a:REM  RELEASE  CYCLE 

830  GOTO7  30:REM  GET  NEW  NOTE 

840  DATA17, 37, 19, 63, 21, 154, 22, 227, 25, 177, 

28,214,32,94,34,175,34,255 
845  DATA-1,-1 
900  CT=CT+1:IFCT+1<6THENREST0RE:F0RT=1T01 

00*CT : NEXT : GOTO770 
910  POKE54296,0:REM  TURN  OFF  VOLUME      © 
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Word  Pro  3  Plus  (D) 

(Great)  71.95 

Ctioplifter  Call  us! 

Writer's  Assistant  (D)  106.25 

Filing  Assistant  (D)  106.25 
Spread  Sheet  Assistant 

(D)  106.25 
Personal  Finance 

Assist  (D)  50.95 

Fast  Eddie  (D)  26.25 

Zaxxon  (D)  29.95 

Witness  (D)  39.95 

Turmoil  (D)  26.25 

Squish'M  (D)  26.25 

Snake  Byte  (D)  26.25 

Type  Attack  (D)  29.95 

Way  Out  (D)  26.25 

Critical  h/lass  (D)  26.25 

Blade  of  Blackpoole  {D)  26.25 
Kinder  Comp  (D| 

(Children)  25.95 
Pacemaker  (D) 

(Children)  29.95 

Hey  Diddle  Diddle  (D(  25.95 

Fort  Apocalypse  (0/T)  26.25 

Survivor  (D/T|  26.95 

Touch  Typing  Tutor  (T)  14.95 


Touch  Typing  Tutor  (D)  $18.95 
Robbers  of  the  Lost 

Tomb  (T/D)  18.95 

Data  Manager  (T/D)  18.95 
Adventure  Pack  I  or  !l  (T)      14.95 

Grave  Robbers  (T)  14.95 

Trek(T)  12.95 

Annihilator  (T)  16.95 

Kongo  Kong  (T)  18.95 

HES  Modem  67.95 

VIC-2Q 

Apple  Panic  (C)  $29-95 

Choplitter  (C)  29,95 

Astroblitz  (C)  29.95 

Trashman  (C)  29.95 

Black  Hole  (C)  29.95 

Household  Finance  (T|  21.95 

Rat  Hotel  (C)  29.95 

Pipes  (C)  29.95 

Home /Office  (T)  21.95 
Sword  of  Fargoal  (T) 

(Expanded)  21.95 
Rescue  al  Rigel  (T) 

(Exoanded)  21.95 

HES  IVIon  (C)  29.95 

HES  Writer  (WP)  (C)  29.95 

Agressor  (C)  29.95 

SynlhesQund  (C)  44.95 

Shamus  (C)  29.95 

Robot  Panic  (C)  29.95 

Pirate's  Peril  (C)  29.95 

Gridrunner  (C)  29.95 

Turtle  Graphics  (C)  29.95 

Vic  Forth  (C)  44.95 

Deadly  Duck  (C)  27.95 

Fast  Eddie  (C)  29.95 

Turmoil  (C)  29.95 

Type  Attack  (C)  29.95 

Astro  Patrol  (T)  14.95 

River  Rescue  (C)  31.95 

fVlutant  Herd  (C)  31.95 

Fourth  Encounter  31.95 
Submarine  Commander  (C)     31 .95 

Grave  i^obbers  (T)  11.95 

Kongo  Kong  (T)  14.95 

Nile  Rider  (T)  9.95 

Trek  (T)  12,95 
67.95 


HES  f^odem 

Jo  Order:  Send  certified  checks,  money  orders,  or  use  your 
Master  Card  or  Visa  and  call  800-343-8019,  From  inside  New 
Hannpstiire  call  603-542-6175.  Personal  or  company  cliecks 
require  two  to  three  weeks  to  clear.  All  prices  are  subject  to 
change  without  notice.  Please  include  $2.00  per  package 
(1-100  pes.)  for  postage  and  handling.  Canada  $5.00  P&H. 
Other  countries  in 
elude  10%  for 
P&H.  For  C.O.D. 
$3-63  shipping  and 
handling.  Hours: 
Monday  thru  Satur- 
day -8:00  to  10:00 
Eastern  Time. 


UNIVERSAL 
SOFTWARE 

7/je  Best  Software  lor  Less 
P.  O.  eox  965 
Claremont.  N.H.  037« 


CALL  NOW  •  1-800^343-8019  •  TOLL  FREE 


More 
"CkllonMe's^ 
with    , 


.<^>^^ 


MASTER  MATH 


MoHnflon  lilwtoy. 

^tortec  Morth  u  mom  Itsan  just  a  cortipfeherisA«  xsftMra  package  ta  leocWng  grotS^ 
12mci1h,  ITs  ^aecifiCQllv  cteagned  to  build  orid  how  irteresl  oW  entfxjsiosm  so  Elvjdeots 
con  leom  fcsta . . .  fetojn  mas . . .  and  ts  proud  ond  confident  enough  to  shew  it. 

rjegordless  ol  tt«  studenfs  sKuting  \6Ne>.  Master  Motn  will  rielp  d9>elcp  mottr  proficiency 
wittv 

•  Easy  to  use  opetotai.     •  Soecass  orienlotior     •  Oneofvone  insttucton 
•  Clear,  concise  ccrcepts      •  Higti  reaoiution  coJof  Qfopnia 
•  lmogircti\«  gomes.        •  3elt.pQoed  leorrtng        •  High  student  mteiactjon 

r^tostef  Motfi  \vas  developed  by  a  pn^fessionol  math  educotof  in  the  UK  \^*iere  it  hos  been 
C¥3pfl>«d  OS  a  learning  aide  ^9D.  it  tvx>  been  tested  in  pUaliC  and  private  schools  in  the 
U.S  It's  receh^  h^hly  fOiWable  review?  in  bofti  countries 

Master  Moth  runs  on  /ipple  li/»/E.  Commodore  Pe  and  CBM  8032.  rs  comprised  c*  6 
independent  discs  a  topes  with  oi«  60  indr\«Jual  subjects.  Coi«iage  indudes  Algetxa. 
TngoTometry.  Geometiv.  Statistics  and  Base  /Accounting  reocneCs  support  moteools 
complete  this  valuable  iearnJng  package 

To  find  out  whot  motMjtion  con  mean  to  vour  motti  classes,  fill  out  the  coupon  and  mail  it 
atong  with  S150  for  your  lOday  trial  Q  fOj  can  order  one  fct  only  MO,  But  rxi  motteru^ich 
way  vou  choose  fo  review  lylaster  Motti.  rf  you  ore  nol  thoroughy  sattsfiecl  with  its  pertor- 
mance  Cf  results,  return  if  to  us  for  o  full  ond  cheerful  refurxS  Telephor^  coders  are  gladly 
accepted  Coil  (207)  336-2E0Q  ^^^      „       _     ^ 


5IMP1.E  naoDucTivr  corvimTiR  so(twar[ 

800-227-1836 


ro  ntW  &/         NJCKIHID  MAIM  Oa?KJ  USA        J0713ti;50O 


I'd  like  lo  put  Matter  Malh  lo  work  In  my  dsn. 
PtoBH  send  me  the  Indlcaled  ditc*  D  or  cimttls  EL 

Namfl 

Title 

School 

Ptione 

Sireei 

Cily 

Sula        Zip 

P.O.  number        Viu     Muler  Chorg?    Exp  Date 

Ch«ch$  Or  money  Orders  may  ba  made  out  to  PMI.  Inc.  ' 

Please  indicate  which  discs  for  single  orders- 

D  Hait«r  Math  1  4  programs  on  Numbers.  Logs,  and  Aniilogs.  $30. 

D  M«tt«r  Math  2  7  programs  on  Algebra  and  sets.  S30. 

D  Mjivter  Math  3  S  programs  on  areas  and  volumes  $S0. 

D  Mi»t«r  Mitti  4  Test  problems.  12  programs.  26  topics.  Factors.  Inleresl. 

Statistics.   Trig  ,  Calculus.  Percents,  Bases  and  Exponents.  $30. 
a  Matter  Math  5  Test  problems  12  programs,  33  topics.  Algebra,  Geometry. 

Staiisiics.  ratios  and  exponents.  S30- 
D  Matter  Malh  6  Test  problems.  7  programs.  20  topics.  Geometry.  LCM. 

mappings,  Fractions,  AlgeOra.  Currency.  530. 
D  COMPLETE  PACKAGE  $150.00 


Check  hardware 
D  CBM  8032' 


□  Apple  n/*/E  "      D  Commodore  PET" 
D  C6i-  DViC  20  (MM  4  A  5  only) 
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Atari  Safe  RAM 


E,  H  Foerster 


Are  you  tired  of  waiting  while  your  BASIC  program 
initializes?  Would  you  like  to  save  tivo-thirds  of  the 
memory  required  to  store  the  DATA  statements  for  your 
USR  routines,  character  sets,  or  player/missile  data? 
Would  you  like  to  save  data  generated  by  your  program 
alorig  with  the  program  using  just  SA^E  commands? 
This  article  will  show  you  how  to  create  protected  and 
SAVEable  RAM  within  the  BASIC  token  program. 
Several  USR  routines  are  also  included  to  allow  you  to 
add  or  delete  safe  RAM,  move  data  in  memory,  and  point 
a  string  to  any  place  in  memorxj.  Also,  the  game  "SKI!" 
illustrates  these  techniques  in  a  practical,  executable  pro- 
gram. And  each  of  these  utilities  does  its  job  in  a  fraction 
of  a  second. 


The  Atari  400/800  computers  provide  page  six  as 
free  RAM  to  be  used  by  BASIC.  However,  to  use 
this  RAM,  the  information  must  be  stored  in 
DATA  statements  in  the  BASIC  program  and 
then  transferred  to  RAM  using  READ  and  POKE 
loops.  This  often  delays  the  start  of  a  program 
while  the  initialization  routine  is  processed.  You 
are  also  limited  to  256  bytes  when  using  page  six. 

A  technique  commonly  used  to  circumvent 
this  problem  is  to  put  the  desired  file  in  a  string  at 
the  beginning  of  the  string  array  storage  area 
(STARP).  The  pointer  to  STARP  is  then  moved 
past  the  desired  file.  When  the  program  is  SAVEd, 
the  file  is  SAVEd  along  with  the  program.  This 
technique  requires  special  programming  not  only 
to  save  the  file,  but  also  to  move  the  pointer  back 
after  the  program  is  LOADed  into  the  computer. 
You  must  insure  that  the  pointers  are  not  moved 
a  second  time  when  a  program  is  executed  fol- 
lowing an  initial  run. 

But  there  is  another  location  within  the  BASIC 
token  program  that  can  be  used  to  save  and  store 
data.  The  procedure  we'll  discuss  will  provide  all 
the  RAM  you  need  at  this  location  and  protect  it 
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from  any  additions,  deletions,  or  changes  in  the 
program.  This  protection,  of  course,  does  not 
extend  to  direct  POKEs  to  this  area. 

No  special  routine  will  be  needed  to  protect 
this  RAM  area  once  it  has  been  inserted  in  the 
program.  The  RAM  area  and  the  information 
stored  in  it  will  remain  there  even  when  the  pro- 
gram is  SAVEd.  The  information  is  available  im- 
mediately after  the  program  is  loaded  and  can  be 
moved  rapidly  from  this  location  to  anywhere  in 
memory  using  the  MOVE  DATA  routine  provided 
in  this  article. 

Using  The  Pointers 

Before  explaining  the  technique,  let's  briefly  re- 
view the  BASIC  token  program.  There  are  several 
sections  to  every  BASIC  program,  each  with  a 
two-byte  pointer  to  a  particular  memory  address. 
The  address  of  the  location  is  obtained  by  multi- 
plying the  second  byte  by  256  and  adding  the  first 
byte.  The  location,  name,  and  purpose  of  the 
pointers  for  the  Atari  BASIC  token  program  are; 

128,129  LOMEM:  A  256-byte  section  used  by 
BASIC  for  temporary  storage. 

130,131  VNTP:  A  table  containing  a  list  of  all 
the  variable  names. 

132,133  VNTD:  Ending  address  of  variable 
name  table,  plus  one,  one  byte  containing  a 
zero  when  fewer  than  128  variables  have 
been  used. 

134,135  VVTP:  Variable  value  table  containing 
values  for  scalar  variables  and  offset  dimen- 
sion, and  length  for  arrays  and  strings. 

136,137  STMTAB:  Statement  table  containing 
the  tokenized  version  of  program  state- 
ments. 

138,139  STMCUR:  Current  statement  being 
executed. 


COMPUTEi's 

First  Book  Of  Atari  Grapliics 


Authors: 

Price: 
On  Sale: 


COMPUTE!  Magazine 
editors  and  contributors 
SI  2.95 
Now 


COMPUTE!,  the  leading  magazine  of  home, 
educational,  and  recreational  computing, 
has  led  the  way  for  Atari  owners  since  the 
computers  were  first  introduced  in  1979. 
COMPUTE!  has  published  scores  of  articles 
on  Atari  graphics,  and  was  the  first  to  di- 
vulge many  important  details  on  such  tech- 
niques as  redefined  characters,  custom 
graphics  modes,  and  player/missile 
graphics.  But  those  articles  are  scattered 
across  dozens  of  issues,  many  of  which  are 
scarce  or  out  of  print. 

That's  why  the  editors  of  COMPUTE! 
decided  to  gather  the  very  best  Atari 
graphics  articles  published  over  the  past 
three  years  into  COMPUTEi's  First  Book  Of 
Atari  Graphics.  From  the  fundamentals  to 
advanced  techniques,  here  are  some  of  the 
most  instructive  articles  ever  published  for 
the  Atari. 

But  that's  not  all,  COMPUTEi's  First 
Boal<  Of  Atari  Graphics  sho  presents  articles 
never  before  published  anywhere,  and 
additional  sections  written  especially  for 
this  book.  These  include  "The  Basics  Of 
Atari  Graphics, "an  introductory  tutorial 
which  prepares  beginners  for  the  rest  of  the 
book;  "How  To  Design  Custom  Graphics 
Modes,"  which  covers  the  fundamentals  of 
mixing  modes  on  a  single  screen;  and 
"Introduction  To  Player/Missile  Graphics,"  a 
guide  to  understanding  one  of  the  Atari 's 
most  advanced  features,  written  by  Bill 
Wilkinson,  a  COMPUTE!  columnist  and  a 
creator  of  Atari  BASIC  and  the  Atari  Disk 
Operating  System. 

Numerous  other  articles  include  "De- 
signing Your  Own  Character  Sets,"  a  new 
and  improved  "SuperFont."  "High  Speed 
Animation  With  Character  Graphics,"  "Ani- 
mation And  Player/Missile  Graphics,"  "The 
Collision  Registers,"  and  "GRAPHICS  8  In 
Four  Colors  Using  Artifacts."  There's  even  a 
brand  new  article  by  Wilkinson,  "The  Priority 
Registers,"  which  for  the  first  time  shows 
how  to  use  player/missile  graphics  to  create 
a  fifth  player. 

In  the  COMPUTE!  tradition.  Atari 
Graphics  is  crisply  written  and  edited  to  be 
useful  to  beginners  and  experts  alike.  And  it's 
access  to  its  dozens  of  ready-to-type  program 
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140,141  STARP:  String  array  storage  area. 

When  a  program  is  SAVEd,  LOMEM  is  sub- 
tracted from  each  of  the  pointers,  and  these  values 
are  SAVEd.  Along  with  these  pointers,  all  the 
information  from  VNTP  up  to  STARP  is  SAVEd. 
When  a  program  is  LOADed,  the  reverse  process 
occurs.  This  process  is  necessary  because  the  ad- 
dition of  peripheral  devices  such  as  disk  drives 
changes  the  value  of  LOMEM  and  thus  the  loca- 
tion of  the  BASIC  program. 

These  pointers  and  the  contents  of  the  various 
sections  are  not  static,  but  are  moved  around  in 
memory  as  additions  and  deletions  are  made. 
The  use  of  a.  new  variable  name  -  even  in  direct 
mode  (no  line  number)  -  creates  changes  in  the 
program  even  though  no  changes  in  the  listed 
program  occur.  The  new  name  is  added  to  the 
variable  name  table.  The  pointers  from  VNTD  to 
end  are  incremented  by  the  length  of  the  name 
and  the  contents  of  VNTD  to  end-of-program  are 
moved  up  in  memory  by  the  length  of  the  name. 
Then  eight  bytes  are  reserved  at  the  end  of  the 
variable  value  table,  and  the  contents  and  pointers 
for  STMTAB  to  end-of-program  are  similarly 
moved. 

RAM  Utilities 

If  we  want  to  create  RAM  space  for  our  own  use 
within  the  BASIC  program,  several  requirements 
must  be  satisfied.  The  area  must  be  located  in  a 
place  where  it  will  be  SAVEd  when  the  program 
is  SAVEd.  The  area  must  be  in  a  location  where 
any  changes  in  the  program  (either  in  the  direct 
mode  or  program  mode)  will  not  only  leave  the 
contents  of  the  area  intact,  but  also  move  the  con- 
tents when  the  adjoining  area  is  moved.  Since  the 
RAM  area  is  not  static,  we  also  must  have  a  pointer 
to  this  area.  An  area  created  between  VNTD  and 
VVTP  is  the  only  area  that  meets  these  require- 
ments. Because  VNTD  is  always  one  byte  long, 
the  location  of  safe  RAM  can  be  calculated  from 
the  formula: 

PEEK(132)  + 1  +  256*PEEK(133) 

Enter  and  run  Program  1,  and  the  routine  for 
adding  RAM  along  with  four  other  utilities  will  be 
installed  in  safe  RAM  at  location  VNTD -I- 1.  You 
can  now  delete  all  program  lines  and  save  these 
utilities  in  a  blank  program  for  future  use.  You 
may  want  to  leave  a  REM  statement  just  to  remind 
you  what  is  in  the  program.  The  utilities  and  the 
calls  for  these  utilities  are  as  follows: 

Add  RAM:  A  =  USR(VNTD  + 1,  bytes  of 
RAM) 

Delete  RAM:  A  =  USR(VNTD-I-12,  bytes  of 
RAM) 

Move  Data:  A  =  USR(VNTD-l-23,destination, 
source, bytes) 
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String  Assign:  A  =  USR(VNTD  +  90, ADR 
(string), dimension, length, desired  location) 
where  VNTD  =  PEEK(132)  +  256xPEEK(133) 

You  need  to  be  careful  when  using  these  and 
other  machine  language  routines.  A  mistake  in 
any  of  the  USR  statements  will  more  than  likely 
lock  up  your  computer.  So  before  executing  one 
of  these  calls,  double-check  your  typing.  If  it  is 
part  of  a  program,  SAVE  the  program  before  run- 
ning it.  Then  if  the  computer  locks  up,  shut  it  off, 
LOAD  your  program  back  in,  and  correct  the  mis- 
take. No  test  is  included  in  these  routines  to  check 
for  the  correct  number  of  arguments  in  the  USR 
statement.  If  only  one  or  some  of  the  routines  are 
needed  for  your  program,  then  only  those  portions 
can  be  retained.  We'll  talk  more  about  this  later. 

If  you  look  at  Program  1,  you  will  notice  that 
the  Add  RAM  and  Delete  RAM  routines  are  each 
only  11  bytes  long.  How  do  we  go  about  moving 
all  those  pointers  and  memory  with  just  11  bytes 
of  code?  Why  not  let  BASIC  do  it  for  us?  The  mem- 
ory manager  routines  are  located  in  the  Atari 
BASIC  cartridge  at  location  43135-43358  ($A87F- 
$A95E).  All  our  USR  routine  does  is  load  the  6502 
registers  with  the  appropriate  values  and  then 
jump  to  the  memor}'  manager  routines. 

Routine  Features 

The  Add  RAM  routine  cannot  create  RAM  and  is 
therefore  limited  by  the  amount  of  memory  in 
your  computer.  If  you  attempt  to  add  more  bytes 
than  are  available,  an  "ERROR  2  AT  LINE  X" 
message  is  returned.  Memory  is  always  added  at 
the  current  location  of  VVTP.  Thus,  any  additional 
RAM  is  added  at  the  end  of  current  safe  RAM. 

The  Delete  RAM  routine  similarly  deletes 
RAM  at  the  end  of  current  safe  RAM.  However,  if 
you  try  to  delete  more  bytes  than  were  previously 
added,  you  might  as  well  start  all  over. 

The  Move  Data  routine  lets  you  move  a  block 
of  data  rapidly  from  one  place  to  another  in  mem- 
ory, including  safe  RAM.  For  example,  moving 
IK  of  data  takes  about  13  seconds  using  a  PEEK 
and  POKE  routine.  Using  the  Move  Data  routine, 
this  same  move  takes  a  fraction  of  a  second. 

The  move  routine  can  even  move  a  section  of 
memory  into  an  adjacent  overlapping  area  without 
erasing  any  part  of  it.  To  demonstrate  this  point, 
execute  the  following  line: 

DIMA$(9):A$  =  "ABCDEF":A$(4)  =  A$:?A$ 

The  result:  A$  =  "ABCABCABC".  What  happens 
is  that  the  origination  string  is  changed  by  the 
destination  string  during  the  transfer  of  data. 
However,  the  Move  Data  routine  moves  bytes 
starting  with  either  the  first  or  last  byte  of  the 
section  of  code  to  be  moved,  depending  on 
whether  the  movement  is  forward  or  backward  in 
memory.  If  you  execute  the  following  line: 


DIM  A$(9):A$"ABCDEF":A  =  LISR(PEEK(132)  +23 
+  256xPEEKa33),ADR(A$)  +  3,ADR(A$),6):?A$ 

the  resulting  A$  equals  "ABCABCDEF".  So  A$(4) 
actually  is  equal  to  the  original  A$. 

It  is  possible  to  use  this  routine  for  many  pur- 
poses including  player/missile  movement.  I  have 
not  tested  to  see  what  would  happen  if  the  routine 
were  called  from  a  Vertical  Blank  Interrupt.  Since 
the  routine  uses  part  of  the  memory  manager 
routine  and  some  of  BASIC'S  zero  page,  it  might 
interfere  with  the  BASIC  program.  If  this  occurs, 
then  the  Vertical  Blank  Interrupt  must  first  save 
locations  $99-9C  and  then  restore  them  at  the  end 
of  the  routine. 

Safe  Strings 

Safe  RAM  may  also  be  used  for  storing  strings 
using  string  manipulation  techniques.  The  String 
Assign  routine  readily  performs  that  task  for  us. 
Usually  strings  are  manipulated  by  changing  val- 
ues in  the  variable  value  table.  Bytes  two  and  three 
must  be  changed  to  contain  the  low  and  high  bytes 
of  the  offset  of  the  location  of  the  address  of  the 
string  from  STARP.  Safe  RAM,  however,  is  located 
before  STARP,  and  the  offset  from  STARP  is  nega- 
tive. To  get  a  positive  offset  for  a  string  located 
before  STARP,  we  must  add  65536  to  the  location 
before  subtracting  STARP  and  converting  to  a 
low  and  high  byte  offset.  We  are  simply  assuming 
that  memory  wraps  around  to  zero  when  top-of- 
memory  is  reached. 

Before  we  get  too  involved  in  how  to  calculate 
offset  and  where  to  POKE  the  values,  let's  look  at 
the  String  Assign  routine.  This  routine  will  calcu- 
late the  offset  for  you  and  POKE  it,  the  current 
length,  and  dimension  values  into  the  corre- 
sponding bytes  in  the  variable  value  table  for  the 
variable  identified  by  ADR(string).  All  you  need 
to  do  is  provide  the  address  where  the  routine  is 
located,  the  dimension,  the  length,  and  where 
you  want  the  string  to  be  located. 

Before  going  to  the  String  Assign  routine, 
you  must  DIM  the  string  to  avoid  getting  an 
ERROR  9  message.  But  to  save  memory  in  the 
string  array  area,  DIMension  the  string  to  length 
one.  Then  call  the  routine  and  change  to  the  de- 
sired dimension.  The  term  ADR(string)  in  the 
USR  call  is  not  used  directly,  but  is  used  by  the 
routine  to  identify  the  string  to  be  changed.  If  you 
have  ever  tried  string  manipulation  by  calculating 
and  POKEing  string  offsets,  then  you  will  certainly 
appreciate  this  routine. 

String  Assign  is  best  used  in  a  program.  If 
.used  in  direct  mode,  it  is  best  done  with  all  state- 
ments in  a  single,  direct  mode  line.  If,  for  example, 
you  locate  A$  at  location  1536,  the  address  for  A$ 
will  remain  at  1536  while  the  direct  line  is  being 
executed  or  while  a  program  is  running.  But  as 
soon  as  the  program  returns  with  a  READY,  the 


address  for  A$  will  change. 

There  is  a  good  reason  for  this.  Any  line  that 
is  typed  in  direct  mode  is  entered  as  the  last  line 
in  the  statement  cable.  STARP  is  moved  backwards 
or  forwards  in  memory,  depending  on  the  length 
of  the  line.  Along  with  STARP,  all  pointers 
(offsets)  for  strings  and  arrays  are  changed  ac- 
cordingly. A  string  residing  in  the  normal  string 
array  area  can  still  be  printed.  However,  a  string 
moved  outside  that  area  will  have  only  its  offset 
changed,  but  not  its  location. 

TTiis  routine  can  be  used  to  clear  memory  for 
player/missile  graphics.  Point  string  A$  to  the 
location  of  the  player/missile  area  and  set  length 
and  dimension  to  the  number  of  bytes  to  be  cleared 
with  the  String  Assign  routine.  Then  follow  with 
the  statement: 

A$(l,l)  =  CHR$(0):A$(2)  =  A$ 

Deleting  The  Utilities 

If,  after  finishing  a  program,  you  want  to  delete 
part  or  all  of  the  utility  routines,  you  must  perform 
several  steps: 

1.  Move  the  utilities  to  location  1536  +  1  (page 
six).  Then  use  the  USR  routines  in  page  six  to 
perform  the  remaining  steps.  Substitute  1536  for 
VNTD  in  the  USR  calls. 

2.  Move  the  routines  you  want  to  keep  to  the 
beginning  of  safe  RAM. 

3.  Delete  the  remaining  safe  RAM. 

4.  Change  all  lines  in  the  BASIC  program 
that  contain  references  to  safe  RAM  to  the  new 
location  within  safe  RAM  (e.g.,  the  first  argument 
of  the  USR  routines). 

5.  SAVE  the  program. 

Safe  RAM  can  be  used  for  USR  routines, 
player/missile  data,  custom  character  sets,  and 
strings.  But  certain  rules  must  be  followed.  For 
example,  only  relocatable  USR  routines  can  be 
left  in  safe  RAM.  Others  must  be  moved  to  their 
designated  location.  If  you  want  to  change  a  pro- 
gram containing  a  USR  routine,  try  the  program 
by  leaving  it  in  safe  RAM.  If  it  does  not  work  there, 
transfer  it  to  the  prescribed  location  using  the 
Move  Data  routine.  Character  sets  mi  'St  be  located 
on  a  IK  or  1/2K  memory  boundary  and  must  be 
moved  from  safe  RAM  to  their  correct  location. 

Even  though  data  must  be  moved  from  safe 
RAM  to  another  location,  you  will  still  save  more 
memory  than  when  using  DATA  statements.  For 
example,  the  133  bytes  of  data  in  Program  1  occupy 
a  total  of  555  bytes  when  stored  in  the  DATA  state- 
ments. This  is  because  each  digit  of  each  number 
and  each  comma  occupies  one  byte  of  memory  in 
the  BASIC  token  program. 

A  Practical  Application  For  Safe  RAM 

As  an  example  of  the  improvements  which  can  be 
made  using  this  technique,  I  have  converted 


"SKI!"  (Atari  version  of  "Slalom")  from  February 
COMPUTE!  to  initialize  from  safe  RAM  (see  Program 
2).  The  15-second  initialization  has  been  cut  to 
just  a  fraction  of  a  second.  And  preloading  the 
data  into  safe  RAM  saves  930  bytes  more  than  the 
original  initialization  routine. 

Other  additions  include  a  USR  routine  to 
generate  the  course,  with  the  option  of  viewing 
the  course  before  running  it.  Control  of  the  skier's 
horizontal  motion  has  been  added  to  the  Vertical 
Blank  routine.  This  makes  horizontal  motion 
proportional  to  the  scrolling  rate.  These  changes 
do  not  affect  the  nearly  instantaneous  start  of  the 
program. 

To  enter  the  modified  version,  first  type  in 
the  BASIC  loader  for  SKI!.  The  DATA  statements 
contain  the  safe  RAM  utihties  and  initialization 
data  for  the  game.  Each  DATA  line  includes  a 
checksum,  which  should  greatly  reduce  the 
chance  of  errors.  When  you  RUN  the  loader,  it 
will  POKE  the  data  into  safe  RAM,  then  erase 
most  of  itself.  Delete  the  remaining  lines  and,  for 
safety,  SAVE  a  copy  of  the  safe  RAM  portion. 
Then  type  in  modified  SKI!.  You  must  SAVE,  not 
LIST,  the  combined  program  to  tape  or  disk,  since 
a  LISTed  version  will  not  include  the  safe  RAM 
portion.  If  you  typed  in  the  original  SKI!,  you'll 
be  amazed  at  the  increase  in  speed  when  you 
RUN  the  new  version. 

Using  safe  RAM  and  the  utilities  given  in  this 
article,  you  should  be  able  to  write  programs  that 
do  not  start  with  the  message  "Just  a  Moment"  or 
"Initializing."  The  uses  for  safe  RAM  are  not  lim- 
ited, of  course,  to  the  examples  we've  discussed. 
There's  a  lot  of  room  for  you  to  develop  your  own 
applications  for  safe  RAM. 

Explanation  Of  USR  Routines 

Add  RAM  (11  bytes): 

The  routine  uses  a  JMP  $A881  to  the  memory  man- 
ager routine  for  moving  pointers  and  contents  of 
token  program  to  a  higher  location  in  memory. 
Before  jumping,  the  following  registers  are  loaded: 
X  =  token  file  pointer,  which  in  our  case  is 
$86(VVTP);  A  =  MSB(length);  Y  =  LSB(length). 
Jumping  to  $A871  automatically  loads  A  =  0. 

Delete  RAM  (11  bytes): 

This  routine  is  identical  to  the  above,  except  for 
JMP  $A8FD. 

Move  DATA  {67  bytes): 

The  routine  stores  destination  in  $9B,9C  and 
source  in  S99,9A.  It  then  determines  if  the  move 
is  positive  or  negative.  For  positive  direction,  a 
routine  at  SA8E3  is  used  which  requires  that 
X  =  MSB  (length)  +  1,  Y  =  LSB  (length),  S9A  = 
$9A  +  MSB  (length),  and  S9C  =  S9C  +  MSB 
(length).  For  a  negative  move,  the  routine  at 
$A94C  is  used  which  requires  X  =  MSB  (length)  + 


1,  Y  =  complement  of  LSB  (length)  and  (S99),Y 
and  ($9B),  Y  point  to  first  byte  of  source  and  desti- 
nation, respectively. 

String  Assign  (44  bytes): 

This  routine  first  obtains  the  variable  number  for 
the  desired  string  from  the  statement  table  and 
loads  it  into  the  accumulator.  A  JSR  $AC28  returns 
with  the  address  of  the  desired  string  in  the  vari- 
able value  table  in  $9D,9E.  The  dimension  and 
length  are  then  pulled  off  the  stack  and  stored  in 
($9D),7  through  ($9D),4.  The  desired  location  is 
then  pulled  off,  and  the  offset  calculated  and 
stored  in  ($9D),2  and  ($9D),3. 

Program  l^safe  ram 

10  FOR  A=l  TO  133:READ  BiPOKE  1536+^n 
, B: C=C+B: NEXT  ft; IF  C<>ia631  THEN 
PRINT  "CHECK  DATA  ST ATEMENTS " : END 


:eh 

lATA 
34 
:em 
lATA 
34, 
:EM 
70     DATA 
,  250 
29.  1 


20     RE 

30     D^ 

1 : 

RE 

i; 

RE 


40 
50 


80    D( 

li 


(ATA 
'6,2 
3,  15 
5,13 

90  DATA 
,  200 
REM 
DAT 
3B, 
7,1 

~r ,  1 

DAT 
145 
96 
A  =  U 
A  =  U 
EK  ( 


100 

1  10 


120 


130 
140 


DD  R 
104, 
6,12 
ELET 
104  , 
6,  25 
DVE 
104  , 
56,  1 
4.10 
54,  1 
101  , 
7,16 
,  176 
,  155 
176, 
76,  7 
STRI 
104 
01,6 

a,  32 

6,19 
20B 

157, 


AM 

104, 170, 104, 168. 138. 162, 

9,  168 

E  RAM 

104,  170,  104,  168,  138,  162." 

3,  168 

DATA 

162,  3,  104.  149.  15 

65, 155. 229, 153. 1 

4, 170, 1 44 , 16. 24 , 

38 

156, 133, 156, 232, 

8, 232, 104, 168, 10 

,2, 198. 154, 152,2 


3, 202, 16 
65, 156, 2 
10  1,15  4, 

104, 168, 
1  ,  153,  13 
4,101,15 


2,  198,  15 
6,  169 
NG  ASSie 
, 1 04, 104 
0, 208, 24 
,40, 172, 
2  2 

, 24B, 56, 
200, 138, 


6,  i: 

N 

,  160, 4, 2 

9, 200, 20 

1 6  et ,  7 ,  10 

170, 104, 
229, 141 , 


73, 255, 168 


00, 177, 1 
0, 20  0,  17 
4,  145,  15 

229, 140, 
145,  157, 


SR  <  1536+1 ,  1 33) 
SR(1536+23,PEEK<132)+1+256»PE 

133)  ,  1537,  133) 


Program  2:  safe  ram  Application 
BASIC  Loader  For  SKI! 


0  REM 
10  7 

:  B 

NE 
20  IF 

A 
30  VN 
40  A  = 
50  A  = 

46 
60  GO 
70  E  = 

+  G 
80  RE 


|g.T:1.!l^:: 
"JUST  A  MOMENT"; DIM  A*( 
=0:C=20:FOR  D=0  TD  36: G 
XT  D:C=6:G0SUB  70 

B073S82  THEN  ?  "CHECK 
LINES" : END 

TD=PEEK (132) +256*PEEK ( 1 
USR (ADR (At) , 746) 
USR(ADR(At)+22,VNTD+l,A 
> 

TD  1000 

0:FOR  F=l  TO  C:READ  G:E 
:A*(A,A)=CHR$(e)  -.  A  =  A+1: 
AD  F: IF  F<>E  THEN  ?  "CH 
TATEMENTS  AT  LINE  " : 1 00 


746) : A=l 
OSUB  70: 

ALL  DAT 

33) 

DR  < A*)  , 7 


=E+G: B=B 
NEXT  F 
ECK  DATA 
+D*10: EN 


D 
90  RETURN 
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100  DATA  104,104,170,104,168,138,162        ,240,6,169,73,144,2,169,0,145,20 

,134,76, 129, 168, 104, 104, 170, 104,         3, 96, 165, 25  67 

168,138,162,134,76,2617  360  DATA  206,133,205,173,10,210,41,7 
110  DATA  253,168,104,162,3,104,149,1         ,24,105,6,168,169,134,145,203,17 

53, 202, 16, 250, 56, 165, 155, 229, 153        3, 10, 210, 48, 2380 

,165,156,229,154,3026  370  DATA  14,169,23,133,207,169,18,13 
120  DATA  104,170,144,16,24,101,154,1         3,208,169,22,133,209,208,12,169, 

33,  154,  138,  101,  156,  133,  156, 232,  1        17,  133, 207,  169, 25 22 

04,168,76,227,168,2659  380  DATA  22,133,208,169,18,133,209,5 
130  DATA  232,104,168,101,153,133,153        6,152,229,209,168,162,3,152,24,1 

,  176, 2,  198,  154,  152, 24,  101 ,  155,  13        01 ,207,  168,  169, 2692 

3,155,176,2,198,2670  390  DATA  204,145,203,152,24,101,208, 
140  DATA  156,152,73,255,168,200,76,7         168,169,204,145,203,202,208,235, 

6, 169, 104, 104, 104, 160, 4,200, 177,         96 , 104 , 1 04 , 1 33 , 204 , 32 1 2 

138,201,60,208,2785  400  DATA  104,133,203,169,0,133,205,1 
150  DATA  249, 200, 2^0, 200, 177, 138, 32,         69,24,133,206,32,113,6,168,32,11 

40, 172, 160, 7, 104, 145, 157, 136, 192        3, 6 , 32 , 1 23 , 2 1 04 

,2,208,248,56,2823  410  DATA  6,136,16.247,160,17.32,113, 
160  DATA  170,104,229,140,145,157,200        6,201,1,240,4,200,144,1,200,32,1 

, 138,229, 14  1, 145, 157,96, 112, 112,        13,6, 1875 

112,70,155,34,102,2748  420  DATA  32,123,6,200,192,20,208,245 
170  DATA  20,144,38,38,38,38,38,38,38        ,173,10,210,201,13,176,18,24,165 

,38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 3        ,2  05, 105, 10, 23  36 

8,848  430  DATA  197,206,176,9,32,139,6,240, 
180  DATA  38,38,6,65,130,9,0,0,0,21,0        52,208,2,208,194,173,10,210,201, 

,0,0, 0,0, 0,0, 0,0,0, 307  25, 176, 4, 2468 

190  DATA  0,0,6,14,28,24,32,0,128,0,0  440  DATA  169,7,208,20,173,10,210,201 

,0,0, 0,0, 0,0, 0,0,0, 232  ,25,  176, 4,  169,  10, 208, 9,  173,  10,21 

200  DATA  0,0,0,0,0,0,0,0,0,0,0,0,0,0        0,201,25,2218 

,0,0,0,0,0,0,0  450  DATA  176,19,169,139,170,173,10,2 
210  DATA  0,192,192,220,20,28,7,5,7,0        10,41,15,201,12,176,247,24,105,3 

, 0,24,52,44,60, 24,0,  16,56,56,  100        ,  168,  138,  145,2341 

3  460  DATA  203,230,206,165,206,201,175 
220  DATA  124,124,254,16,16,8,28,62,6        ,208,1,96,24,169,20,101,203,133, 

2,62,8,8, 0,0,56,94,  106,94,  1 16,56        203,  165,204,  105,3018 

)  1294  470  DATA  0 ,  1 33 , 204 , 208 ,  1S2 , 0, 727 

230  DATA  0,0,119,69,117,21,119.0,0,8  1000     A=0:FQR  B=l  TD  5 

,24,56,120,8,8,8,8,0.0,0,685  l^l"  GRAPHICS  0:POSITION  2,4 

240  DATA  48,88,56,16,186,254,89,24,1  1^20  FOR  C=l  TO  10:?  A  *  1  0 :  A  =  A-i- 1  :  NE  XT 

56, 82, 33,  16, a, 0,0,  0,12,  26,  28, 8,1  ^ 

130  1030  ?  "CDNT-iPOSITION  2,0:POKE  842, 

250  DATA  93,127,154,24,57,74,132,8,1         13:STDP 

6,0,0,24,60,60,24,24,60,186,89,2  ^^^^  POKE  842,12 

4  1236  '  1050  NEXT  B 

260  DATA  154,170,198,65,65,1,18,36,7  1060  ? "  SAFE  RAM  IS  LOADED,   DELETE 
4,161,18,156,77,10,24,24,0,0,0,0         REMAINING  LINES  AND  ENTER  MODI 
,  1251  FIED  SKI  '.  " 

270     DATA     0,169,0,133,0,169,1,141,99, 

6, 169, 8, 14  1 ,  98, 6, 104, 104, 133, 7, 1  Modified  SKI! 


?^li^??„     .     ._.     ...     .      ..„     .„         100    DIM 


SCREEN* ( 1 ) , PM* ( 1 ) 


2B0  DATA  133,6,104^104^133,1,162,10,  j^j  ^^„     LEFT* t 20 > , CENTER* < 20 ) , R I GHT* 
160,  1  17,  169,  7, J 2, 92, 228, 96, 216,  1        (20)  ,  CURR*  (20)  , CRASH* (20)  ,  ERASE* 

^r,«  I^i„  ^?f'^  ,,r,  „  ,-,-,  «  .,^     ^     ^.^  (20)  .DIR  (8)  ,SCR(4)  ,DLIST*(1  ) 

290  DATA  240  4  169  0,133,0  165  0  240  .^^  ^^^     T* ( 20 ) , TOPL I NE t ( 20 ) : GOTO  130 

,85^165,1,240,81,206,99,6,173,99  ^^^  ^^^^  E^IMMaLINE  100  MUST  BE  TYP 

300  DATA  208,73  198  203  208  26  169  2  j^^  "=  INT  Ia/ 256 )= LO  =  A-H I « 256 : RETURN 

,  lo3, 203,  173,  124, 2, 208, 3, 206,  100  ^25  POKE  66,1:F0R  W= 1  TO  10:POKE  532 
,6,173,125,2543  79.0:POKE  53279, 8:NEXT  W:POKE  66 

310  DATA  2,208,3,238,100,6,173,100,6       ,0;RETURN 

,141,0,208,165,0,141,99,6,206,98  130  goSUB  790:REM  Initialization  rou 
,6,1906  tines 

320  DATA  174,98,6,142,5,212,208,27,1  140  re^  plaYER  ROUTINE 

60,0,56,177,6,233,20,145,6,160,1  150  pqkE  S59,62:POKE  54279, PMBASE 

,177,2013  160  POKE  53277, 3:PDKE  704.2*16+6 

330  DATA  6,233,0,145,6,169,7,141,98,  ^70  PD= 1 024 : YP= 1 B0 : XP= 1 28 

6, 141, 5, 212,1 98, 1, 76, 98, 228, 0,0,  ib0  PM*(Pa)=CHR*(0):PM*(PO+25  4)=CHR* 
1770  (0 ) : PM* CPO+1 ) =PM* (PO) 

340  DATA  0,0,104,162,228,160,98,169,  195  SCR ( 0 ) =0 : SCR  (  1  )  =  1  0 : SCR ( 2 ) =4 : SCR ( 
7, 32, 92, 228, 96, 173, 10, 210, 41, 3, 2       3>=2:SCR<4)=1 

01,3,2017  200  ERASE*=CHRt (0) : ERASE* (20) =CHR* (0 

350  DATA  176,247,96,170,169,72,224,1        ) : ERASE* ( 2 ) =ERASE« 
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210  LEFT*=ERASE*: CENTERt=ERASES: RIBH  680  PMt < PO+ YP , P0+ YP+20 ) =CURR* 

T$=ERASE«:  CRASH*  =  ERASES  i>90  POKE  D,1:SQUND  0,0,0,0 

220  FOR  1=0  TO  15  700  XP= I  NT ( 72  +  90 « RND C 0 )  )  : POKE  53248, 
230  LEFT* ( 1+2, 1+2) =CHR* <PEEK (CHSET+2         XP:POKE  1636, XP 

08+1))  710  IF  PEEK(P0PF)<>0  THEN  PDKE  HITCL 
240  CENTER* < 1+2, r+2) =CHR* <PEEK (CHSET         R,1:60T0  700 

+224+1) )  720  PDKE  H I TCLR , 0 : SCft=SCR-50 : I F  SCR< 
250  RIGHT* < 1+2, I +2) =CHR* (PEEK (CHSET+         0  THEN  SCR=0 

104+1))  730  60T0  300 

260  CRASH* ( 1+2, 1+2) =CHR* (PEEK <CHSET+  740  IF  SCRiHSCR  THEN  HSCR=SCR 

240  +  1))  745  POSITION  8,0:7  t»6;"    HIGH  "  ;  HSCR 

270  NEXT  I  750  SOUND  0,0,0,0  

280  DIR  (0)  =0:  DIR  (  1  )  =20:  DIR  (2)  =  19:  DIR  760  SCREEN*  (  326  ,  336  )="  p  r  es  b  {,  J  SEHBj" 

(3) =21 : DIR (4) =1 : FOR  1=0  TO  3 : D I R  770  IF  STRI6(0)   THEN  770 

(  1+5)  =-DIR ( I )  : NEXT  I:DIR(5)=-1  780  GOTO  130 

290  CURR*  =  CENTER*  790  REM  ki:k**f:tmi^J:\*i']T 

295  POKE  1636,XP:POKE  203,2:SCR  =  0  800  BRAPHICS  1 7 : H I L0= 1 20 : POKE  53248, 
300  PM* (PO+YP. PO+YP+20> =CURR*  0;POKE  0,0 

310  SCR=SCR+SCR(PEEK(0)):POKE  77,0  810  SETCOLOR  4 , 0 , 1 2 : SETCOLOR  IV 12,8: 
320  POSITION  2,0:7  #6:5CR;"  ";:POSIT         SETCOLOR  2 , 9 , 6 : SETCOLOR  0,1^,4 

ION  15,0: IF  PEEK(0)<>0  THEM  ?  #6  820  P0PF=53252 : H I TCLR=53Z7S : POKE  HIT 

: (5-PEEK (0) ) «100  CLR,0 

330  IF  PEEKC1X3  THEN  POKE  0.0:GOTO  830  SCRB  ASE  =  PEEK  (  1  06  )  -  1  6  :  REM  4K  BOON 

740  DARY 

340  ST=5TICK(0)  840  PMBAS£=SCRB ASE-8 : REM  2K  BOUNDARY 
350  LEFT=  NOT  PTR I G ( 1 ) : R I GHT=  NOT  PT         , DOUBLE-LINE  RES 

RIG(0) :LR=LEFT+2«RIBHT  850  CHB ASE=PMB ASE : REM  FILL  UP  OFFSET 
360  CURR*=CENTER*: XP=PEEK( 1636)  WITH  CHARACTERS 

370  IF  LEFT  THEN  CURR*=LEFTt : I F  LRO  B70  VNTD=PEEK ( 1 32 ) +256«PEEK ( 1 33 ) 

DLR  THEN  SV=2:TI=5  880  A=USR ( VNTD+90 , ADR C SCREEN* ), 4097 , 
380  IF  RIGHT  THEN " CURR*=R I GHT* :  I F  LR         4097 , SCRB ASE *  256 ) 

OOLR  THEN  SV=4:TI=5  890  A=USR ( VNTD+90 , ADR ( PM* >, 2049 , 2049 
390  IF  TI>0  THEN  T I  =TI - 1 : SOUND  0,SV,         ,PMBASE»256) 

0,TI  900  A=USR ( VNTD+90, ADR (DLIST*) , 40, 40, 

400  IF  LR=0  THEN  SOUND  0,0,0.0:TI=0  VNTD+134> 

410  OLR  =  L  ''l^  CHSET  =  CHBASE«256 

420  UP=(ST=14  OR  ST=10  OR  ST=6):D0WN  920  A=USR ( VNTD+23 , CHSET , yNTD+ 1 74 , 1 20 
=(ST=5  OR  ST=9  OR  ST=13)  ) : A=USR ( VNTD+23 , CHSET+ 1 28 , 574 72 , 

430  YP=YP-2tUP+2*DOWN: IF  YP>200  THEN         344 ) : A=USR ( VNTD+ 23 , CHSET +208 , VNT 
YP=200  0+294,48) 

IF  YP<40  THEN  YP=40  930  A= VNTD+377 : GOSUB  120: POKE  VNTD+3 
POKE  0, 1+ ( YP>130)+ (YP; 160) + ( YP>1         68,HI:POKE  VNTD+370,LD 

85)  940  A=USR (VNTD+23, 1649, VNTD+494, 103) 

IF  PEEK(P0PF)=0  THEN  300  950  Z  =  USR  (  VNTD  +  4B3 )  : REM  DISABLE  VBLA 
WHICH=INT (LOB (PEEK (P0PF) ) /LOG (2)         NK 

+  0.  1  )  : TEMP  =  PEEK (0)  : PDKE  0,0  960  POKE  756 , CHB ASE : RES  TORE  990 

PM*  (PO  +  YP, PO  +  YP  +  20)  =ERASE*  980  A  =  ADR  ( DL  I  ST* )  : GOSUB  HILO:POKE  56 
POKE  H1TCLR,1:IF  WHICH02  THEN  6         1,  HI:  POKE  560,  LO 

20  1020  DLIST* (32) =CHR* (PEEK (560) ) : DLIS 
REM  POINTS  T» (33) =CHR* ( PEEK (561 ) ) 

PTR=ASC(DLIST*(8) )+256*ASC (DLIST  1030  SCREEN* (l)=CHRt(0) : SCREEN* (4 09S 
*(9>)  )=CHR*(0):SCREEN*(2)=SCREEN* 

LINE=INT  (  (  YP-39)  /B)  +1  1040  TOPL  I  NE*  =  S"CREEN* 

COL=INT ( (XP-49) /S) +1  1050  A= ADR ( TOPL I NE* ) : GOSUB  HILO 

LOC  =  PTR  +  LINE«20  +  CDL:SOUND  0,0.0,  1060  DL I  ST * ( 5 , 5 ) =CHR*  (  LD )  :  DL  I  ST* ( 6 ,  6 
0  )=CHR*(HI) 

FOR  1=0  TO  8:P=PEEK(LDC+DIR( I ) )  1070  POKE  88,LO:POKE  89, HI 

IF  P<128  OR  P>192  THEN  590  1090  POSITION  8,0:7  *6;"aa3a";  

POKE  LOC  +  DIR(I),0  1082  SCREEN*  (  1  2  1  ,  1  39  )  =  "  fHH^EC  ,  >  Hinai: 

SCR  =  SCR+ CP=i39)  *50+ (P=134)  *  100*  (  CCt  ,  3  tEf  ,  J  H^"       

5-TEMP)  :  1  =  1  1:  NEXT  I  :  GOTO  600  1083  SCREEN*  (  1  63  .  1  78  )="  FilEHDiW  RIP^^ 
NEXT  I:BDTQ  610  Cgatii>  EE"  :  SCREEN*  (  1  85  .  195)="gaES 

FOR  W=15  TO  0  STEP  -1:S0UND  0,20  C  .  :)  HHH^E" 

,10,W:NEXT  W  1085  SCREEN*  (  403  ,  4  1  9  )  =  "  Cf  2  »«P  B^  2  IJ!  ff 
6  10  POKE  0,  TEMP:  PDKE  H  I  TCLR  ,  1  :  GOTO  3  C  2  »IIE!<:2  iU  Et  2  |J![F" 

00  1090  A=USR (VNTD+597, ADR (SCREEN*) +480 

620  REM  ■.J:T:.--i;tM  ' 

630  SOUND  0,0,0,0  1410  A=SCRBASE«256 

640  PM*  (PD  +  YP,PO  +  YP  +  20)=CRASH*  1420  A  =  A-20 * ( ST  I CK ( 0 ) = 1 4 ) +20* ( ST  I CK ( 

650  FOR  W=100  TO  150  STEP  2:SaUND  0,  0)=13) 

W.12,10:NEXT  W  1430  IF  A >SCRBASE *  256  +  3480  THEN  A  =  A- 
660  PM* ( PQ+YP, PD+YP+20) =ERASE*  20 

670  YP=200  1440  IF  A<SCRBASE*256  THEN  A=A+20 
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STOP  PUYING  GAME 


■  Calcu(a!e  o[)ds  on  HORSE  RACES  wrih  ANY  COMPU- 
TER using  BASIC. 

■  SCIENTIFICALLY  DERIVED  SYSTEM  realty  works  TV 
Slalion  WLKY  ol  Louisville  Kemucky  used  Ihis  sylem 
10  predicl  Ihe  odds  ol  me  T9B0  Keriucky  Dertjy  See 
me  Wall  Street  Journal  iJune  6  1980)  article  on 
Horse-Handicapping  This  system  was  wntien  and 
used  Dy  compjter  experts  and  isnowpemg  made  availadletq  no  me  computer  owners  Trtis 
nietnod  IS  based  on  storing  data  from  a  large  numDer  o*  races  on  a  nigh  speed  large  scale 
computer  23  factors  taken  trcm  die  Darty  Racing  Fmm  were  tfien  analyzed  Oy  tde 
coiTiputer  to  see  do*  they  influenced  race  results  From  tdese  23  factors  ten  were  lound  to 
De  Itie  rnosi  uitai  m  determining  winners  NUMERICAL  PROBABILITIES  of  each  ol  tliese  10 
factors  were  then  computed  and  tliis  forms  the  tjasis  ol  Ihis  REVOLUTIONARY  NEW 
PROGRAM 

■  SIMPLE  TO  USE  ODiain  Daily  Racing  Form  the  day  before  tne  rices  ana  answer  itie  10 
Questions  about  eacn  dorse  Run  tde  program  and  your  computer  will  print  out  the  odds  tor 
all  tiorses  in  eacn  race  COMPUTER  POWER  gives  you  the  advantage' 

■  YOU  GET  •)  Cassette 

2j  Listing  Dt  BASIC  program  tcr  use  wilt)  any  computer 
3)  Instructions  on  now  to  gel  tiie  needed  data  Irom  the    Daily  Racirg  Form' 
4}  Tips  on  using  the  odds  generaied  by  trie  program 
b)  Sample  to'm  :o  sirnphlv  enifinn-]  ca!a  Ic'  each  race 
MAIL  COUPON  OBCALL  TODAY 

3G  COMPANY,  INC.  DEPT.  CO  (503)  357-5607 

RT.  3,  BOX  28A,  GASTON,  OR  97119 

Yes,  I  want  to  use  my  computet  for  FUN  and  PROFIT  Please  send  me programs 

at  J?4.95Mtti.  Circle  itiecasseite  you  need:  FET/CBM  UIC-20.  CommMoreSJ 

SinciairTimex  1000.  Atari.  TRS-BO.  Color  Computer,  or 

Apple  [Apple  Disk  available— add  55  OOl 


^ 


Enclosed  is   D  clieck  or  money  order   D  MasterCard    D  Visa' 

Card  Ho                                                                                        ixfi.  date 
NAME  


ADDRESS  _ 
CITY    _._ 


STATE  , 


.ZIP„ 


START  USING  YOUR  COMPUTER  FOR 

FUN  and  PROFIT! 


1  450 

1  460 

1  470 
1480 

14B1 
1490 

1495 
1500 
2000 
20  10 
2020 
2030 
2040 
2050 
2060 

2070 

2075 

2080 
2085 

2086 

2090 

2095 

2100 
2110 
2112 
2200 


GOSUB  H ILO: T»=CHR4 (LD) : T* (2) =CH 

R*(HI) :DLIST*(8,9)=T* 

IF  STRIG(0)=1  THEN  1420 

fl  =  SCRBASEt256-»-34B0:  GDSUB  HILD 

T»=CHR*<LO) :T*(2)=CHRS(H1) :DLIS 

T* (8, 9) =T* 

GDBUB  125: IF  STRr6(0)   THEN  1481 

A=USR(VNTD+342.ADR(DLIST*C8) ) ,1 

76> 

SCREEN*  <  121  ,  195) =SCREEN* (120) 

RETURN 

VNTD=PEEK ( 132) +256* PEEK (133) 

POKE  VNTD+342+26, 78 

POKE  VNTD+342+28, 67 

POKE  VNTD+342+39, 85 

POKE  VNTD+342+43, 81 

POKE  VNTD+342+51 , 73 

A  =  USR(VNTD  +  23. 20000, VNTD  +  342,  36 

5) 

A  =  L)SR(VNTD  +  23,  20000  +  52  +  30,  20000 

+52,365) 

A=USR(VNTD+23, 20000+36+9, 20000+ 

36, 400) 

RESTORE  2000 

FOR  A=0  TO  B:READ  B:POKE  20036+ 

A, B: NEXT  A 

DATA  173,4,208,240,4,169.0,133, 

0 

FOR    A=0    TO    29:REflD    B:POKE     20000 

+  6  1+A,  B:  NET(T     A 

DATA     198,203,208,26,169,2,133,2 

03 

DATA     173,124,2,208,3,206,100,6 

DATA     173,125,2,208,3,238,100,6 

DATA     173,100,6,141,0,208 

FOR     A=0     TO     103:?     ft, PEEK (VNTD+36 

0  +  A)  , PEEK  (20000  +  A)  : NEXT    A  @ 


ESI  TIME  PLANNER 

"  Eledronlc  Softwafe,  Inc, 
;p,aBox765 

-BloomfieW  Hills 

■  Michigan  48303 


TIME  IS 
MONEY" 


Witfi  the  ESI  (Electronic  Software,  Inc)  Time  Pianner.a  personal  calendar  and 
appointment  file  for  your  Commodore  CB1*/I  or  64,  your  time  is  like  money  m  the  bank. 
On  either  a  dail/  or  monthly  calendar,  the  'easy  to  use"  ESI  Time  Planner  can  help  you 
plan  and  program  schedules  for  yourself,  your  personnel  or  your  equipment.  With  over  40  powerful  commands 
you  can  schedule  in  15  or  30  minute  intervals,  an  entire  day,  week  or  month.  And  to  repeat,  move,  or  reschedule 
any  event,  available  time  can  be  found  instantly.  'Easy:'  is  exactly  how  the  ESI  Time  Planner  operates,  with  on-line 
HELP  functions,  color  and  sound  assistance  (64),  time  display,  cross  referencing,  security  passwords  and  BVzxIl 
print-out  capabilities  as  well  as  a  full  color  screen  display  of  your  complete  schedule. 


CAPACITIES 


■  1800  to  8000  sched- 
uled  events  per  disk 

■  Schedule  from  now 
until  the  year  2000 

■  Schedule  unlimited 
number  of  people 
or  resources 

■  Unlimited  comments 
and  reminders  per 
day  per  person 

Md  S3  liK  sfilpping  and 
tiandbng.  Uasiercsrd 
Visa,  Clfeck,  or  MO 


SELECT  YOUR 
TIJV1E  PIANNER 
TODAY 


Retail  lisi  prices 

D  64    1WI         ::,     S89 

D  4032  iwoo-iySMg. 

D  4032  ,'8050  onf,  5189, 

D  8032)woon^s249 
D  8032  ■saw  i,nvS289 


Remetrrder  "Time  is  Money' 
OiQ  Vi&  ad  and  order  today, 
tie  wtw  tiesitates  wastes  tinie 
and  money 


Name     ^^^^^^^^^^^^^^^^^^^^^^H 

CBM  and  64  ate  ttademaite  of  Comtnodofe  Business  MaiJiines.  Inc. 

Date     ^^^^^^^^^^^^^^^^^^^ 

ESI  and  Time  Planner'  die  trademadis  of  Electronic  Software,  Inc. 

The  Rrst  and  Only  System  to  Backup 

Diskottsa  Protected  by  Bad  Sectoring 

without  modification  to  your  drive. 


ATARI  DISK  BACKUP  SYSTEM  S49.^^ 

Superctona  is  the  on/y  ATARI  dtskene  copier  system  thai 
lets  you  backup  just  about  ANY  'copy  praTecied'  diskeno 
includtng  thoM  protected  bv  'bad  sectonng."  Bad  iracks  and 
soctors  Br*  croaiod  wtthauT  modifications  to  or  adjusiments 
ol  vour  hardware.  Each  backup  diskette  generated  by  Super- 
clone  functions  exsctfy  AAe  the  angina/  .  .seJt-booting,  etc. 
(In  fact,  we  suggest  that  vou  use  the  backup  and  save  the 
Dfiflinal-J 
Superckine  rrcludes: 

SCAN  ANALYSIS  -  Map  of  diskette  contenis  (Location  of 

data,  bad  s^tors    etc  ) 

FORMATTNG/BAD    SECTORING    ■    fgon-ATARI    DOS 

formatting  and  bad  tratk/secior  creation 

BACKUP  -  Copi«  just  about  avoo^hmg  v,*e  can  find    .  . 

regardless  of  protection  scheme 
Superclone'  is  user-friendiv  and  ample  ro  use 
PlflATlS  TAKE   NOTE:  SUPERCLONE  onfv  aflows  two 
copies  to  bo  made  ot  any  specific  diskene.  .  .Sorryi!' 

SYSTEM  HEQUIREMENTS 

Atan  400  o^  aX)  Computer  /  48K  Memory 
One  Atan  &1D  Disk  Dnve  /  Pnnier  Optron^l 
Availaolo  at  your  compgtei  stare  or  diroct  from 
FRONTRUNKER.  Include  52.00  <S5,00  Foreign  Qrdofs)  tor 
Mch  system    DEALER  INQUIRES  ENCOURAGED. 


TOU.  FREE  ORDER  LINE: 
124  Hfs.\  1-B00-«4«-47«0 

In  Nevada  or  for  questions 
Call:  (702)  786-4«00 
Personet  checks  a^low  2-5 
weeks  to  clear.  M/C  arvd 
VISA  accepted,  include 
shipping. 

316  Califomifi  Avenue,  Suite  1712 
Reno   Nevada  89509     (702)  786-4600 

Ottte/s  make  ciaims   .    SUPERCLONE  makes  copvsf.'f 
ATARI  IS  a  Trademark  ol  ATARI,  Inc 


VIC 

Scaling  Bar  Graphs 


James  P,  McCallister 


Bar  graphs  often  have  more  visual  impact  than  figures 
or  statistics.  Tliis  itlility  program  gives  you  multicolor 
bar  graph  capability  and  demonstrates  its  practical 
uses.  There  is  a  discussion  of  modification  of  control 
variables  to  suit  a  variety  of  applications. 


As  you  learn  to  solve  problems  in  BASIC  on  your 
VIC,  you  realize  that  calculations  are  fairly  easy  to 
program  no  matter  how  complex  the  math.  How- 
ever, you  sometimes  want  to  display  your  answers 
in  a  way  that  highlights  their  meaning.  One  very 
effective  method  is  to  construct  a  bar  graph. 

This  article  describes  a  utility  bar  graph  sub- 
routine you  can  add  to  your  own  programs.  It's 
very  easy  to  use,  and  it's  suitable  for  many  appli- 
cations. Once  you  have  it  saved  on  tape  or  disk, 
you  can  quickly  turn  a  modest  calculation  into  an 
analysis  of  options  or  a  graphic  history  of  trends. 

One  Practical  Application 

Here's  an  example  that  demonstrates  a  practical 
use  of  the  bar  graph  subroutine.  Suppose  you 
want  to  borrow  money  to  buy  a  car.  Checking  a 
reference  book  on  business  math,  you  find  that 
the  monthly  payment  calculation  for  an  install- 
ment loan  is: 

payment  =  amount  of  loan  *  r/(l-(l  +  n)'') 

where  n  is  the  number  of  months  and  r  is  the 
monthly  interest  rate,  expressed  as  a  decimal  frac- 
tion. Also, 

total  finance  cost=  (n  *  payment)  -  amount  of  loan 

So,  as  a  first  step,  you  come  up  with  this 
BASIC  program  to  do  the  fundamental  calculation: 

L00  INPUT" [2  D0WN}AMNT,APR";AM,AR 

110  MR=AR/1200 

120  INPUT" MONTHS ";N 

130  MP=AM*MR/(l-(l+MR)t-N) 


140  FC=N*MP-AM 

150  DEFFNR(X)=-INT(-X*100)/100 

160  PRINT "PAYMNT=$";FNR(MP), "FIN  COST=$" 

; FNR ( FC ) 
170  GOTO100 

In  this  program,  AM  is  the  amount  of  the  loan, 
AR  is  the  annual  percentage  rate,  and  N  is  the 
term,  in  months.  MR  is  the  monthly  rate  expressed 
as  a  decimal  fraction.  The  results  are  MP,  the 
monthly  payment,  and  FC,  the  total  finance  cost; 
both  are  based  on  the  formulas  you  started  with. 
The  function  FNR(X)  defined  in  line  150  rounds 
to  the  next  highest  penny,  and  the  results  are 
printed  in  line  160. 

Naturally,  increasing  the  number  of  months 
(or  term)  of  the  loan  makes  the  payment  lower, 
but  increases  the  finance  cost.  With  this  program 
you  could  experiment  with  various  amounts, 
APRs  and  terms,  and  arrive  at  a  decision  about 
which  loan  suits  you  best. 

Instead,  let's  modify  the  program  to  plot  the 
effect  of  various  term  lengths  of  the  loan,  using 
the  bar  graph  subroutine.  We'll  still  use  the  INPUT 
statement  for  amount  and  APR;  but  we'll  use  the 
FOR/NEXT  statements  to  automatically  vary  N 
and  take  care  of  storing  the  answers.  Now  the 
program  looks  like  this: 

100  INPUT" {CLR}AMNT, APR"; AM,  AR 

110  MR=AR/1200 

120  FORI=0TO8:N=6*(l+2) :REM  N=12TO60BY6' 

S 
130  Y(0,I)=AM*MR/(1-(1+MR)T-N) 
140  Y(1,I)=N*Y(0,I)-AM 
150  NEXTI:QB=8 
160  QL$="{12  SPACES }1  2  3  4  5 {15  SPACES} 

YEARS " 
170  QT$="[2  spaces] MONTHLY  PAYMENT" : Z=0 : 

GOSUB9900 
180  QT$="{2  SPACESITOTAL  FINANCE  COST":Z 

=1;GOSUB9900 
190  GOTO100 
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Add  lines  9900  to  9999  (see  Program  2). 

The  resulting  graphs  are  in  Figures  1  and  2 
for  a  loan  of  $5000  at  12.8  percent. 

We'll  deal  with  the  new  variables  in  detail 
later.  But  you  can  already  see  that  plotting  the 
graphs  requires  these  steps: 

1.  The  BASIC  instructions  for  the  subroutine 
are  added  to  the  program,  beginning  in  line  9900. 
(Later,  we'll  discuss  the  most  efficient  ways  to  do 
this.) 

2.  The  numbers  to  be  plotted  are  put  into  two 
lists,  one  for  each  graph.  At  line  130,  the  list  for 
the  monthly  payment  graph  is  put  in  Y(0,I),  and 
at  line  140  the  list  for  the  finance  cost  graph  is  put 
in  Y(1,I).  The  first  subscript  for  each  Y  variable 
identifies  the  list.  The  second  subscript  is  a  label 
for  each  number  in  the  list. 

3.  After  the  lists  are  completed,  GOSUB9900 
is  "called"  once  for  each  graph  (line  240). 

4.  Before  calling  GOSUB9900  the  first  fime, 
QB  is  given  a  value  of  8  so  the  subroutine  would 
know  how  long  the  Hsts  were  and  how  many  bars 
to  plot.  Also,  the  legend  to  appear  at  the  bottom 
of  the  screen  is  put  in  QLS, 

5.  Before  calling  GOSUB9900  each  time,  title 
information  is  put  in  QT$.  This  is  different  for 
each  graph. 

6.  Before  calling  GOSUB9900  each  time,  Z 
is  given  a  value  corresponding  to  the  list  to  be 
plotted. 

The  graphs  in  Figures  1  and  2  can  be  displayed 
using  just  the  lines  listed  so  far.  The  subroutine 
does  all  the  layout  work.  The  vertical  scale  and 
labeling  are  automatic.  The  example  could  have 
included  billions  of  dollars  or  10'  seconds  of  time 
-  the  scale  would  still  be  worked  out  and  labeled 
correctly. 

Program  Features 

Now  we're  ready  to  explore  the  features  of  the 
subroutine  in  greater  depth.  The  primary  features 
are: 

•  one  to  21  vertical  bars  per  display  (number 
specified  by  user). 

•  automatic  ranging  and  scaling  for  each  dis- 
play, with  no  restrictions  on  the  signs  or  mag- 
nitudes of  the  values  to  be  plotted.  The  scale 
is  labeled. 

•  operates  from  a  two-dimensional  array,  so 
that  several  lists  can  be  stored  before  plotting 
the  first  one. 

•  positive  bars  go  up;  negative  bars  go  down. 

•  built-in  "hold"  of  display,  released  by 
touching  any  key;  cursor  prompt  in  lower- 
right  comer. 

•  universal  memory  configuration.  Adds 
2300  bytes  to  the  calling  program. 

•  scale  lines  in  contrasting  color  (green). 
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The  subroutine  also  has  a  number  of  optional 
features  which  are  transparent  to  the  user.  (Trans- 
parent features  are  built-in  program  features  that 
you  can  ignore  without  consequence  -  they  take 
care  of  themselves.)  The  features  are  controlled 
by  giving  values  to  certain  control  variables.  In 
BASIC,  all  numeric  variables  are  initially  set  to 
zero,  and  the  subroutine  is  designed  so  that  a 
zero  signifies  the  standard  condition  for  each  op- 
tion. That's  why  the  standard  choices  are  trans- 
parent. The  standard  choice  for  an  option  is  often 
called  the  "default"  option,  because  if  you  don't 
specify  an  option,  you'll  get  the  standard  choice 
by  default.  The  transparent  features  are: 

•  The  top  four  lines  of  the  display  can  be 
printed  with  title  or  explanatory  information. 
(Null  strings  are  standard.)  Also,  the  two 
bottom  lines  can  be  printed  with  legend 
information. 

•  Choice  of  bar  color  (black  is  standard);  or 
contrasting  colors  for  "up"  and  "down"  bars; 
or  alternating  bar  colors;  or  contrasting 
colored  bars  grouped  in  pairs. 

•  Close-spaced  (standard)  or  double-spaced 
bars. 

•  Graph  positioned  against  right  edge  of 
screen  (standard),  or  moved  left  a  chosen 
number  of  spaces. 

•  Automatic  ranging  and  scaling,  with  all 
bars  starting  at  zero  (standard);  or  expanded, 
offset  scale;  or  preassigned  scale.  Also,  pre- 
scaling  of  multiple  lists  before  plotting. 

•  Vertical  scale  labeled  (standard),  or  un- 
labeled. Labels  are  printed  to  the  left  of  the 
scale,  if  there's  room.  Otherwise,  they  will 
move  automatically  to  just  above  or  below 
the  scale. 

How  To  Use  The  Subroutine 

To  create  a  bar  graph  plot,  insert  GOSUB9900  into 
your  program  after  assigning  the  value  or  values 
to  be  plotted  into  the  Y  array.  There  are  two  fun- 
damental restrictions  in  your  main  program.  First, 
you  cannot  use  line  numbers  from  9900  to  9999. 
Second,  you  shouldn't  use  variable  names  starting 
with  Q,  unless  you're  willing  to  share  them  with 
the  subroutine. 

The  result  of  the  GOSUB9900  (if  no  control 
variables  are  set)  will  be  a  single  bar,  representing 
the  value  stored  in  Y(0,0).  Going  beyond  this 
simple  graph  requires  using  control  variables  - 
but  only  those  you  want  to  change  from  zero. 
Most  likely  you'll  find  that  several  of  the  controls 
are  quickly  mastered.  You  can  then  add  more  to 
your  repertoire  as  you  gain  experience.  All  control 
variables  must  be  given  any  new  values  before 
GOSUB9900, 
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Optional  Feature  Controls 

These  are  the  rules  for  the  control  variables: 

1.  List  identification.  The  variable  Z  becomes 
the  first  subscript  of  the  Y  values,  thereby  con- 
trolling which  list  is  to  be  plotted.  If  there  is  only 
one  list,  then  Z  is  always  zero  and  never  needs  to 
be  changed  from  its  initial  zero  value. 

2.  Number  of  bars.  The  number  of  bars  plotted 
is  controlled  by  the  variable  QB.  QB  =  0  plots  one 
bar;  QB  =  1  plots  two  bars,  etc.  The  maximum 
value  of  QB  is  20,  which  will  plot  21  bars  scaled  to 
the  values  stored  in  Y{Z,0),  Y(Z,1),  Y(Z,2)  -  up  to 
Y(Z,20).  If  either  Z  or  QB  is  greater  than  ten,  it  is 
mandatory  to  use  a  DIM  statement  at  the  begin- 
ning of  the  program  to  DIMension  the  Y  array. 
Even  if  they  are  both  less  than  ten,  it's  still  good 
programming  to  DIMension  to  save  memory. 

3.  Title  and  legend.  Up  to  88  characters  of 
title  can  be  printed  on  the  top  four  lines  by  creating 
a  string  variable  QT$.  Likewise,  up  to  44  characters 
of  legend  can  be  printed  on  the  bottom  two  lines 
with  QL$.  [Note:  The  44th  character  of  QL$  can  be 
used  only  with  a  trick.  For  example,  if  the  last 
word  is  MONTH,  end  QL$  with  the  sequence 
",,,MONH(LEFTKINST}T".  Otherwise,  the  top 
of  the  display  will  roll  up  and  off.  This  sequence 
is  only  needed  for  exactly  44  characters.] 

4.  Bar  color  options.  Bar  colors  are  controlled 
with  the  standard  VIC  POKE  codes  for  colors 
(which  are  one  number  lower  than  that  color  key 
on  the  keyboard).  For  example,  the  code  for  black 
is  zero,  and  black  is  the  standard  color  for  the 
bars.  The  color  control  variables  are  QO  and  Ql. 
By  assigning  nonzero  values  to  one  or  both,  you 
can  do  the  following: 

•  AH  bars  one  color:  assign  the  same  color  to 
QO  and  Ql .  Example:  QO  =  6:  Ql  =  6  will  result 
in  all  blue  bars. 

•  Up  bars  one  color,  down  bars  another:  as- 
sign the  color  for  the  up  bars  to  QO,  and  the 
color  for  the  down  bars  to  Ql.  Example: 

QO  =  0:  Ql  =  4  will  result  in  black  bars  pointing 
up  and  purple  bars  pointing  down. 

•  Bars  alternating  colors:  if  either  QO,  Ql,  or 
both  are  given  a  minus  sign,  then  ABS(QO)  is 
the  color  of  the  even  bars  and  ABS(Ql)  is  the 
color  of  the  odd  bars.  Example:  QO  =  6: 

Ql  =  -7  will  result  in  bars  alternating  between 
blue  and  yellow. 

5.  Bar  spacing.  The  standard  option  provides 
bars  which  are  closely  spaced.  However,  if  QB  is 
assigned  a  negative  value,  the  bars  will  be  plotted 
with  a  space  between  them.  The  maximum  nega- 
tive value  allowed  is  ten  (QB  =  -10),  which  will 
plot  11  bars  separated  by  10  spaces.  In  addition,  if 
the  alternating  bar  colors  option  is  chosen  at  the 
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same  time  that  QB  is  negative,  the  bars  will  be 
plotted  in  closely  spaced  pairs  separated  by  open 
spaces.  Under  these  conditions,  the  maximum 
negative  value  allowed  is  13  (QB  =  -13),  which  will 
plot  seven  pairs  (14  bars)  separated  by  six  spaces. 

6.  Graph  centering.  The  graph  is  normally 
positioned  against  the  right  edge  of  the  screen 
(standard).  You  can  move  it  to  the  left  n  spaces  by 
setting  QC  =  n. 

7.  Scale  factor  options.  The  options  for  the 
automatic  ranging  and  scaling  feature  are  con- 
trolled by  the  variable  QS.  The  standard  choice, 
QS  =  0,  will  always  produce  a  useful  graph  of  the 
data,  and  in  many  cases  the  result  can't  be  im- 
proved upon.  However,  sometimes  a  bar  graph 
can  be  done  in  a  different  way  that  makes  it  more 
informative.  After  all,  effective  chartmaking  will 
always  consider  the  reader,  the  data  being  com- 
pared, the  most  significant  facts,  and  so  on.  The 
optional  choices  for  QS  allow  you  to  have  a  scale 
offset  from  zero,  or  a  prespecified  scale.  You  can 
also  prescale  lists  of  values  before  doing  any  plots, 
which  is  desirable  for  merged  graphs  or  for  finding 
a  common  scale  for  several  graphs  in  sequence. 

Figures  3  and  4  illustrate  the  scale  offset  from 
zero.  The  graph  in  Figure  3  results  from  QS  =  0. 
Depending  on  the  circumstances,  this  may  be  the 
best  graph  for  this  data.  One  problem,  however, 
is  that  the  variations  are  small  compared  to  the 
length  of  the  bars.  If  the  variations  are  the  most 
important  characteristic  of  the  data,  then  Figure  4 
is  a  better  display.  This  is  achieved  by  making 
QS=  1.  The  scale  is  expanded  as  much  as  pos- 
sible -  times  ten,  in  this  case.  It  must  also  be  offset 
so  the  bottoms  of  the  bars  don't  reach  zero. 

If  you  were  the  chairman  of  a  charity  sale  and 
this  was  a  graph  of  yearly  results,  you'd  probably 
use  Figure  4  when  talking  to  your  committee  be- 
cause it's  easy  to  see  the  changes.  But  you  might 
use  Figure  3  in  the  final  report  because  it  doesn't 
exaggerate  the  bad  news  for  '83.  In  Figure  4,  the 
bar  for  '83  is  only  50  percent  as  high  as  '82,  but 
Figure  3  shows  the  true  proportion  -  93  percent. 
An  offset  scale  isn't  always  possible,  as,  for  ex- 
ample, when  the  list  includes  both  positive  and 
negative  numbers.  In  such  cases,  QS=  1  will  not 
have  any  special  effect  on  the  graph.  Figure  5  is  a 
graph  of  such  data. 

The  QS  =  2  option  allows  you  to  second-guess 
the  Automatic  Ranging  and  Scaling  Rules  by 
giving  starting  values  to  QX  and  QN.  These  two 
variables  store  the  maximum  and  minimum  values 
found  in  scanning  the  list  of  numbers  to  be  plotted. 
This  option,  in  effect,  allows  you  to  preassign  a 
particular  scale  or  a  particular  offset.  Study  the 
rules  under  "Automatic  Ranging  And  Scaling," 
and  then  experiment  to  master  this  option. 

The  prescaling  options,  QS  =  3,  4,  and  5,  are 
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the  same  as  QS  =  0,1,  and  2,  except  nothing  is  put 
on  the  screen.  But  the  maximum  value  (QX),  min- 
imum value  (QN),  scale  factor  (Q2),  upper-scale 
label  (QU),  and  lower-scale  label  (QD)  are  all  com- 
puted and  made  available  to  the  main  program. 
Our  final  program  uses  this  capability  to  combine 
Figures  1  and  2  into  one  graph.  It's  possible  to 
make  some  very  effective  displays  with  these 
options,  without  a  lot  of  programming. 

8.  Scale  labels.  You  can  suppress  the  printing 
of  the  scale  labels  within  the  subroutine  by  making 
QS  negative,  or  if  QS  =  0,  by  giving  it  a  value 
of-.l. 

Putting  It  Ail  Together 

Now  we're  ready  to  demonstrate  some  of  these 
optional  features  using  the  car  loan  example.  Pro- 
gram 1  merges  the  two  previous  bar  graphs  (Fig- 
ures 1  and  2)  into  one  display  using  two  bar  colors 
(see  Figure  6). 

Line  90  dimensions  the  Y  array  to  conserve 
memory.  If  we  don't  do  this,  the  BASIC  interpreter 
will  DIMension  it  Y(10,10)  by  default  and  tie  up 
455  extra  bytes  of  memory. 

We  discussed  lines  100-150  in  the  car  loan 
example.  Lines  160-190  prescale  the  Z  =  0  and 
Z  =  1  lists  and  then  create  a  merged  list  suitable 
for  graphing  on  a  common  scale.  The  merged  hst, 
in  Z  =  2,  contains  both  monthly  payment  and  fi- 
nance cost  data,  but  at  twelve-month  intervals, 
instead  of  six.  After  prescaling  each  old  list,  the 
values  are  divided  by  their  respective  scale  factors 
/or  combining  into  the  new  list.  As  a  result,  the 
numbers  in  the  new  list  are  all  in  the  range  of  0  to 
5,  instead  of  their  true  values.  Therefore,  we  sup- 
press the  printing  of  the  automatic  scale  labels 
and  overprint  with  the  labels  (QU)  obtained 
during  the  prescaling  calls.  As  you  can  see,  line 
160  prescales  the  Z  =  0  list,  and  line  170  prescales 
Z  =  1 ,  Line  180  puts  five  Z  =  0  values  into  the  Z  =  2 
list,  with  subscripts  (2,0),  (2,2),  (2,4),  (2,6),  and 
(2,8).  Line  190  puts  five  Z  =  1  values  into  subscripts 
(2,1),  (2,3),  (2,5),  (2,7),  and  (2,9). 

Line  200  establishes  the  optional  features  for 
the  bar  graph  by  assigning  values  to  control  vari- 
ables Z,  Ql,  QB,  QS,  and  QC.  You  should  be  able 
to  match  up  the  values  in  the  program  with  the 
features  in  the  graph. 

Lines  210-230  create  the  string  variables  for 
the  title  and  legend.  Notice  that  part  of  the  title 
uses  the  input  variables  for  the  amount  and  APR 
of  the  loan. 

The  scale  labels  we  need  for  this  graph  are 
special,  so  the  subroutine  labels  were  turned  off. 
In  line  9988,  you  can  GOSUB  to  your  own  sub- 
routine and  overprint  the  graph  with  anything 
you  wish.  In  our  program,  we  GOSUB  800-830. 
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Adding  The  Subroutine 
To  Your  Program 

There  are  several  ways  to  use  this  program  with 
your  own  programs,  but  the  easiest  is  to  plan 
ahead.  If  you  want  bar  graph  displays,  load  this 
program  into  memory  before  you  start  to  type  in 
your  main  program,  and  you've  got  it.  However, 
if  you  want  to  combine  the  bar  graph  subroutine 
with  a  program  that's  already  on  tape  or  disk, 
without  retyping  the  program,  here's  a  technique 
to  do  this  which  should  work  every  time.  It's  a 
slight  embellishment  of  Mark  Niggemann's 
method  (COMPUTE!,  March  1983,  p.  210). 

Let's  assume  that  you  have  a  copy  of  the  bar 
graph  subroutine  (Program  2)  saved  on  tape  or 
disk  with  a  filename  "BARSUB",  and  that  you 
have  a  main  program  we'll  call  PROGAalso  saved. 
You  want  to  improve  PROGA  by  adding  bar  graph 
capability.  First  of  all,  the  program  cannot  have 
any  line  numbers  as  high  as  BARSUB's  line  num- 
bers. That  is,  they  must  be  below  9900.  In  the 
case  of  Program  1  in  this  article,  you  must  be  sure 
to  delete  line  9988  before  going  further.  LOAD 
PROGA  and  observe  the  line  number  restriction. 
Then  clear  the  screen  and  type: 

?PEEK(43),PEEK(44) 

RETURN  and  write  down  the  two  answers, 
which  make  up  the  start-of-BASIC  memory 
pointer.  On  an  unexpanded  VIC,  they'll  be  1  and 
16  (location  1  on  page  16).  The  trick  is  to  change 
the  Start  pointer  to  be  two  less  than  the  current 
value  of  the  End  pointer  in  45  and  46.  A  reliable 
way  to  do  this  is  to  type  in  the  following  in  direct 
mode  (no  line  number)  and  hit  RETURN: 

A  =  PEEK(45)  +  256*PEEK(46)-2:B  =  INT(  A/256): 
POKE43,A-256*B:POKE44,B 

Then  proceed: 

LOAD"BARSUB" 

PRESS  PLAY  ON  TAPE 

OK 

SEARCHING  FOR  BARSUB 

FOUND  BARSUB 

LOADING 

READY. 

Finally,  POKE  the  numbers  you  wrote  down 
back  into  memory.  For  the  unexpanded  VIC,  for 
example: 

POKE43,l:POKE44,16 

At  this  point  you  have  combined  the  two  pro- 
grams and  are  ready  to  proceed  with  debugging. 

A  Look  At  The  Program 

The  bar  graph  subroutine  adds  2300  bytes  to  the 
main  program.  That's  not  including  the  Y  array 
and  the  part  of  the  main  program  that  gets  ready 
to  call  the  subroutine.  Even  so,  a  worthwhile  pro- 
gram will  still  fit  in  a  5K  unexpanded  VIC.  Our 


MPI  INTRODUCES  SUPER  ACTION  MEMORY 
EXPANDER  BOARD  FOR  VIC  20* 

Adds  24K  and  3  Expansion  Slots  With  Switches  and  Fuse  $109.95 

'  INTRODUCTORY  PRICE 


(Expandable  To  35K  By  Simply  Adding  Memory  Chips  and  Switches) 

Tested 


Fuse 


Pf 


i$io9.95  ,,co.-^^-';:r.-;--/";,^, 

Troos'®'         „rie  se"  K,rotect  ^"^   MlBoOf'^ 

24K  BOARD  FEATURES:  EVO"  .*/rrte "'  '^" 

•Adds  24K  MemCMV  (29K  with  VIC  5K). 

"Upgrdde  Boord  to  35K  by  adding  iC's  and  switches. 

*  Memory  switchabie  in  8K  sections.  (No  need  to  remove  memory  tMxird  to 

mn  your  otfwr  progroms). 

•3  expansion  slots  witn  switches  (for  gome  or  BKtta  ulility  cartridges). 
■Reset  button  allows  restarting  computer  wittiout  turning  power  off. 
■.5  omp fuse  profecfer). 
'Switch  relocates  expansion  cartridges  in  memory  so  ttiat  it  con  be  saved  on 

tape  as  a  badiup  for  your  valuoHe  progroms.  (Tfie  unexpanded  VIC  will  not 

allow  cartrlQges  to  be  savea  on  tope). 
■Write  protect  switches  allow  programs  stofed  in  RAM  at  ROM  location  or 

entire  Memory  to  be  protected  ogoinst  occidentnl  write. 
'Switch  allows  memory  to  be  moved  between  RAM  and  ROM  locotfon. 

(Useful  for  developing  your  own  gomes  and  saying  on  tape). 
"Gold  plated  cdrd  edge  connector. 
■  No  ottier  memory  expansion  needed. 
•Easily  plugs  into  your  viC,  no  modificafions  necessary. 

Saves  wecf  on  your  VIC  20  since  board  never  needs  to  be 

removed  or  power  hjrned  off  ond  on  to  run  ottier  tapes 

or  cartridges. 

■Opttonol  35K  memory  (40K  witti  VIC*  5K). 


FOC 


;torV 


iins' 


CC^jPfion^ 


iHUstf*- 


oiecl 


;ted 


Res' 


etS' 


^^itcn 


Plowed  Above- 
Action  Boad  Witt)  all  options 


24K  memory,  3  exponslon  slots,  switches ossembled and  tested $109.95 

Same  os  above  wittv  sockets  thol  allow  you  to  later  odd  your  own  memory  chips  to 
bring  memory  from  24K  to  35K  , S124.95 

Full  35K  memory.  3  expansion  slots,  3K  expander  mode,  eprom  socket 
(switch  selectable  between  BLK  3  &  BLK  5)  ond  all  switches  assembled  and  tested 
(eprom  nofincluded) .$149.95 

Bore  35K  boord  witri  complete  instajction  and  ports  list $39.95 

ORDERS 


COD 
B16   444  4651 
MIDWEST  PERIPHERAL  INDUSTRIES 


Add  S5  for  shipping  and  handling 

Mo.  residents  add  5Vi  %  sales  tux 
Send  check  or  money  order  to 

MPI 

Box  8123-B 

Kansas  City,  MO  64112 


.VIC  20"  is  0  registered  trademark  of  Commodore. 


J 


■Th8 
Original" 


15-Day 

Money  BKk 

The  « 

"GAME  MACHINE' 


THE  FINEST 

EXPANS-I=:0-N 
CHASSIS 

lor  tli« 

VIC-20* 


"Since 
1981" 


6-Monlh 
Warranty 


.,.,.S85 


G^lltrlS  -  Fully  butrered 

Plug  m  up  to  E  GAMES  or  Electromcs. 

MEMOflY  PACKS  \t\tti  ZmWtfl 
StJed  adi  lepiTitety  or  AESET 

^in  canbi nation 


PFUQ  In  DP  ID  4CIK  RAM  ird  all  Mher  PACKS 
lliai  ire  ivaWiblt.  (Can  b«  daisy  chiinedl 

•  Nnnory  Protein  Included 

«  Fullv  Bunered  Ipmtni  mHnory  OropoiEtsI 

•  Fuu  Protedtan        •  large  iwltdiet 

•  Ri^ld  suppon  •  ti\ui  other  prnt.  ivilt. 

IN  STOCK  InacdiiU  Mlivin 

Sind  MoniT  DrW  tsd  wi  gqi  )ti|  tMpfing. 

-^WDEH  TDDAt- 


jMCAVISAaccipltdl 

Call:  (415)  651-3160 

PARSEC  RESEARCH 

Drawer  1766- C 

Fremont,  CA  94538 

*  Dealer  inquirlQ  inviled  * 


\ferbatim 

flexible  disks 

Call  Free  (800)  235-4137  for 

prices  and  information.  Dealer 

inquiries  invited.  C.O-D.  and 

charge  cards  accepted. 

PACIFIC 
EXCHANGES 

100  Foothill  Blvd 
San  Luis  Obispo.  CA 
93401    InCal.  call 
(8001  592-5935  or 
(805)  543-1037 


LEROY'S  CHEATSHEET 
KEYBOARD  OVERLAYS 
FOR  YOUR  VIC-20" 


AT  LAST!  The  informalion  you  need,  at  yourlingerlips.  without  going 
back  to  the  manual-    No  need  lomemoriie  commands.     These 
durable  plaslic  coated  overlays  are  designed  lor  use  by  hrsi  lime 
users,  amaieur  enthusiasts. and  trained  profussionals.  Each  overlay 
contains  program  starting  locations,  function  key  labeling,  commands 
and  warnings  in  bold  letters,  and  aOditional  helpful  aids  in  center 

cutout,  DON'T  aCLAY-U/ULTOOAr 


Pfease  send  me  the  lollowiiK.j  Leroy's  Chealsheel"    keyboard  overlays 


□  Programmer's   Aid' 

□  Vicmon' 

n  Super  Expander' 

Q  Vic  Typewriter' 

□  Victerm   r 


D  Graphic  Prmler  11515  &  1525)' 

□  UM1  Wordcratt  20', 

□  HES  Writer' 

□  HES  Vic  Forth' 


Send  c^leGk  or  money  order  plus  S2.00    (postage  and  handling) 
PA  restdenls  add  6%  sales  tax. 


City- 


Stale- 


Zip. 


s  cl  CQn.rio>1otv  B 
i  at  Humjin  Engini 


nei.  tnz     Ul  Piatiuci  ol  Un,Tea  M.cfa«afe  Induaii.cs.  iic 
fiZ-70  1%  a  Tradamirh  qI  CvmHarv  Bu&ir««  Momrtei.  Inc 


CHEATSHEET  PRODUCTS"        ^ 

R  O.  Box  8299    Pittsburgh  PA.    15218 
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Figure  1: 

Car  Loan  Analysis  -  Monthly  Payment 


Figure  2: 

Car  Loan  Analysis  -  Total  Finance  Cost 


2S00 


0 


1 


12      3^5: 


Figure  3:  standard  Scale 


Figure  4:  Expanded  Scale  With  Oftset 


SAME       I>f=iTt=t      FiS      RIO      2B 


SAME       r>ATFi      AS      F-I<3      2ft 


Figure  5:  Figure  6:  Car  Loan  Analysis  -Total  Cost 

Scale  Including  Both  Positive  And  Negative  (Combines  graphs  from  Figures  1  and  2.) 

Numbers 
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NEW! 

Universal  Input/Otttput 

Board  for  VIC-20/64 


16-channeI  A'D  conver- 
ters l-channel  D/Aoutput:  16high-cur- 
rent  discrete  outputs. 
•  University  physics  &  electrical  en- 
gineering labs  and  hospital  applica- 
iions. 


VIC-20  wes  MW.311V S20S.00 

CBM-64  uses  MW-311C $225.00 


> 


MW-302:  VIC-20/64 
Parallel  Printer  Interface. 


-< 


36-pin  connector 


Works  witti  all  Centronics  type  parallel 
matrix  &  letter  printers  and  plotters — 
Epson,  C.ltoti,  Okidata,  Nee.  Gemini 
10,  TP-I  Smitti  Corona,  and  most 
others.  Hardware  driven;  works  off  the 
serial  port.  Quality  construction:  Steel 
DIN  connectors  &  shielded  cables.  Has 
these  switch  selectable  options:  Device 
4.  5,  6  or  7;  ASCII  or  PET  ASCII;  7-bi1 
or  8-bit  output;  upper  &  lower  case  or 
upper  only.  Recommended  by  PRO- 
FESSIONAL SOFTWARE  for  WordPro 
3  Plus  for  the  64,  and  by  City  Software 
(or  Paperclip. 

MW-302 S119.95 


> 


Micro  World  Electronix,  Inc. 

3333  S.  Wadsworth  Blvd.  #C105, 

Lakewood,  CO  80227 

(303)  987-9532  or  987-2671 

V 


< 


FREE 


WRITE  FOR  FREE  CS| 
CATALOG  OF  VIC  20 
and  CMB  64  PRODUCTS 

•  SOFTWARE 

•  HARDWARE 

•  PROGRAMMING  AIDS 

•  OPERATIONAL  AIDS 

•  SUPPLIES 

•  MEDIA 

•  BOOKS 


rOMPATIBLE 
SYSTEMS 

I  NCORPORATED 

P.O.  Box  2070  •  Dept.  C 

Saratoga,  CA  95070 

(408)  255-2024 


B4K    IVIEIVIORY 
FOR  THE  «VIC  20? 

YES,  ITS  HERE! 


ANNOUNCES 
THE  ULTIMATE  *VIC  20  MEMORY! 

THE  B4KV  WEMOPy  EXPANSION  MODULE 
W/24K  OF  NORMAL  EXPANSION  +  40K  ADD'L 
FOR  PROGRAM  OR  DATA  STORAGE.  BOOSTS 
MEMORY  TO  ALMOST  70.000  BYTES'  THIS 
■lOK  IS  PAGED  IN  OR  OUT  IN  BK  BLOCKS  WITH 
A  SINGLE  POKE  INSTR.  THE  B4KV  USES 
STATE  OF  THE  ART  DYNAMIC  RAMS  WITH 
TRANSPARENT  REFRESH.  ALL  BK  BLOCKS 
ARE  SWITCH  SELECTABLE  AND  WfllTE  PRO- 
TECTABLE. THE  ENTIRE  UNIT  DRAWS  ONLY 
250  MA  THE  54  KV  HAS  A  GOLD  PLJVTED 
EDGE  CONNECTOR  AND  IS  HOUSED  IN  A  DIS- 
TINCTIVE BLACK  CASE.  PLUGS  DIRECTLY 
INTO  EXP  PORT  ALL  THIS  AT  A  PRICE  YOU 
CAN  AFFORD. 

0NLYS149.95 

[SHIPPING  AND  HANDLING  INCLUDEOl 

90  DAY  LIMITED  WARRANTY 
OHIO  RESIDENTS  ADD  5%  SALES  TAX 

LETCO 

7310  WELLS  RD 

PLAIN  CITY,  CH,  43064  DEPT.  CM 

1-614-873-4410 


NAME. 


ZIP  COM 

WE  ACCEPT  VISA  CR  MASTERCARD.  PLEASE  INCLUDE 
CARD  NO    EXP    DATE  AND  SIGN 
•VIC  20  IS  a  REG   TM   OF  C  B  M   INC 


VIController 

HOME  CONTROL  SYSTEM  FOR  THE  VIC  20  &  CBM  64 

•  Control  up  to  256  lights  &  appliances 

•  9  levels  of  brightness 

•  Manual  &  time  control  software 


59 


95 


SQ96 


•  Uses  BSR  remote  switches  ONLY 

•  Plugs  into  user  port 
EXTENDEDTIME  CONTROL  PROGRAM  FOR  CBM  64 

COMvoice 

NEW  SPEECH  SYNTHESIZER  FOR  VIC  20  &  CBM  64 

•  Unlimited  Vocabulary 

•  Automatic  English  to  Speech  Conversion 

•  New  BASIC  Command  "SPEAK" 

•  Will  Speak  String  Variables 

•  Speaks  with  Four  Levels  of  Inflection  ^       mfXQR 

•  Plugs  into  Expansion  Port  ONLY     1  49 

•  Built  in  Audio  Jack 

AS  EASY  TO  USE  AS  A  PRINT  STATEMENT! 

Call  (215>  861-0850  to  order 

MasterCard  or  Visa  Accepted 

1444  Linden  Street,  Bethlehem,  PA  18018 

IGENESIG! 

I  COMPUTER   CORPORATION! 


Automatic  Ranging  And  Scaling  Rules 


The  bar  graph  subroutine  follows  a  set  of 
automatic  ranging  and  scaling  rules  in  the 
process  of  making  the  graph.  The  entire  scale 
consists  of  six  lines  outlining  five  intervals. 
The  value  represented  by  one  interval  is 
called  the  scale  factor.  For  example,  in  Figure 
4  there  are  six  lines  representing  600,  620, 
640,  660,  680,  and  700.  Each  interval  between 
lines  represents  20,  which  is  the  scale  factor. 

These  are  the  rules  the  subroutine  fol- 
lows to  decide  on  the  scale  factor  and  the 
values  for  the  scale  lines: 

1.  The  maximum  value,  QX,  is  the  most 
positive,  or  failing  that,  the  least  negative 
value  in  the  list  of  bars.  Likewise,  the  mini- 
mum value,  QN,  is  the  most  negative,  or, 
failing  that,  the  least  positive. 

2.  The  scale  factor  will  be  1,  2,  or  5  times 
10"  where  n  is  a  positive  or  negative  integer, 
or  0.  (If  n  is  0,  10"  is  1.)  Typical  scale  factors 
would  be  5,  .02,  1000,  lE-6. 

3.  The  values  of  the  scale  lines  must  be 
multiples  of  the  scale  factor,  or  zero. 

4.  The  scale  factor  will  be  the  smallest 
number  possible,  so  that  the  full  scale  will 
include  the  maximum  and  minimum  values, 
QX  and  QN.  For  the  standard  scale  option, 
QS  =  0  or  3,  the  full  scale  must  include  zero. 


Therefore,  QX  and  QN  are  given  starting 
values  of  zero  before  scanning  the  list  of  Y 
values. 

5.  For  the  QS  =  1  or  4  ophon,  QX  and 
QN  will  be  given  a  starting  value  equal  to 
Y(Z,0)  before  the  maximumy'minimum  scan. 
This  will  result  in  an  expanded  scale,  with 
three  exceptions: 

•  If  all  Y  values  are  identical,  an  ex- 
panded scale  is  possible,  but  the  auto- 
matic rules  can't  decide  on  one. 

•  If  the  Y  list  contains  both  positive 
and  negative  values,  the  scale  cannot  be 
expanded. 

•  If  the  maximum  and  minimum  values 
are  already  spread  out  over  the  normal 
scale,  the  scale  cannot  be  expanded. 

In  these  cases,  the  subroutine  will  work  as  if 
QS  =  0or3. 

6.  If  QS  =  2  or  5,  the  values  of  QX  and 
QN  at  the  time  of  GOSUB9900  are  carried 
into  the  subroutine,  and  the  rules  are  fol- 
lowed on  that  basis.  This  allows  you  to  choose 
your  own  scale  factor  or  offset.  However,  if 
the  data  in  the  list  won't  fit  your  scale,  the 
scale  will  automatically  be  changed  to  fit  the 
data. 


final  example,  which  generated  Figure  6,  left  205 
bytes  free  after  RUNning.  To  keep  the  subroutine 
memory  size  to  2300  bytes,  be  sure  to  omit  all 
REMarks  and  spaces  (except  inside  quotes)  when 
typing  the  program. 

Program  1: 

Car  Loan  Application  For  Bar  Graph 

90  DIMY(2,9) 

100  input"{clr1amnt,apr";am,ar 

110  MR=AR/1200 

120  FORI=0TOa:N=6*(l+2):REM  N=12  TO  60  BY 

6'S 
130  Y(0,l)=AM*MR/(I-Cl+MR)t-N) 
140  Yd,  I)=N*YC0,I)-AM 
150  NEXTI:QB=8 

160  QS=3 : Z=0 :GOSUB9900 :U0=QU : Z0=QZ 
170  Z=1:GOSUB9900:U1=QU:Z1=QZ 
180  FORI=0TO4:Y(2,2*I)=Y(0,2*I)/Z0 
190  Y(2,2*I+1)=Y{1,2*I)/Z1:NEXT 
200  Z=2:QB=-9:Q1=-4:QS=-.1:QC=3 
210  Tl$="{3  SPACES} INSTALLMENT  LOAN 

{3  SPACES  1" 
220  QT$=T15+"U  SPACES }$"+STR$( AM) +  "@"+ST 

R$(AR)+"%" 
230  QL?="(4  SPACES}1{2  SPACES}2[2  SPACES) 

3 {2  SPACES} 4{2  SPACES}5(13  SPACES} YEA 

RS" 
240  GOSUB9900;GOTO100 


800  T2$="{BLKjMON  PAYMT { 5  SPACES) { PUR} FIN 

COST  " 
810  T3$="{BLK}?"+MID$(STR$CU0),2) :T4$=" 
{ PUR) 5 "+MID$ ( STR$ ( Ul ) , 2 ) 

820  PRINT" (home) "SPC{44)T2$SPC(22)T3$TAB( 
23-LEN(T4$ ) )T4$SPC ( 2  55 ) SPC{ 54 ) " {BLK} $ 
0 "SPC (16 ) " { PUR } $0 { BLU 1 " 

830  RETURN 

840  REM  ADD  LINE  9988  AFTER  PROGRAM  2  IS 
{SPACE) IN  MEMORY  1 

9988  GOSUB800 

Program  2:  Bar  Graph  Subroutine 

9899  REM  HI-PRECISION  NORMALIZE 

9900  DEF  FNQ(X)=SGN(X)*INT(ABS{X)/Q9*(1E5 
+1E-3) )/lE5 

9901  REM  COLOR  AND  QB  CONTROL 

9902  Q2=-(Q1<0)OR-(Q0<0) ;Q5=1:IFQB<0THENQ 
5=2-.5*Q2 

9903  Q8=INT(20/q5) :IFABS(QB) <Q8THENQ8=ABS 
(QB) 

9904  REM  MAX/MIN  SCAN 

9905  QD=0 : IF ( ABS (QS ) =10RABS ( QS ) =4 )THENQX= 
Y(Z,0):QN=Y(Z,0) 

9906  IF(ABS(QS)<10RftBS(QS)=30RQD=9)THENQX 
=0 : QN=0 

9908  FORQ=0TOQ8 : 1 FY { Z , Q ) >  QXTHENQX=Y ( Z , Q ) 
9910  IFY(Z,Q)<QNTHENQN=Y(Z,Q) 

9912  NEXT 

9913  REM  AUTO  RANGE/SCALE 

9914  QF=QX-QN:IFQF>0THEN9918 
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VIC-20*  AND  CBM-64*  OWNERS 

Our  products  have  the  features  you  need.  Whether  you  know  It  or  not! 

F 
D.  Champagne  Memory  an  a  Beer  Budgat 


A.  Dataspan-50  for  the  VIC-20* 

a)  5  sJois.  fully  buflered.  (use  prc1e:ted  and  master  reset  bitten 

bf  Combination  rotary  and  rocker  iwllcti  sel^ctabte  expansion 

bosrd  conveniently  i»]VBrE  all  iwitching  naedi  now  and  in  the 

future  witftout  using  common  hazardous  stot-by-stot  power 

switchiro. 

c)  independent  write  protiicttDn  on  two  stots 

Hatjipan  50  Kit J69.S5 

Haliipan-SQ  Aisenbted U4.SS 

B.  Dataspan-B4  for  the  CBM  64* 

at  3  sinTs.  tuse  protected,  and  master  reset  button. 

h)  Rotary  sv.  lien  convenience.  Choose  any  slot,  the  first  two.  or 
ail  ttiree. 

c)  Exctuslve  buffered  eiectranic  switching 

DstJipjii-W  Kit U9.SS 

0(tup)it-M  Autmblid S59.95 

C.  DatsspaR-30  for  the  VIC-20* 

at  3  slots,  fuse  protected,  and  master  reset  button. 

1*1  Rotary  switch  convenience.  Choose  ar^y  stot.  the  first  two,  or 
altthree. 

c|  Independent  write  protectim  on  two  stots. 

(jBtaipin.30  Kit »34.9S 

Oiliipin-30  (issentbled M4.S5 

"Close  Out "  Dstaspan-^ 
5  Slot  VIC-30'  expansion  board. 

Ctataspin-ZO  Kit $4a85 

DBliipih'ZO  tsientbleil $S4.9S 

Kits  for  ExpetiancQd  Buildors  oni/! 

All  assembted  units  fiave  futi  90-fDBy  Limited  Guarantee. 

•Trademarlt  Commodore  Bus.  Wacfiines 

HOTES:These  prices  are  subject  to  change  without  notice.  All  t<its 
supplier^  with  rantptete  asaenihiy  anit  operating  Iftttrurttions. 


Highest  qtJ^litygUssepaxylGK  memory  board  with  gold  lingers 
provides  full  blocl<  switching  and  write-prolection  on  eacfl  6K 
block  Alt  block  switches  ar€  convenlentty  located  at  the  top  eitge 
of  the  hoard. 
OataRAM 

i]  Bare  memory  beard  IRAMMMj $13.S5 

b|  Bare  rremory  ttoard  Kit —   $17.35 

IncEudex  all  componenls  except  RAM/RDM  ehlpa 

DataRAM  8 

c)  Board  with  SK  RAN  -  Cotcplela  Kit $34.99 

d|  Board  with  BK  RAM  Atieatbtnl  S37.S5 

(Suggested  Retail  Price  Assembled    $47.96) 

DataRAM  IE 

e)  Board  with  IGK  RAM  -  CootplMt  Kit $48.95 

f  j  Board  with  IBK  RAM  Auemblarl $54.95 

(Suggested  Retail  Price  Assembled    S69.95) 

L  Datablast-16 

Finally  a  low  cost,  high  quality  2716  EPROM  programmer  tor  the 
VIC-2(i!  Put  your  most  often  used  machine  language  programs 
into  EPROWs 

•  On-board  25  volt  power  supply. 

•  Can  be  used  with  COMPUTEI's.  "Micromon"  or 
our  software  below, 

•  Program/read  mode  switchr. 

•  We  suggest  you  use  the  EPROMs  with  our  DataRAM 
memory  board. 

•  Zero  insertion  force  socket. 

Oalablast-IG 

!   Kit $48.95 

b    AmmbW  $59,95 

c   Softwari  tor  Oalabtait-ie  Itapel $9.35 

III  27I8EPR0MI $  4.50 

Digital  Interface  Systems  Co. 

P.O.  Box  8715 

Portland,  OR  97207 

(503)230-1130 

SEE  VOUfl  DEALER  OH  ORDEfl  FACTORY  HRECT 

TEBmS:  No  CO.D.  orders.  Shipping  and  Handling  $3.00 
VtSA/MASTERCARD  ■  Add  3%  f^ost  orders  shipped  within 
48  hours.  (Personal  checks  —  atlow  2  weeks  to  ctear) 


Protect  your  Irivatlmgiit  twllh  otir  ibHtirirB  baclHjp  produili 

F.  CB-2  for  the  VIC-ZO*  &  CBM-64* 

The  CB-2  is  a  complete  hardware  package  that  allows  you  to 
easily  and  efficientty  make  a  back-up  copy  of  your  cassette 
software  tibrary. 
Unique  features: 

•  Allows  connection  tor  one  or  two  Datasette'  recorders  (or 
equivalent).  Two  recorders  required  for  ifnpfe  back-u  p  copies. 

•  Exctusive  state-of-the-art  circuitry  tels  you  iittuMly  htar  and 
aee  tape  data  being  loaded  or  saved. 

CB-2  Asaetitbled,  Only $39.95 

G.  "Super  Blocksaver" 

Sollware  and  interlace  card  for  back-up  copies  of  VIC-JO' 
cartridges,  Additionat  m,Emory  required.  (Specify  cartridge  to 

tape  or  disk)  $3435 

CBM'H'  CaRrldge  flack-up  Syalein  Call 

H.  Mother  Switcher 

Now  make  any  hare  bones  expansion  board  fuity  btock  sefectabte. 

•  Master  reset  button. 

■  Write-protection  switch. 

•  Cartridges  piggyback  on  Mother  Switcher. 

Mollisr  SwItchBr  Asienttled.  Only 

BAMcharger 

1  yourCommoi 
Fuil  block  switching  capabilities. 


i\3SB 


Turn  your  Commodore  8K  cartridge  into  a  luff  16K  cartridge. 

~_"  _      anal 

Sockets  alfow  fulur'e  Ef'ROM  substitution. 


RAHcharger  Kit . 


^DOUBLES  DISKETTE 
STORAGE  SPACE!! 

REDUCE  YOUR  DISKETTE 
COSTS  BY  50% 


'The  back  of 
your  SVa"  single 
sided  diskette 
lias  recording 
medium.  All  you 
need  is  an 
ACCURATELY 
placed  "write 
enable  notch" 

to  USE  IT,  on  many  systems. 

MUmUEMmiM'  is  a  precision 

engineered  tool  designed  for 

this  purpose. 

irS  A  MONEY  SAVER! 
IT'S  A  TIME  SAVER! 


$14.95 


Add  $1.50  Poslage/Handling 
($4.50  Foreign) 
—  Florida  Residents  Add  5%  Sales  Tax  — 
ORDER  TODAYI 

SEND  CHECK  OR  f^ONEY  ORDER  TO: 

Division  of  Cortran  Intemational 
4211  N.W.  75th  Terrace,  Dept.  1210 
Lauderhill,  Florida  33319 


immeaiate  shipment 


HUNDREDS  OF  PROGRAMS 

AVAILADLEFORTHE 
COMMODORE  64  &  VIC  20 


Avalon-Hitl  ■  HES  •  Epyx  •  Spinnaker  •  Infocom 

Abacus  •  Sirius  •  Broderbund  •  Victory  •  Toll 

and  much  more 

ALL  PRICES  UP  TO  30"/,  BELOW  RETAIL!! 

OUR 

RETAIL  PRII;ES 

65.D0  47,50 

39.95  29,95 

125.fW  9e,?5 

3995  29,95 

39,95  29,95 

39,95  29-95 

«.95  37.50 

39.95  29.95 

34.95  26.25 

29,95  2250 


Quick  Brown  Fox  (64  or  VfC  20) 
Hesmon(64  or  VIC  20) 
Paper  Clip  (CBM  64)  (D) 
JumpmanlDorCassI 
Temple  of  Apshai  10) 
ZorkI,  II,  Orlll(D) 
Deadline  <0) 
Starcross  (D) 
Pacemaker  (Dl 
KindercompID) 


ACCESSORtES  AVAILABLE  JtLSQ 
Monitors  •  Printers  •  Expansion  Boards 
CARDCO 
Cariiboard/Sslot  39  95      3195 

Cardco  Parallel  Printer  Interface       79,95      63  95 
DATA  20 
Video  Pak(BK  mem,,  W/80col. 
includes  free  word  processor)      149,95     119.95 

Many  more  products  afso  avaiiable 
for  APPLE,  ATARI,  CP/M,  IBM  P/C 


Write  or  call  lor  FREE  CATALOG 
TO  ORDER:  CALL  1-714-951-5596 

8:00  A.M,  ■  8:00  P.M.  PST  Mon.-Sjl 

or  ufiij  cfiack  or  crtdit  ciri)  no,,  ilgnitura.  S  <ip,  diu 

■    CENTURY  MICRO  PRODUCTS 
P.O.  Box  2520 
Mission  Viejo.  CA  92690 

Vlu/Matlercanl  add  3V  Perianal  ctiackt  allDW  2 


.and  liandling  add  S3.00  Ihirdwire  eKtn). 
sublet:!  lo  change. 


/Hicro 


Clear 


USER  C0IV1PATIBLE  SOFTWARE 

FOR  YOUR  VIC  20  or  '64 

Featuring  •   FORfMATTEIJ  SCREENS 

•  SELECTIVE  RECALL  TO 
SCREEN  OR  PRINTER 

•  ADD.  DELETE,  REVIEW, 
UPDATE,  REPORT  FUNCTIONS 

THESIS  MASTER 

Organizes  research!  notes  and  creates 
bibliographv-    Report  generator  witti 
three  level  sort/select.    Large  text 
area,   VIC  requires  8K  expansion, 

DISK  ONLY  S29,95 

STAMP  COLLECTOR 

Con^puterize  your  collection.   Ideal  for 
beginners  and  experts.    Store  up  to  14 
fields  for  eacfi  issue  including  muliiple 
cat,  nos.,  cat,  value,  cond,.  perf,,  wtmk, 
color,   VIC  requires  3K  expansion, 
DISK  OR  TAPE  (Specifvl  S29,95 

HOME  LIBRARIAN 

For  tfie  collector  and  avid  reader.  Random 
access  to  your  own  electronic  card 
catalogue,   VIC  requires  8K  expansion. 
DISK  ONLY  $29,95 

Send  check  or  money  order  +  SI  ,50  p/h  to: 

MlcroClear  -  P.O.  Box  9368 

Raytown,  MO   64133 

IVIissouri  residents  add  5,625%  sales  tax 

Specify  VIC  or  '64 

DEALER  INQUIRIES  INVITED 


9915  IFQX=0THENQU=5 : QD=0 : QR=0 : QZ=1 : GOT099 
42 

9916  QD=9:GOTO9906 

9918  QL=INT(LOG(QF)/loG(10) ) :G0SUB9996:QP 

=FNQ(QF) :QY=.5:IFQP>2.5THENQY=1 
9920  IFQP>5THENQY=2 
9922  IFQP=1THENQY=.2 

9924  GOSUB9996:Q3=FNQ(QX) :Q4=FNQ(QN) 

9925  QU=-INT(-Q3/QY) : QD=INT(Q4/QY) 

9926  IFQD>=0THENQR=0:QU=QD+5 :GOT09934 
9928  IFQU<=0THENQR=5:QD=QU-5:GOTO9934 
9930  IFQ3+Q4>0THENQU=QD+5:QR=-QD:GOTO9934 
9932  QD=QU-5:QR=-QD 

9934  IFQ3/QY<=QUANDQ4/QY>=QDTHEN9938 

993  5  QY=QY*2+3.5*(QY=2)-.l*(QY=.2) :IFQY=. 

5ANDQP  > 1THENQL=QL+1 
9936  G0T09924 
9938  QZ=QY*Q9:QS$="" 

9940  QO=24*QD*(QD>0)-24*QU*(QU<0) :QU=QU*Q 
Z:QD=QD*QZ 

9941  IFQS=>0THENQS$=MID$ ( STR? (QU ) , 1- (QU=> 
0)) 

9942  IFABS(QS) >2THENRETURN:REM{4  SPACES ] I 
FTRUE,  NO  PLOT 

9943  REM  COLOR  FUNCTIONS 

9944  DEF  FNQT{X )=ABS (Ql ) * (Q2ANDXAND1 ) -ABS 
(Q0 ) *NOT- (Q2ANDXAND1 ) 

9945  DEF  FNQB(X)=ABS (Q0 ) * ( Q2ANDN0T (XANDl ) 
)-ABS(Ql)*N0T-(Q2ANDN0T(XANDl ) ) 

9946  PRINT "[CLR}";QT$; " [HOME]"; :Q3=INTCQ5 
*Q8) :IFQ3>19THENQ3=19 

9947  REM  BUILD  SCALE  LINES 

9 948  QA$= "0 " : QB5= "L " : FORQ=0TOQ3 : QA$=QA?  +  " 
ETi":QB$=QB$+"E@3":NEXT:Q3=Q:QW= 
20-Q3-ABS{QC) 

9950  QW=-QW*(QW>0) : QL=20-QW-Q3 :QA$=QA?+"P 
" :QB$=QB$+"@" :Q4=QW-LEN(QS? ) : 1FQ4>=0 
THEN9954 

9951  REM  PRINT  SCALE  &  LABELS 

9952  PRINTSPC(8B)QS? : PRINTSPC(QW) :QF=PEEK 
(646):GOT0995  5 

9954  PRINTSPC{110+Q4)QS$; :QF=PEEK( 646 ) 
995  5  PRINT" [GRN)"QA$SPC(QL) :FORQ=0TO12 : PR 

INTSPC(QW)"Eg3"SPC(Q3) "EmE"spc(q 

L ) : NEXT 
9956  PRINT "[home} "SPC(154) : F0RQ=4T01STEP- 

1 : IFQR>QTHENPRINTSPC ( 22 ) : GOTO9960 
9958  PRINTSPC(QW)QB?SPC(QL) : IFQR<QTHENPRI 

NTSPC{44):GOT09962 
9960  PRINTSPC(QW)QA$SPC(22+QL) 
9962  NEXT: IFQS=>0THEWQS5=MID5 {STR? (QD) , 1- 

(QD=>0)) 

9964  PRINTSPC(QW)QB?; : POKE646 , QF:PRINTSPC 
( QL) : Q4=QW-LEN { QS  $ ) : IFQ4  <0THENPRINTQ 
S5:GOT09967 

9965  PRINT"{UPJ "SPC(Q4 )QS$SPC (Q3+24+QL) 

9966  REM  Q3=START  SCREEN  RAMil2  SPACES ]Q4 
=COLOR  RAM  ADDER 

9967  Q3=256*PEEK(64B) : 04=37888+4* CPEEK( 36 
S66)AND128)-Q3 

9968  REM  ZERO  MARKER 

9969  IFQR>0ANDQR<5THENQP=Q3+418+QW-66*QR: 
POKEQP,223:POKEQP+22, 105 

9970  REM  COMPUTE  BAR  LENGTH  IN  PIXELS;  CO 
MPUTE  POKE  ORIGIN 

9971  FORQ=0TOQ8:QY=INT(24*ABS(Y(Z,Q) )/QZ) 
+Q0 

9972  QF=INT(QY/8) :QL=QY-8*QF: IFQY=0THENQL 
=  1 

9973  QP=Q3+419+QW-66*QR+INT(Q*Q5) :IF(Y(Z, 
Q) <0ORQR=5)THEN9982 
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9974  REM  POKE  "UP"  BARS 

9975  IFQF>0THENFORQP=QPTOQP-22*(QF-1)STEP 
-22 : POKEQP ,224: P0KEQP+Q4 , FNQT ( Q ) : NEX 
T 

9976  REM  Q%=CODES  FOR  UP  SEGMNTS 

9977  Q%(1)=100:Q%(2)=1H:Q%(3)=121:Q%(4)  = 
98:Q%(5)=248:Q%(6}=247:Q%{7)=227 

9978  IFQL>0THENPOKEQP,Q%(QL) : P0KEQP+Q4 , FN 
QT(Q) 

9980  GOT09987 

9981  REM  POKE  "DOWN"  BARS 

9982  QP=QP+22 : IFQF>0THENFORQP=QPTOQP+22  * ( 
OF-1 ) STEP22 : POKEQP ,224: P0KEQP+Q4 , FNQ 
B ( Q ) : NEXT 

9983  REM  Q%=CODES  FOR  OWN  SEGMNTS 

9984  Q%{1)=99:Q%(2)=119:Q%(3)=120:Q%{4}=2 
26:Q%(5)=249:Q?.C6)=239:Q%(7)=228 

9985  IFQL>0THENPOKEQP,Q%(QL) : P0KEQP+Q4 , FN 
QB(Q) 

9986  REM  END  BAR  LOOP; PRINT  LEGEND 

9987  NEXT:PRINTQL?TAB(43) 

9988  REM  GOSUB  OVERPRINT  HERE,  [9  SPACES  1 1 
F  DESIRED 

9989  REM  HOLD  DISPLAY;  TURN  ON  CURSOR 

9990  PRINT"{HOME}"SPC(255)SPC(2  50) :POKE20 
4,0 

9992  GETQ?: IFQ$=" "THEN9992 

9994  POKE207,0:POKE204,1: RETURN 

9995  REM  HI-PRECISION  EXPONENT  SUBROUTINE 

9996  Q9=l:0NSGN(QL)+lGOTO9999,9998 

9997  F0RQ=1T0-QL: Q9=Q9/10 : NEXT: RETURN 

9998  FORQ=1TOQL:Q9=Q9*10:NEXT 

9999  RETURN  © 
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DISCRIMIISATING  TASTES 


COSMIC  SPLIT 

You  have  to  defend  yourself  from  the  tri-legged  crea- 
tures attacking  the  planet  Their  hatcheries  keep  pro- 
ducing eggs,  which  you  must  destroy  to  control  the 
proliferation  of  the  creatures.  Fast  action  with  99  levels 
of  play.  Control  color  of  characters  and  background. 
Save  your  game  and  return  to  play. 

$39.95 

KRYSTALS  OF  ZONG 

Your  object  is  to  overcome  various  obstacles  and  over- 
power creatures  intent  on  stopping  you  as  you  progress 
on  your  quest  for  the  Krystals  of  Zong.  Quick  reactions 
will  be  necessary  if  you  are  to  succeed.  Clues  will  guide 
you.  Arcade  style  game,  with  adventure  game  over- 
tones. 

$29.95 

THE  AMULET 

The  princess  has  lost  the  amulet,  a  magical  necklace 
witii  seven  precious  stones.  In  order  to  defend  the  king- 
dom, you  must  recover  the  amulet,  searching  through 
swamps,  castles,  and  rivers  of  the  realm.  In  your  jour- 
ney, you  will  encounter  barbarians,  wizards,  knights, 
and  others  whose  mission  is  to  stop  you.  Graphics, 
sound  and  strategy  play  a  part  in  your  successful 


mission. 


$39.95 


PALADIN 

Sharpen  your  wits  and  rivet  your  attention  as  you 
engage  the  enemy  in  defender-like  action.  256  types 
of  intelligent  enemy  attacks.  Virtual  coordinate  accel- 
eration. 

$29.95 


TRI  GRAPH 

Try  your  hand  at  playing  Picasso-sketch  with  various 
colors  and  eight  sizes  of  brush  strokes.  Label  your 
sketches -create  charts-animate  characters-build 
shape/screen  libraries.  Full  64,000  bit  pixelation. 

$34.95 


TRi  SLUGGER  STATS 

End  the  tedious  procedure  of  keeping  Little  League 
and  Sofli?all  League  statistics.  This  statistics  package 
will  maintain  player  averages  and  records  and  team 
records.  Allows  you  to  rotate  your  players  and  eflFec- 
tively  manage  your  team.  Easily  learned  menus  and 
prompts  keep  you  involved  with  the  team  while  the 
computer  performs  your  statistical  tabulations  and 
reporting. 

-      $39,95 


Home  and  Business  Applications  Also-Inquire.    Dealer  Inquiries  Invited: 


International  THMicro 

4122  E.  Chapman,  Ste.  30 

Orange,' California  92669 

(714)  771^038 


International  TriMlcro 

904  West  Cypress  Drive 

Arlington  Heights.  IL  60005 

(312)  394-2322 


International  TriMicro 

901  Summit  Hill  Dr. 

Knoxville,  IN  37915 

(615)  522-4824 


64  CHARACTER  CREATOR 


Al  J.  Ockert 


TItis  menu-driven  utility  makes  it  easy  to  create,  modify, 
and  save  custom  characters.  Also,  the  program  calculates 
DATA  statements  for  your  neiv  characters  and  allows  a 
revieiv  of  your  creation  in  any  64  color. 


This  character  generator  program  moves  the  com- 
plete character  set  (256  characters)  into  RAM  and 
sets  up  the  screen  so  you  can  easily  redefine 
characters.  Up  to  128  characters  can  be  redefined  at 
any  one  time.  However,  the  reversed  (inverse  video) 
characters  cannot  be  redefined  without  modifying 
the  program. 

An  8x8  grid  will  be  drawn  on  the  screen.  By 
using  the  cursor  keys,  you  can  draw  any  character 
you  wish  to  create. 

With  single-key  commands,  all  of  which  are 
listed  next  to  the  grid  on  screen,  characters  can  be 
manipulated  for  a  variety  of  purposes.  When  you 
have  the  character  the  way  you  want  it,  the  D  com- 
mand will  display  the  DAIA  statement  containing 
your  new  character. 

After  you  have  redefined  as  many  characters  as 
you  wish  (up  to  128),  you  can  save  them  in  a  data 
file  by  using  the  S  command.  Preceding  all  the 
character  data  will  be  the  total  number  of  characters 
saved  in  that  data  file.  And  preceding  each  char- 
acter's data  will  be  the  key  code  of  that  character. 

The  next  time  you  run  the  program,  you  can 
load  all  the  characters  saved  in  a  data  file  by  using 
the  L  command.  The  program  is  set  up  for  tape 
files.  If  you  are  a  disk  drive  owner,  simply  substi- 
tute the  following  lines: 

640  IF  A5="L"THEN  OPEN! , 8, 0 ,N? :GOTO900 
645  OPEN1,8,1,N$:GOTO800 

Easy  Single-Key  Access 

WTien  the  program  is  first  run  after  the  ROM 
character  set  is  transferred  to  RAM  and  the  screen 
set  up,  the  program  initializes  the  C  (select  a  char- 
acter) command.  If  you  want  to  load  previously  de- 
fined characters  first,  select  any  character  to  get 
back  to  the  main  menu.  Then  select  the  L  (load) 
command. 

While  running  the  program,  you  can  view  the 
character  that  you  are  creating  in  the  Multi-CoIor 
Mode  (MCM)  by  selecting  the  M  (Multi-Color  ON) 
command.  All  the  characters  displayed  on  the 
screen  will  be  in  multicolor.  However,  only  the 
character  that  you  are  creating,  which  is  displayed 
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at  screen  location  1731,  will  change  when  you 
change  the  color  with  F7.  This  is  because  only  Color 
Memory  location  56003,  which  contains  the  color 
information  for  screen  location  1731,  is  changed 
with  the  F7  function  key. 

Also,  while  in  MCM,  the  redefined  character 
has  to  have  a  color  between  8  and  15  in  Color  RAM 
(CRAM)  to  be  in  MCM.  That  is,  if  the  color  code  is 
between  8  and  15  (orange  through  gray  3)  in  the 
CRAM,  then  the  bit  pairs  will  change  colors  as  the 
background  colors  BKG  #0  through  BKG  #2  are 
changed.  However,  if  the  color  code  in  CRAM  is 
from  0  to  7  (black  through  yellow),  then  the  re- 
defined character  will  be  displayed  only  in  that 
color. 

You  can  also  see  what  different  color  combina- 
tions look  like  by  changing  the  screen  background 
color  BKG  #0  using  the  Fl  function  key  and  chang- 
ing the  character  color  by  using  the  F7  function  key. 
When  the  three  background  colors  are  changed  by 
using  Fl,  F3,  and  F5,  respectively,  all  the  screen 
characters  change. 

The  bit  pair/color  register  format  is  displayed  in 
the  upper-right  corner  of  the  screen.  This  is  to  assist 
you  in  determining  what  color  the  bit  pair  will  have 
while  in  Multi-Color  Mode,  If  both  pixels  of  the  bit 
pair  are  off  (00),  the  screen  (BKG  #0)  register  color 
will  be  displayed  there. 

If  only  the  second  pixel  of  the  bit  pair  is  on  (01), 
background  #1  (BKG  #1)  register  color  wiU  be  dis- 
played for  the  bit  pair. 

If  only  the  first  pixel  of  the  bit  pair  is  on  (10), 
background  #2  (BKG  #2)  register  color  will  be  dis- 
played for  the  bit  pair. 

If  both  pixels  of  the  pair  are  on  (11),  the  Color 
Memory  (CRAM)  color  will  be  displayed  for  the  bit 
pair  —  but  only  in  screen  location  1731. 

After  you  have  created  a  few  characters,  by 
using  the  left  arrow  ( ^ )  command  you  can  break 
from  the  program  to  see  what  your  characters  look 
like  on  the  screen  in  different  combinations.  The 
screen  can  be  cleared  and  your  characters  typed  on- 
to the  screen.  In  this  mode  the  program  can  even  be 
listed.  However,  if  you  modify  the  program  now, 
you  will  lose  your  redefined  character  data  in  the  ar- 
rays since  all  variables  are  zeroed  when  you  modify 
or  edit  a  program. 

If  you  stay  in  the  immediate  mode,  you  will  not 
lose  your  characters,  and  you  can  return  to  the  main 
program  by  typing  in  GOTO  12  and  RETURN . 


64  Character  Creator 

5  POKE52 , 56 : POKE56 , 56 : CLR: PRINTCHR? ( 142 ) 
10  DIMA (8,8),D%a27,8),C$(15),K%Cl27): L=0 

:CH=0:F=0 
12  X=0:Y=0:R=0:C=O:CM=14336;RA=56334:V=53 

248:3=1367 

15  iff=0thenprint"{clr1 Edown]it  will  take 
about  40  seconds  to  set  up" 

20  restore:forx=0to15:readc$(x) :next 

21  f0rr=1t08 : f0rc=1t08 : a ( r, c ) =46 : nextc, r 
25  c0=peek(v+33 )and15:c1=peek(v+34)andi5 
27  cl=peek(v+2755)and15:c2=peek(v+35)and1 

5 

29  IFL>0ORF=1THEN39 

31  POKERA, (PEEK(RA)AND254) : POKEl , PEEK( 1 ) A 

ND251 
34  FORI=0TO255:FORJ=0TO7:POKECM+I*S+J,PEE 

K(V+I*8+J) :NEXTJ,I 

36  POKEl, PEEKd  )0R4  :  POKERA,  PEEKCRA)0R1 

37  POKEV+24, (PEEK(V+24)AND240)OR14 

39  PRINT"lCLRJ "SPC(20) "IN  MULTI-COLOR  MOD 
E" 

40  PRINT"  CHARACTER  GENERAT0R[2  SPACES }BI 
T  PAIR/COLOR  REG" 

48  PRINT"{UP}  *[2  SPACESSTURN  ON  PIXEL 
[7  SPACES) 00 [7  SPACES ]BKG#0" 

50  PRINT"  -{2    SPACES} ERASE  PIXEL 
{9  SPACES} 01 (7  SPACES }BKG#1" 

51  PRINT"  Fl  BKG#0-"C?(C0)TAB{24)"10 
{7  SPACES }BKG# 2" 

52  PRINT"  F3  BKG#1-"C?(C1)TAB(24)"11 
{7  spaces) CRAM  " 

54  PRINT"  F5  BKG#2-"C? (C2 ) 
56  PRINT"  F7  CRAM  -"C$(CL) 
58  PRINT"  =[2  SPACES) COMPUTE  CHARACTER" 

60  PRINT"  D(2  spaces) DATA" 

61  PRINT"  Oi2  SPACES) MULT I -COLOR  OFF" 

62  PRINT"  N{2  spaces) new  SCREEN" 

63  PRINT"  M{2  spaces) MULTI-COLOR  ON" 

64  PRINT"  S{2  spaces} SAVE  CHARACTERS" 
66  PRINT"  lU  spaces} load  CHARACTERS" 

68  PRINT"  Ct2  spaces] NEW  CHARACTER" 

69  PRINT"  -<t2  SPACES)  BREAK  PROGRAM" 

70  PRINT"  QU  SPACES}QUIT" 

80  POKES-40+1 , 76 : POKES-40+2 , 122 : POKES-40+ 
3,76: POKES-40+4 , 122 : POKES-40+5 , 76 : POKE 
S-40+6,122 

81  POKES~40+7,76:POKES-40+8,122 

82  FORR=0TO7 : POKES+C+R* 40 , 84 : NEXT 

84  FORC=C-1T01STEP-1 : POKES+C+R*40, 69 :NEXT 
86  FORR=R- 1TO0STEP-1 : POKES+C+R*40 , 89 : NEXT 
90  Y=0 : F0RR=1T08 : F0RC=1T08 : Y=Y+1 : POKES+Y, 

ACR.n :NEXT:Y=Y+32:NEXT 
95  Y=1:X=1:GOTO300 
100  GETA$:IFA?=""THEN100 
110  R=S+X+(Y-1)*40:C=A(Y,X) :POKER,C 
120  IFA$="{D0WN)"THENY=Y+1:IFY>8THENY=1 
130  IFA$="{UP}  "THENY=^Y-1:  IFY<1THENY=8 
140  IFA?= " { RIGHT } "THENX=X+1 : IFX>  8THENX=1 
150  IFA?="iLEFT}"THENX=X-l:IFX<lTHENX=8 
160  IFA$="-"THENA(Y,X)=46 
170  IFA$="*"THENR=42:ACY,X)=R 
180  IFAS="="THEN400 
190  IFA?="D"THEN500 
200  IFA$="N"ORA$="Q"ORA$="-*"ORA$  =  "L"ORA? 

="S"THEN600 
205  IFA?="M"THEN5e0 
207  IFA$="O"THEN590 
210  IFA$="C"THEN700 
220  IFA$=" {Fl } "THENR=33 :GOTO520 
230  IFA$="{F3}"THENR=34:GOTO520 


240 

250 
300 

305 
400 

401 

410 
420 
430 

450 

460 

470 
480 


481 
482 

490 

500 


510 

520 
530 


IFA5  =  "  I F5  }  ■"THENR=3  5  :  G0T05 20 

IFA$=" {F7 } "THENR=2 755 : GOTO 520 

R=S+X+ ( Y-1 ) *40 : C=A ( Y, X ) +128 ; POKER, C : I 

FF=0THEN700 

GOTO100 

FORY=0TO8 : D% ( L, Y ) =0 : NEXT  s  CH=1 

F0RY=1T08:F0RX=1T08:PIX=A(Y,X)-42:IFP 

IX>0THENPIX=0:GOTO420 

PIX=1 

D%(L,Y)=D%{L,Y)+PIX*2TC8-X) :NEXTX,Y 

FORY=0TO7 : P0KECM+8*K% ( L ) +Y , D% ( L , Y+1 ) : 

P0KE1731,K%(L) :NEXT:GOT095 

PRINT" {HOME) {20  DOWN} {RVS } "A?" :  YES  0 

R  NO  (off) {22  SPACES}" 

FORX=1TO10:GETN$:NEXT 

GETN$ : IFN5=" "THEN470 

PRINT" {UP} {16  SPACES) {UP} ":IFA$="N "OR 

A$  =  "Q"0RA$="-t"0RA$="L"0RA?="S"THENRE 

TURN 

IFN?="Y"THEN12 

IFN?="N"THENPRINT"{D0WN)T0  RETURN  TO 

{SPACE}THE  program  TYPE  GOTO  12":ST0P 

PRINT " { RVS } { HOME } { 6  DOWN} CONTINUE " : GO 

TO460 

PRINT" { CLR} {down} {3  RIGHT) DATA"; :FORY 

=1T08:PRINTD%(L,Y)"{LEFT}, "; :NEXT:PRI 

NT" {left}  " 

PRINT" {DOWN} FOR  KEY  CODE="K% (L) :G0T04 

90 

C=PEEKCV+R)AND15:C=C+1iIFC>15THENC=0 

POKEV+R,C: PRINT" {home) {4  DOWN)"; :IFR= 

33THENC0=C:GOTO570 


IFR=34THENC1=C 

IFR=35THENC2=C 
CL=C 


:GOTO570 
;GOTO570 


540  PRINT" {down}"; 
550  PRINT" {down}"; 
560  PRINT" { DOWN) "; 
5  70  PRINT" {10  RIGHT}"C${C)"{2  SPACES} ":G0 

TO300 
580  POKEV+22,PEEK(V+22)OR16:GOTO300 
590  P0KEV+22,PEEK{V+22)/IND  239:GOTO300 
600  GOSUB450: IFN$<>"Y"THEN95 
610  GETN$:GETN$:IFA$="N"THEN12 
620  IFA$="Q"THENP0KEV+24, 21 :POKEV+22 , PEEK 

(V+22)AND239:END 
625  IFA5="-«"THENPRINT"{D0WN)T0  RETURN  TO 

THE  PROGRAM  TYPE  GOTO  12": STOP 
630  PRINT" {CLR) " :INPUT"NAME  OF  CHARACTER 

{SPACE)FILE";N?; PRINT 
640  IFA$= "L "THENOPENl , 1 , 0 , N? : GOTO900 
645  OPEN1,1,1,N$:GOTO800 
700  PRINT" {HOME) {20  DOWN) {RVS ) PRESS  KEY  T 

HAT  YOU  WANT  TO  CHANGE {OFF} " :F=1 
705  IFCH=1THENL=L+1:CH=0 
710  GETA5:IFA$=""THEN710 
720  P0KE16385,ASCCA$) : K% (L)=PEEK( 16385 )AN 

D191 : 1 FK% ( L ) >  64THENK% ( L ) =K% ( L ) -64 
722  P0KE1731,K%(L) 
725  PRINT" {2  UP} "SPCC24 ) "KEY  CODE="K%(L)" 

(left) {2  SPACES}" 
730  PRINT" {33  SPACES }": IFL=0THEN1 00 
735  FORY=0TO8 : FORX=0TO8 : A ( Y , X ) =46 : NEXTX, Y 

:GOTO90 
800  PRINT#1,L 
802  FORY=0TOL: PRINT* 1,K%{Y) :F0RX=1T08:PEI 

NT# 1 , D%  C Y, X ) : NEXTX , Y : CLOSEl : GOTOl 2 
900  INPUT#1 , L: FORY=0TOL : INPUT#1 , K% ( Y) : FOR 

X=1T08 : INPUT# 1 , D% ( Y , X ) ; NEXTX , Y : CLOSEl 
910  PRINT "COMPUTING  CHARACTERS" 
920  FORY=0TOL:FORX=1TO8:POKECM+8*K%(Y)+(X 

-1 ),D%(Y,X): NEXTX, Y:G0T012 
1000  DATABLACK , WHITE , RED , CYAN , PURPLE , GREE 

N, BLUE, YELLOW 
1010  DATAORANGE, BROWN, LT  RED , GREYl , GREY2 , 

LT  GREEN, LT  BLUE,GREY3  © 
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Skyles  Electric  Works 

231 E  South  Whisman  Road 
Mountain  View,  CA  94041 
(415)965-1735 


AVAILABLE  NOW!  Call  800  227-9998** 
For  the  name  of  your  nearest  dealer, 
detailed  information  or  a  catalog  of  products. 

*  'California,  Canada  and  Alaska,  please  call  (415)  965-1735. 


In  Europe:  SUPERSOFT,  Winchester  House,  Canning  Road,  Harrow  Wealdstone,  England  HA3  7SJ,  Tel.  01  861  1166 


CAPUTS! 

Modificotions  Or  Corrections  To  Previous  Articies 


Atari  Retirement  Planning 

In  Craig  Cole's  suggested  improvements  to  the 
Atari  version  of  Retirement  Planner  (COMPUTE!, 
April  1983)  which  appeared  in  the  July  "Readers' 
Feedback"  section  (p.  16),  line  70  should  have 
read: 

70Y  =  Y  +  1 

Ti  Goblin 

As  this  game  from  the  July  issue  (p.  72)  was  pre- 
sented, your  goblin  could  not  reach  the  faces  in 
the  rightmost  column  of  the  screen.  This  can  be 
corrected  by  changing  line  760  to  read: 

760  COL  =  COL  +  SGN(31-COL) 

To  make  the  game  display  the  proper  high  score, 
delete  lines  270,  280,  and  290,  and  add  the  fol- 
lowing line: 

1125  IF  S>HS  THEN  1130  ELSE  1140 

Thanks  to  Canadian  reader  Luc  Cousineau 
and  others  who  pointed  out  this  problem. 

Fortress  Of  Adnil 

In  the  program  for  this  Timex/Sinclair  game  (July 
1983,  p.  92),  the  GOTO  statements  were  missing 
from  the  following  two  lines: 

8040  IF  INKEYS  =  "  "  THEN  GOTO  8020 
8209  IF  INKEY$  =  "  "  THEN  GOTO  8207 

Roadblock 

Readers  who  have  had  trouble  typing  in  this  long 
machine  language  program  for  the  Atari  may 
want  to  add  the  following  lines  to  the  BASIC  loader 
(July  1983,  p.  108)  to  help  check  for  typing  errors 
in  their  DATA  statements: 

15  LN=1010 

20  FOR  L=0  TO  16 

25  FOR  C=0  TO  69 

30  D=PEEK ( L»70+13824+C) : IF  D>15010  T 

HEN  40 
35  T=T+D:NEXT  C 
40  READ  CK:IF  CK<>T  THEN  PRINT  "ERRO 

R  IN  LINES  "  ; LN;  "  -" ; LN  +  90: STOP 
45  PRINT  "LINES  "; LN ;"-"; LN+90 ; "  DK" 
50  T  =  0:  LN  =  LN-i-100:  NEXT  L 
55  A=USR<1478S> 
3000  DATA  3797,  8372,  752  1  ,  6620,  £)660,  8 

073 
3010  DATA  7319,7083,6853,6626,6631,8 

059 
3020  DATA  7685,7702,7951,7720,7014 


Circles 

For  the  machine  language  circle-drawing  routine 
presented  in  this  Atari  graphics  article  from  the 
July  issue  to  work  properly,  the  following  lines 
must  be  added  to  Program  7  (p.  168),  the  BASIC 
loader  for  the  routine: 

2B004  RESTORE  29500 

28005  FOR  1=1577  TO  15B4:READ  A:POKE 

I  , A: NEXT  I 
29500  DATA  128,64,32,16,8,4,2,1 

TImex/Sinclair  Screenscrolls 

Reader  Daniel  Froats  notes  that  the  screen 
scrolling  programs  from  the  July  issue  (p.  216) 
will  work  with  the  basic  2K  of  memory  if  the  fol- 
lowing two  lines  are  entered  before  running  the 
program: 

POKE  16389, n 
CLS 

Replace  n  with  any  number  greater  than  90. 

Commodore  64  Video  Tour 

Jim  Butterfield  writes  that  readers  whose  64s  have 
the  newer  ROM  sets  mav  experience  problems 
with  the  BASIC  program's  from  Parts  VI  (July  1983 
p.  218)  and  VII  (August  1983,  p.  182)  of  his  series 
on  the  64's  video  capabilities.  This  is  because  the 
ROM  routines  leave  the  raster  interrupt  in  a  non- 
standard state.  To  make  the  programs  work,  add 
the  following  line: 

90  POKE  53265,27 

VIC  BItmappIng 

Line  100  of  Program  1  from  this  article  on  VIC 
high  resolution  graphics  (July  1983,  p.  248)  should 
read: 

100    POKEV+15, 17*T-9:FORI=.T0255:POKEW+I, I 
:  POKER+I ,  C-1 :  NEXT  :  FORI= .  TOL* 2  *  t.STEPB 

The  "shifted  up-arrow"  key  combinahon  on  the 
VIC  gives  the  symbol  for  pi,  which  acts  as  a  con- 
stant with  the  value  of  pi  when  used  in  calcula- 
tions. 

First  Math 

A  bug  in  the  VIC,  64,  and  Apple  versions  of  this 
educational  game  from  the  August  issue  (p.  92) 
sometimes  causes  a  "division  by  zero"  error  when 
plaving  in  the  addition,  subtraction,  or  multipli- 
cation modes.  To  prevent  this,  add  the  following 
line: 

VIC  or  64  Version  (Programs  1  or  2) 

123  IF  A$<>CHR$(47)  THEN  140 

Apple  Version  (Program  5) 

395    IF   h$    <>     ("/")    THEN   430  © 
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A  Beginner's  Guide 
To  Typing  in  Programs 


What  is  A  Program? 

A  computer  cannot  perform  any  task  by  itself. 
Like  a  car  without  gas,  a  computer  has  poteiTfial, 
but  without  a  program,  it  isn't  going  anywhere. 
Most  of  the  programs  published  in  COMPUTE!  are 
written  in  a  computer  language  called  BASIC. 
BASIC  is  easy  to  learn  and  is  built  into  most  com- 
puters (on  some  computers,  you  have  to  purchase 
an  optional  BASIC  cartridge). 

BASIC  Programs 

Each  month,  COMPUTE!  publishes  programs  for 
many  machines.  To  start  out,  type  in  only  pro- 
grams written  for  your  machine,  e.g.,  "TI  Version" 
if  you  have  a  TI-99/4.  Later,  when  you  gain  ex- 
perience with  your  computer's  BASIC,  you  can 
try  typing  in  and  converting  certain  programs 
from  one  computer  to  yours. 

Computers  can  be  picky.  Unlike  the  English 
language,  which  is  full  of  ambiguities,  BASIC 
usually  has  only  one  "right  way"  of  stating  some- 
thing. Every  letter,  character,  or  number  is  signif- 
icant. A  common  mistake  is  substituting  a  letter 
such  as  "O"  for  the  numeral  "0",  a  lowercase  "1" 
for  the  numeral  "1",  or  an  uppercase  "B"  for  the 
numeral  "8".  Also,  you  must  enter  all  punctuation 
such  as  colons  and  commas  just  as  they  appear  in 
the  magazine.  Spacing  can  be  important.  To  be 
safe,  type  in  the  listings  exactly  as  they  appear. 

Brackets  And  Special  Characters 

The  exception  to  this  typing  rule  is  when  you  see 
the  curved  bracket,  such  as  "{DOWN}".  Any- 
thing within  a  set  of  brackets  is  a  special  character 
or  characters  that  cannot  easily  be  listed  on  a  print- 
er. When  you  come  across  such  a  special  state- 
ment, refer  to  the  appropriate  key  for  your  com- 
puter. For  example,  if  you  have  an  Atari,  refer  to 
the  "Atari"  section  in  "How  to  Type  COMPUTEI's 
Programs," 

About  DATA  Statements 

Some  programs  contain  a  section  or  sections  of 
DATA  statements.  These  lines  pro\'ide  informa- 
tion needed  by  the  program.  Some  DATA  state- 
merits  contain  actual  programs  (called  machine 
language);  others  contain  graphics  codes.  These 
lines  are  especially  sensitive  to  errors. 

If  a  single  number  in  any  one  DATA  statement 
is  mistyped,  your  machine  could  "lock  up,"  or 
"crash."  The  keyboard,  break  key,  and  RESET  (or 
STOP)  keys  may  all  seem  "dead,"  and  the  screen 
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may  go  blank.  Don't  panic  -  no  damage  is  done. 
To  regain  control,  you  have  to  turn  off  your  com- 
puter, then  turn  it  back  on.  This  will  erase  what- 
ever program  was  in  memory,  so  always  SAVE  a 
copy  of  your  program  before  you  RUN  it.  If  your 
computer  crashes,  you  can  LOAD  the  program 
and  look  for  your  mistake. 

Sometimes  a  mistyped  DATA  statement  will 
cause  an  error  message  when  the  program  is  RUN. 
The  error  message  may  refer  to  the  program  line 
that  READs  the  data.  The  error  is  still  in  the  DATA 
statements,  though. 

Get  To  Know  Your  Machine 

You  should  familiarize  yourself  with  your  com- 
puter before  attempting  to  type  in  a  program. 
Learn  the  statements  you  use  to  store  and  retrieve 
programs  from  tape  or  disk.  You'll  want  to  save  a 
copy  of  your  program,  so  that  you  won't  have  to 
type  it  in  every  time  you  want  to  use  it.  Learn  to 
use  your  machine's  editing  functions.  How  do 
you  change  a  line  if  you  made  a  mistake?  You  can 
always  retype  the  line,  but  you  at  least  need  to 
know  how  to  backspace.  Do  you  know  how  to 
enter  inverse  video,  lowercase,  and  control  char- 
acters? It's  all  explained  in  your  computer's 
manuals. 

A  Quick  Review 

1)  Type  in  the  program  a  line  at  a  time,  in  order. 
Press  RETURN  or  ENTER  at  the  end  of  each  line. 
Use  backspace  or  the  back  arrow  to  correct 
mistakes. 

2)  Check  the  line  you've  typed  against  the  line  in 
the  magazine.  You  can  check  the  entire  program 
again  if  you  get  an  error  when  you  RUN  the 
program. 

3)  Make  sure  you've  entered  statements  in  brac- 
kets as  the  appropriate  control  key  (see  "How  To 
Type  COMPUTEI's  Programs"  elsewhere  in  the 
magazine.) 


We  regret  that  we  are  no  longer  able  to  respond  to 
individual  inquiries  about  programs,  products,  or 
services  appearing  in  COMPUTE!  due  to  increasing 
publication  activity.  On  those  infrequent  occasions 
when  a  published  program  contains  a  typo,  the  correc- 
tion will  appear  on  the  CAPUTE!  page,  usually  within 
eight  weeks.  If  you  have  specific  questions  about  items 
or  programs  which  you've  seen  in  COMPUTE!,  please 
send  them  to  Readers  Feedback,  P.O.  Box  5406, 
Greensboro,  NC  27403 .  @ 


lALMIS/biffoWoEldS 

Sell  Hbur 
Soft¥iare 

TO  MAJOR  PUBLISHERS! 


Would  you  like  the  opportunity  to  discuss  your 
software  or  software  development  skills  with  major 
publishers  lookins  for  product  and  development 
assistance,  venture  capitalists  lookins  for  investment 
opportunities  and  agents  lookins  for  software  developers? 
At  The  Great  American  Software  Contest  you  can  do  all 
that  and  compete  for  prizes  worth  up  to  $10,000  at 
the  same  time! 

In  addition,  you'll  spend  the  day  before  the  exhibit 
in  seminars  with  software  market  analysts  from  TALMIS— 
the  same  people  consulted  by  IBM,  Atari  and  other  major 
companies  for  information  and  advice.  They'll  tell  you 
what  it  will  take  to  sell  software  yourself;  how  you  might 
work  with  an  asent;  what  publishers  and  venture  capitalists 
are  looking  for,-  what  to  watch  out  for  when  negotiatins 
contracts,  how  the  software  market  is  chansms  and  more 
important  selling  tips. 


We've  tried  to  make  this  conference  as  inexpensive 
for  you  as  possible.  You  won't  need  any  fancy  booth  or 
signs.  Curtained  booths  are  available  for  those  with 
top-secret  programs.  Just  bring  yourself,  your  micro- 
computer and  your  unpublished  software.  The  cost 
for  you  to  compete  for  prizes  up  to  $10,000,  learn  the 
ropes  of  software  selling  and  discuss  your  products  or 
talents  with  publishers,  agents  and  venture  capitalists  is 
S195  plus  J15  for  electricity  (that's  less  than  it  costs  us.) 
Special  hotel  rates  are  available, 

Space  is  limited  so  call  today  to  enter  The 
TALMiS/lnfoWorld  Great  American  Software  Contest. 
And  get  busy  on  that  software -the  publishers  are 
waitins  for  you!  For  more  details  contact  AAaster 
Plans  Conference  AAanagement,  111  E.  Chestnut  St., 
Suite  24F,  Chicaso,  IL  60611:  (312)  944-1711 . 


Enter 


Nov.1-2 

Boston  Park  Plaza 
Boston,  MA 


One  $10,000  Grand  Prize 
Five  $3000  First  Prizes  in  category 
Five  $500  Second  Prizes  in  category 
Ten  $250  Third  Prizes  in  category 


+ $30,000  IN  PRIZES 

lALMIS/btfolViDrld 


Affiliates  of  International  Data  Corporation 


COMMODORE  64 
PROFESSIONAL  BUSINESS  PROGRAMS 


•  INTRODUCTORY  OFFER  V2  PRICE! 
•  15  DAY  FREE  TRIAL! 

•  LIFETIME  GUARANTEE! 
•FILE  GUARD  <™) 


PROFESSIONAL  BUSINESS  PROGRAMS!      Disk) 

You  take  no  risk!  We  are  so  sure  these  professional  business  programs  will  meet  and  exceed  your 
highest  expectations,  we  are  willing  to  allow  you  to  try  these  programs  at  our  expense!  These  are 
designed  and  produced  by  Southern  Solutions  who  produces  professional  business  programs  for 
Commodores  most  expensive  computers.  These  business  program  will  convert  your  Commodore  64 
into  a  Professional  Business  Machine!!! 


INTRODUCTORY  OFFER!  (Expires  12-25-83) 


List 

$119.00 
$119.00 
$119.00 
$119.00 
$119.00 
$119.00 


V2  Price 

$59.00 
$59.00 
$59.00 
$59.00 
$59.00 
$d9.00 


•  General  Ledger  &  Cash  Flow 

•  Accounts  Payable  Plus  Check  Writing 

•  Accounts  Receivable 

•  Payroll 

•  Inventory 

•  Data  Base  Manager 

15  DAY  FREE  TRIAL! 

We  give  you  15  days  at  your  business  for  you  to  try  out  these  programs!  Should  they  not  meet  your  re- 
quirements just  send  them  back  prepaid  and  we'll  refund  your  purchase  pricei    • 
LIFETIME  GUARANTEE! 

If  a  program  fails  due  to  faulty  workmanship  or  material  anytime  you  personally  own  and  use  the  pro- 
gram we  will  replace  it  at  no  charge! 

FILE  GUARD  ^"» 

Prevents  loss  of  data  and  confidential  files  due  to  power  failure  —  a  Southern  Solutions  exclusive' 

PLUS:  THESE  PROFESSIONAL  BUSINESS  PROGRAMS  ■ 

•  Script  64-No.l  Executive  Word  Processor  -  Disk     List  $9$  ■  Sale  $59 

•  Complete  Data  Eiase  •  Tape-Disk  List  $89  •  Sale  $59 

•  Electronic  Spread  Sheet  (like  Visicalc)  ■  Tape-Disk      List  $89  ■  Sale  $59 


•  LOWEST  PRICES  •  15  DAY  FREE  TRIAL  •  90  DAY  FREE  REPLACEMENT  WARRANTY 
»  BEST  SERVICE  IN  U.S.A. »  ONE  DAY  EXPRESS  MAIL  •  OVER  500  PROGRAMS  •  FREE  CATALOGS 


Add  $3.00  for  postage- Add  $6.00  for  CANADA  PUERTO  RICO  HAWAII 
orders.  WE  DO  NOT  EXPORT  TO  OTHER  COUNTRIES. 
Enclose  Cashiers  Check,  fi^oney  Order  or  Personal  Cfieck  Allow  id 
Oays  for  delivery,  2  to  7  days  lor  phone  orders.  1  day  express  ma<|i 
Canada  orders  must  be  m  U.S.  dollars.  We  accept  Visa  and  Master- 
Card.    We  stijp  C.O.D. 


E  N  T  E  R  P  R I Z  E  S  •^^  i-o^^  oun  customehsi 

BOX  550,  BARRINGrON,  ILLINOIS  60010 
Phone  312/362-5244  to  order 


NEWS 


UCTS 


80-Column 
Commodore  64 
Word  Processor 

Mirage  Concepts  has  produced 
an  80-column  word  processor  for 
the  Commodore  64.  The  machine 
language  program  produces  the 
expanded  display  without 
hardware  modifications. 

The  Word  Processor  allows 
text  to  be  formatted  on  the  screen 
exactly  as  it  will  appear  on  the 
printed  page.  Other  features  of 
the  program  include  word  wrap, 
search  and  replace,  block  func- 
tions, and  more  than  70  single- 
keystroke  commands.  The  $99.95 
word  processor  is  designed  to 
work  with  a  variety  of  printers. 

Another  Mirage  product  for 
the  64  is  Database  Manager,  which 
features  free-form  design  and 
input.  It  includes  the  ability  to 
sort  any  field  and  to  calculate 
fields.  It  can  handle  up  to  65,535 
records  per  file,  2,000  characters 
per  record,  200  fields  per  record, 
and  250  characters  per  field. 

Database  Manager  sells  for 
$99.95. 


Mirage  Concepts,  Inc. 
2519  W.  Shaw,  No.  106 
Fresno,  CA  93711 
(209)  227-8369 


Word  Processor  and  Database  Man- 
ager are  available  from  Mirage  Concepts 
for  the  Commodore  64.  ■ 


64  Math  Drill 

The  Math  Teacher  is  a  math  tuto- 
rial program  that  drills  students 
in  the  basics  of  addition,  sub- 
traction, multiplication,  and 
division.  The  program,  which  is 
available  from  CompuTech,  is 
designed  for  use  with  students 
from  first  grade  through  junior 
high  school. 

The  game,  which  makes  use 
of  the  Commodore  64's  graphics 
capabilities,  is  designed  to  work 
with  either  a  color  or  black-and- 
white  monitor. 

The  Math  Teacher  is  available 
on  tape  for  $39.95. 

CompuTech 

P.O.  Box  7000-309 

Kedondo  Beach,  CA  90277 


Apple,  Atari,  64 
Games 

Avalon  Hill  has  introduced  a 
handful  of  new  games  for  the 
Apple,  Atari,  and  Commodore 
64  computers.  Here  is  what  the 
company  has  to  offer. 

Paris  in  Danger  is  a  simula- 
tion of  Napoleon's  1814  cam- 
paign in  France.  The  player  can 
assume  the  role  of  Napoleon, 
Commander  Schwarzenberg,  or 
can  play  both  sides.  The  $35 
game  is  available  for  48K  Atari 
800  and  1200XL  computers. 

T.G.l.F.  is  a  party  game  for 
up  to  four  players.  The  game 
recreates  a  typical  working-class 
workweek.  Can  you  survive 


until  payday?  The  game  is  avail- 
able on  cassette  for  the  Commo- 
dore 64,  and  on  cassette  or  disk 
for  40K  Atari  machines. 

Parthian  Kings  is  an  Apple 
game  for  up  to  four  players. 
Feudal  civil  war  is  coming  and 
the  struggle  is  on  for  who  will 
rule  the  land.  The  winner  will  be 
the  best  strategist  and  leader. 

S.C.Z.M.M./\.R.'S,  which 
stands  for  Surface  Contra- 
Gravity  Individual  Manned  Mo- 
bile Anti-Vehicle  Raiders,  is  a 
game  of  gladiatorial  armor  com- 
bat set  in  the  far  future.  The  $30 
game  is  available  for  Apple 
computers. 


ForYourTI-99/4A 
FLIGHT  SIMULATOR 

The  Dow-4  Gaielle  is  a  realistic  IFR 
simulation  of  a  typical  4-place  private 
plane.  It  is  not  a  game.  A  manual  with  30 
pages  of  text  plus  7  figures  helps  the  novice 
learn  to  fly.  Experienced  pilots  will  enjoy 
flying  the  ILS  approach.  Response  time 
uniJer  1  sec  a\'eraj;e.  Display  shows  full 
panel  (10  dials  &.  11  lights)  and  indicates 
position  of  runway  for  landing.  Realistic 
sound  effects.  See  reviews  in  Jan  83  99'er 
and  Jun  83  AOPA  Pilot.  Only  requires 
joystick.  $30. 


EDITOR/ ASSEMBLER 

The  Dow  E/A  turns  your  computer  intoan 
assembly  language  machine.  Requires  Mini 
Memory  Module.  Load  once  and  use  all 
day,  saving  and  restoring  source  assembly 
language  programs  on  cassette  (1  sec.  per 
statement),  just  as  you  do  with  Basic, 
Supports  all  of  the  Tl's  instructions,  6 
directives,  and  various  interactive  com- 
mands. Assembles  into  memory  in  3  sec. 
per  statement.  Manual  includes  sample 
program  with  detailed  explanations.  In- 
crease your  programming  enjoyment  over 
the  Line-by-line  Assembler,  and  if  you 
upgrade  toTi's  Editor/Assembler,  you  can 
convert  your  programs  without  rekeying 
them.  $25 


Send  SASE  for  additional  information.  To 

order,  send  check  or  MO  U.S.  funds: 

JOHN  T.  DOW 

6360  Caton 

Pittsbufgh,  PA  15217 

First  class  postage   to  U.S.   and  Canada 

included-othersadd  U.S.  $2  (PA  residents 

add  6%  state  sales  tax). 
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Stack  *  Rack 

.  nodular  Woi1<shelf  System 


MODEL 'A181B1B    S 1 02.00  *  $4.00  Shipping 
13"  wide 

Loc««  moniicn  up  at  eye  level,  computer  storM  urtder 
shelf,  organues  reference  matcfial. 


coKsraacnort:  SoIhi 

Oak.  engineered  for 

suength 
RlilSH:    ridlural   hand 

mbbed  oil,  with  color 

accent  saipt- 
FOOTPRmr:  Stacks  all 

comfxjnentsand  ma 

lenals  venically. 


* 


Order  dlfecL 

IIMtiatod  CdLalog  av^iilable 


ERGOnOMICS:  SheK^ 

adj  unable  for  heigh! 

&  angle- 
FtEXlBLE:  Fits  all  com 

puief  types 
SIMPLE;    Positions    on 

desk  or  worh  table. 

9  modds  to  to  an  sy^tenis. 

California 

design 

woiks 

Box    3052 
Monterey 
Calilomia  93940 

Dealer  infomution  available. 


PROTECT  YOUR  SYSTEM 

from  POWER  DAMAGE 


•  Metal  Oxide  Varistor  short  circuits  transient 
tiigh  voltage  "spikes"  before  damage 
occurs 

•  Continuous  ±  5  nanosecond  response 
protection 

•  Handles  common  and  differential  mode 
surges 

•  Prevents  software  "glitches"  and  memory 
loss 

•  Reduces  solid  slate  equipment  damage 

•  EMI  and  RFI  noise  suppression  filters 

•  For  use  only  with  1 1 0  volt,  1 5  amp,  60  hz 
circuits 

•  Limited  5-year  replacement  warranty 


I Holub  Enterprises,  Inc.,  Dept.-C 
P.O.  Box  9471 
Greensboro,  WC  27429 

I D  Enclosed  is  check  or  money  order  (or 

Solid  Stale  Protectors  @  8.95  eacti  plus  .50  each 
for  postage  and  tiandiing. 

INAME 

ADDRESS 

CITY 


.STATE 


-ZIP. 


ORDER  SEVERAL  —  PROTECT 
STEREOS.  TVS  AND  OTHER  SOLID 
STATE  APPLIANCESll 
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Computer  Football  Strategy  is 
a  detailed  statistical  treatment  of 
18  great  teams.  You  have  20  of- 
fensive and  10  defensive  plays 
to  choose  from  as  the  animated 
action  unfolds  on  the  scrolling 
football  field.  The  game  is  avail- 
able on  cassette  for  the  Commo- 
dore 64  and  Atari  computers, 
and  on  disk  for  Atari.  Price  is 
$16  for  tape,  $21  for  disk. 

T.A.C.,  an  acronym  for  Tac- 
tical Armor  Command,  is  a 
simulation  of  armored  combat 
during  World  War  11.  Five  differ- 
ent scenarios  are  available  in  this 
$40  Apple  game. 

The  Avaloii  Hill  Game  Company 
4517  Harford  Road 
Baltimore,  MD  21214 
(301)254-5300 

Automodem  With 
Parallel  Printer 
Port 

The  AutoPrint  Microconnection, 
an  auto-answer,  auto-dial 
modem  for  the  VIC-20,  Commo- 
dore 64,  and  Atari  computers, 
has  been  introduced  by  Micro- 
peripheral. 

The  modem,  which  operates 
at  300  baud,  includes  a 
Centronics  compatible  parallel 
printer  port. 

The  two-pound  unit  plugs 
directly  into  the  computer.  With 
the  modem  connected  to  the 
phone  line,  an  attached  printer 
will  provide  a  hard  copy  of  what- 
ever appears  on  the  screen. 


The  AutoPrint  Microcon- 
nection is  available  for  $149.95. 

The  Microperipheral  Corp. 
2565 152nd  Ave.  N.E. 
Redmond,  WA  98052 
(206)881-7544 


Strategy  Wargame 

Combat  Lender  is  a  battle-of-the- 
tanks  game  that  combines  realis- 
tic rules,  historical  accuracy,  and 
speed. 

The  game,  available  for  Atari 
computers  with  a  version  forth- 
coming for  the  Comtnodore  64, 
gives  you  control  of  more  than 
70  tanks  on  a  scrolling  battlefield. 
Each  tank  is  historically  rated  for 
armor  thickness,  strength, 
speed,  and  accuracy. 

Combat  Leader,  which  in- 
cludes eight  speed  levels  and  a 
realtime  option,  sells  for  $39.95. 
Strategic  Simulntiona  Inc. 
883  Stierlin  Road 
Building  A-2U0 
Mountain  View,  CA  94043 
(415)  964-1353 


Internal  VIC 
Expansion 

Legend  Valley  Computer  Sys- 
tems has  produced  a  27K  internal 
expansion  board  for  the  VIC-20. 

The  board  fits  under  the 
keyboard  and  is  piggybacked  to 
the  original  6502  microprocessor. 
The  additional  memory  is  select- 
able in  8K  blocks  via  a  switch  on 


The  AutoPrint  Microconnection  is  a  combination  modern-parallel  printer 
interface  for  the  Atari,  Commodore  64,  or  VIC-20. 


Products  for  Commodore,  Atari,  Apple,  and  others! 


^^ 


,^ 


THE  MONKEY  WRENCH  II 

A  PROGRAMMERS  AID  FOR  ATARI  800 

NEW  AND  IMPROVED  -  18  COMMANDS 
PLUGS  INTO  RIGHT  CARTRIDGE  SLOT 


$59.95 


Ifyouareaper^on  who  likes  to  monkey  around  with 
the  ATARI  800,  then  THE  MONKEY  WRENCH  II  is 
for  you!!  Make  your  programming  tasks  easier,  less 
time-consuming  and  more  fun.  Why  spend  extra 
hours  working  on  a  BASIC  program  when  the 
MONKEY  WRENCH  can  do  it  for  you  in  seconds. 
It  can  also  make  backup  copies  of  boot  type 
cassette  programs.  Plugs  into  the  right  slot  and 
works  with  ATARI  BASIC  carlndge. 

The  MOfJKEY  WRENCH  provides  18  direct  mode 
commands.  They  are:  AUTO  LINE  NUMBERING  -  Pro- 
vides new  line  numbers  when  entering  BASIC  program 
lines.  RENUMBER  —  Renumbers  BASIC'S  line  numbers 
including  internal  references.  DELETE  LINE  NUMBERS 
—  Removes  a  range  BASIC  lire  numbers. 
VARIABLES  -  Display  all  BASIC  variables  and  their  curreni  value  Scrolling  -  Use  the 
START  &  SELECT  l(eys  to  display  BASIC  lin  es  automatically  Scroll  up  0  r  down  BASIC  pro- 
gram.  FINOSTRIMG  -  Find  every  occurrence  Of  a  stnng,  XCHANGE  STRING  -  Find  every 
occurrence  of  a  string  and  replace  it  with  another  string  fyflOVE  LINES  —  Move  lines  from 
one  pan  of  program  to  another  part  of  program  COPY  LINES  -  Copy  lines  from  one  part 
of  program  Id  another  part  of  program.  i=ORMATTED  LIST  —  Print  BASIC  program  in 
special  line  format  and  automatic  page  numbering.  DISK  DIRECTORY  -  Display  Disk 
Directory,  CHANGE  MARGINS  —  f'rovides  the  capability  10  easily  change  the  screen 
margins.  MEMORY  TEST  —  Provides  the  capability  to  lest  RAM  memory  CURSOR 
EXCHANGE  -  Allows  usage  ot  the  cursor  keys  without  holding  down  the  CTRL  key 
UPPER  CASE  LOCK  —  Keeps  the  computer  in  the  upper  case  character  set.  HEX  CON- 
VERSION—Converts  a  hexadecimal  number  to  a  decimal  number  DECIMAL  CONVER- 
SION —  Converts  a  decimal  number  to  a  hexadecimal  number  MONITOR  —  Enter  the 
machine  language  monitor 

In  addition  to  the  BASIC  commands,  the  Monkey  Wrench  also  contains  a  machine 
language  monitor  with  16  commartds  used  to  interact  with  the  powerful  features  ot  the 
65(12  microprocessor 


<o^^!^VsTCP- 300/1200  Baud 

Standard  Termtnai  Communications  Package 

•PFO'SOD  OOA  CP<D1>D2  BELL    -    12  30  00  10  1*36 


Don't  senle  tof  r^orfc-siandard  Commjmcaiions  Ptorocol' 
Access  Micro  Net.  Source.  Bulletin  Boa'ds.  Local  Main- 
frame, elc 

•  Com0ieie  Package  -  includes  RS23?  Inier 
face  Boara  and  sotTwaie  (does  noi  include 
modem) 

•  CommumcaEes  ir  indjsiry  Siandsrd  ASCII 

•  Upio^o/Oownload  lo/liom  D\^K 

•  Aulomalic  FjIc  Translation 

•  Car)  be  conif  Qlled  fiom  heyDoaid  ot  usei  $ud 
plied  Dasic  oi  machine  language  progiam 

Specify  3.0  or  4.0  ROM  S  or  8032  CommcKiore  Computer 
AOAO  or  8050  or  PEDlSK  M  Disk  or  CBM64  on  1541 

Price:  $129,95 


h 


ATARI  AND  PET 
EPROM  PROGRAMMER 

Programs  2716  and  2532 
EPflOMs.  Includes  hardware 
andsoflvrarePET  =  $75.00- 
ATARI  (induiies  sophisticated 
machine  language  monrlorl  =: 
5119,95 


XV^ 


.>^ 


VIC  RABBIT  CARTRIDGE 

AND  CBM  64  RABBIT  CARTRIDGE 

NEW  FEATURE! 

DATA  FILES!    ^  '-' 

"High  Speed  #  S7 

Cassette  ^  .^    ,    ^ 

Load  and  Save!"  ^'    ^^  / 

$39.95        \V 

(mcludes  cartridge        inrUlf* 
and  manual)  lor  viL, 

Don't  waste  your  Life  away  waiting  to  LOAD 
and  SAVE  programs  on  Cassette  Deck. 
Load  or  Save  8K  in  approximately  30  seconds! 
Try  it— your  Un-Rabbitlzed  VIC  or  64  takes 
almost  3  minutes.  It's  not  only  fast  but  VERY 
RELIABLE. 

A!  most  as  fast  as  1541  Disk  Drive!  Don't  be  fool- 
ish ~  Why  buy  the  disk  when  you  can  get  the 
Rabbit  for  much,  much  less! 
Allows  one  to  APPEND  Basic  Programsl 
Easy  to  install  —  just  plugs  in. 
Expansion  Connectoron  rear  of  the  VIC  Rabbit. 
Works  with  or  without  Expansion  Memory. 
Works  with  VIC  or  64  Cassette  Deck. 
12  Commands  provide  other  neat  features. 
Fast  Data  Files  -  two  data  file  modes. 
Also  Available  for  2001 ,  4001 .  and  8032. 


PET  BASIC  SCROLL  PROGRAM 

Scroll  thru  Basic  Programs  using  cursor 
up/down  keys.  Specify  computer.  $6.00  on 
cassette,  $9.00  on  diskette. 

65C02  MAE 

Same  as  our  MAE  but  enhanced  for  the  new 
65C02  Opcodes.  Turns  your  computer  into  a 
development  system  for  the  new  ROCKWELL 
65C02  Microprocessor  $200.00  —  Specify 
Computer. 

6800  CROSS  ASSEMBLER 

A  Cross  Assembler  based  on  the  MAE  that 
runs  on  the  PET,  Apple,  or  Atari  but  assembles 
opcodes  lor  the  Motorola  6800  microproces- 
sor. Turns  your  computer  into  a  development 
system  tor  the  Motorola  6800  Microprocessor 
$200,00  —  Specify  Computer 

ATARI  and  VIC  Cartridges 

EHS  can  supply  large  quantities  of  ATARI  and 
VIC  Cartridges  for  software  developers,  li  you 
need  cartridges,  call  for  pricing. 


TRAP  65 

TRAP  S5  IS  a  hardware  device  thai 

plugs  inlo  you:  6502s  socket.  Prevents 

eiecjliori  ol  unimplem&r>tet]  Qpcodes 

and  prounOes  capability  IP  extend  Ihe 

machines'  msrruciipn  sei 

For  PET/APPLE/SVM 

Reduce*  Irom  SI  49  95  to  S69  95 


More  than  just  an  Assembler/Editor! 
Now  for  the  "64"    \  -  ■  «  ,- 

MAE 


Its  a 

Professionally 

Designed 

Software 

Development 

System 


for 

PET 

APPLE 

ATARI 

$?6§SS 

New 

Price 

$99.95 

Blast  off  with  the  software  used  on  the  space 
shuttle  project! 

'  Di^si^nod  10  improve  Programmer  ProducliviTy 

•  Similar  syrilax  ana  command?  —  No  rreed  lorelearn 
peculiar  syntaxes  ar>d  commands  when  you  go 
Irom  PET  toAPPLE  10  ATARI 

•  Coresrrjenl  Assambler/Editoi  —  No  need  to  load 
ine  Editor  then  ir.e  Assembler  rhen  the  Editor,  etc 

•  Al£0  includes  Word  Processor.  Relocating  Loader. 
anrjmuch  more 

•  Options  EPROM  Programmer,  unimptemenled 

dpr^CH^eciicuilry 

•  STILL  NOT  CONVINCED  Send  lor  lieespecirieet' 


5%  INCH  SOFT 
SECTORED  DISKEHES 

Highest  (jjalitY-  We  use  them  on 
our  PETs,  APPLES,  ATARIs,  and  otfier 
computers.     S22.M/10  or  $44.50/20 


Prowflter  Prmlor  -  Excellent  dot  malriK  prinl  parfltlel  acmll 
Serial  "  Call  IEEE  :  Cill 


DC  Hayes  Snai!  Mtrfem 
OC  Hayes  Micro  MOOern  I 


.  S235  00 
^  S289  OC 


Rana  Oisk  Drive    375 
A  Drive  Conlroiler  -  1  \i 


EPROMS  2716  =  $4.50  2532  =  1750 

Over  40  Commodpre  Prs>grams  by  Baker  (on  4040)  ■ 


$2500 


3239  Linda  Dr. 
Winston-Salem.  N.C.  27106 
(919)924-2889  (919)748-8446 
Send  for  free  catalog! 


[MosfwfOofd 


^I  commodore 

SUPER-MART 

•••••••••••••• 

SSS  SAVE  TIME  S  MONEY  S$5 

HANNA  ENTERPRISES 

1303  COLUMBIA  DR,   suite  207 

Richardson.  Texas  75081 

OUTSIDE  OF  TEXAS  CALL 

1-800-527-1738 

TO  ORDER  CALL  (21 4) 

231-2645 

MasterCard  &  Visa  accepted 

add  3%  surcharge  for  credit  cards 

F.OB.  Dallas,  Texas 
9:30  a.m.  -  6:30  p.m.  (m-f) 
10:30  a.m.  -  2:30  p.m.  sat. 


COMMODORE  COMPUTERS 

B-500-128k  $777.20 

PET  64  $627.50 

8032  $627.50 

8096  $876.25 

9000  Super  Pet  $1071.25 

c-64  $233.00 
Executive  64  portable  CALL 


COMMODORE 

DISK  DRIVES 

1541  (170k) 

$250.50 

2031 

S311.00 

4040  (340k) 

$657.85 

8050  (Img) 

$981.90 

8250  (2mg) 

$1226.50 

9060  hard  disk  (5 

mg) 

$2040.00 

9090  hard  disk  (7 

5mg) 

$2290.00 

COMMODORE  PRINTERS 

1525(30cps)  $238.75 

1526(100cps)  $343.95 

4023CBM  (lOOcps)  $330.95 

8023{160cps)  $537.95 

6400  daisy  wheel  CBM  $1417.75 

newM520  plotter  printer  $178.50 


COMMODORE 

PERIPHERALS 

1701  color  monitor 

$249.95 

C1600  modem 

$59.30 

C1650  automatic  modem 

$94.50 

Datasette  1530 

$58.50 

CBM  64k  memory  board 

$246.95 

Super  Pel  upgrade  board 

$488.95 

Cables  PET-IEEE 

$34.95 

Cables  IEEE-IEEE 

$42.95 

COMMODORE 
SOFTWARE  FOR  CMS 

Wordpro4+  or  5+  $305.00 

Visicalc  (Expanded)  $195.00 

BPI  G/L  A/R  A/P  Inv.  etc,  $320  ea. 

MANAGER  (database)  $195.00 
c64  SOFTWARE: 

Easy  script  $99.95 

Easy  mail  $49.95 

Word/name  machine  $29.95 

Logo  $99.95 

Pilot  $99.95 

Music  machine  $29.95 

Music  composer  $29.95 


the  rear  of  the  VlC-20  cabinet. 

The  expansion  board  is 
available  for  $129.95. 

Legend  Valley  Computer  Systems 
1474  Niiuglitiiigham 
Newark,  OH  43055 


Traveling  Timex 

Car  Comp  is  an  accessory  for 
the  Timex/Sinciair  computer 
that  turns  it  into  a  traveling 
companion. 

Car  Comp  is  a  rigid  platform 
to  which  the  computer  and  cas- 
sette recorder  can  be  attached.  It 
can  be  used  anyvi^here  with  AC 
power  or  a  12-volt  cigarette- 
ligliter  outlet. 

Car  Comp,  which  is  pro- 
duced by  L&G  Enterprises,  sells 
forS59.95. 

L&G  Enterprises 

Box  6854 

Silver  Spring,  MD  20906 


v^v-,-\w; 


Car  Comp  secures  a  I  uncx'Suiciair  and 
cassette  deck  as  well  as  allowing  power 
to  be  drmon  from  a  sUnuiard  auto 
cigarette-lighter  ouUel. 


TI-99/4A 
Assortment 

Western  Properties  Investment 
Company  has  produced  a  line  of 
products  designed  for  the  TI-99/ 
4A  computer.  The  programs 
include  a  word  processor,  a  data 
base,  and  a  spreadsheet. 

The  word  processor.  Printer 
Book,  is  designed  to  handle  up  to 
two  pages  of  text.  Control  of  the 
printer  is  achieved  through  use 


of  the  CTRL  key.  The  program 
can  be  used  in  conjunction  with 
one  of  Western  Properties'  File 
Book  programs  to  merge  records 
from  a  data  base  with  text.  Printer 
Book's  14  menu  options  include 
record  merging,  merge  to  screen 
or  printer,  and  automatic  multi- 
letter  printing. 

Fili'-Book  HI  handles  up  to 
100  records  with  6  items  per 
record.  The  program  includes 
full  editing,  search  and  sort  cap- 
abilities as  well  as  output  to 
screen,  printer  or  tape. 

Income  and  Expense  Spread- 
sheet IV  is  an  accounting  spread- 
sheet composed  of  2  income  and 
50  expense  categories.  The  pro- 
gram produces  monthly  charts 
of  each  of  the  52  categories  and 
an  annual  chart.  Data  is  saved  to 
tape  with  a  cassette  routine  that 
is  four  times  normal  speed. 

Printer  Book  and  File-Book  III 
are  available  for  $39.95.  Income 
and  Expense  Spreadslteet  sells  for 
$43.95.  The  programs  run  on 
Extended  BASIC,  but  require  no 
memory  expansion.  A  printer  is 
optional  for  the  data  base  and 
spreadsheet  programs. 

Western  Properties  Investment 

Company 
Software  Division 
P.O.  Box 9602 
Marina  Del  Rcy.  CA  90295 


VCR  Interface 
For  VIC  And  64 

The  Videobook  Corporation  has 
introduced  Prometheus  1,  an 
interface  for  the  Commodore  64 
and  VIC-20  computers  and  home 
video  cassette  recorders. 

Prometheus  1  allows  you  to 
produce  interactive  videotape 
courseware.  It  will  connect  a 
VIC-20  or  Commodore  64  to 
various  Panasonic,  Magnavox, 
Canon,  and  Hitachi  video  cas- 
sette recorders. 

The  interface,  which  sells 
for  $49.95,  is  being  marketed  in 
conjunction  with  Videobook's 
Comp-U'Tutor  Computer/VCR 


Will  This  Happen 

to  You? 

► 

NOT  IF  YOU  BUY  YOUR  PRINTER       ~ 
FROM...     ^_,^.;^^^SS5 


After  reading  this  issue  of  Compute,  you  are  now  fully  aware  of  the 
many  outstanding  printers  on  the  market  today.  But  what  you  might 
not  be  aware  of  is  that  the  printer  you  like  best,  might  not  be 
compatible  with  your  computer  and  software.  (The  picture  above  is 
good  example  of  printer  incompatibility).  At  the  Printer  Store.we 
specialize  in  printers,  so  our  experienced  professional  staff  can  help 
you  choose  the  right  printer  for  your  personal  and  business  needs.  If 
you  want  the  Best  Value,  Low  Price,  Product  Availability,  and 
Support,  call  The  Printer  Store  and  ask  us  about; 

•  FREE  TECHNICAL  CONSULTATION 

•  FULL  AFTER  SALE  SUPPORT 

•  FULL  FACTORY  AUTHORIZED  SERVICE 
DOT  MATRIX  printers       ,    LETTER  QUALITY  printers 


C.  ITOH  851C 
Prowriter       '« 

•  120  CPS  -  1,3K  Buffer  -  144x60  dots  lTnch 
Nx9  dot  matrix  -  Proportional  Spacing  -  8  Character 
sizes  -  5  unique  alphabets  -  Greek  character  set  - 
Graphic  symbols  -  bi-directional,  logic-seeking  - 
Adjustable  tractors  -  Single-sheet  friction  feed  - 
Vertical  &  horizontal  tabbing. 
C.  ITOH  8510  Prowriter  List  $795    $  395 


EPSON  SERIES 

FX80 S  CALL 

FX  100 $  CALL 

OKIDATA  SERIES 

82A S  CALL 

83A „ S  CALL 

92A S  CALL 

93A $  CALL 

84  (parallel) S  CALL 

C.  ITOH  SERIES 

8510  Prowriter $  395 

Prowriter  II S  CALL 

New!  Banana S  239 

IDS  SERIES 

Microprism  480 S  CALL 

Prism  80 S  CALL 

Prism  132 S  CALL 

GEMINI  SERIES 

Gemini  10X S  CALL 

Gemini  15 S  CALL 

NEC  8023 S  419 

Toshlbi  P  1350 $  1750 


BROTHER  SERIES 

HR-1  (parallel) $  CALL 

HR-1  (serial).... S  CALL 

HR-15 S  CALL 


COMREX  SERIES 

CR-1  (parallel)., 

CR-1  (serial) 

CR-2 ,.., 


S  795 

S  865 

S  CALL 

C.ITOH  SERIES 

F-10  40CPS S  CALL 

F10  55  CPS $  CALL 

Oiitywrltir         46K S  CALL 


BROTHER 
HR-1 


•  16  CPS  -  Bi-direciional  -  Super  and  Subscript 

•  IBM  Selectric  type  ribbon  -  Prints  up  to  6  copies 

•  Ideal  for  word  processing 

Parallel List  1100    $  Cdll 

Senal  List  1200    $  Cdll 


INTERFACE  EQUIPMENT 


NEC  SERIES 

3510 

3530 

3550 

7710 

7720 

7730 


..S  CALL 

i  CALL 
..S  CALL 

.1  2425 
..S  2900 
.  S2400 


Apple  Dumpling S145 

Grappier  Plus S  CALL 

Complete  stock  of 

Epson  Accessories!  CALL 
Custom  Printer  Cables  for 

Apple,  Atari,  IBM 

TfiS-80  S  CALL 


Printer  Stands:  large  .  .S9S 
Printers  Stands:  small  .  SZ5 
Printer  Ribbons  ...$  CALL 
Printef  Sound  Enclosure!  CALL 
Vic  20/Comm. 
64  Interface  . . .  S  CALL 


NEC  Accessories S  CALL 


In  order  to  serve  you  better.  The  Printer  Store  wilj 
tie  moving  to  larger  facilities.  The  imva  sliouid  l» 
completed  liy  Aug  Z5. 


We  carry  a  full  line  of  Cables  and  Accessories 
Call  (714)  241-0701  and  ask  us  about. . . 


1 )  LOW  PRICES 

2)  SAME  DAY  SHIPPING 

3)  FREE  TECHNICAL  SUPPORT 

4)  FULL  SERVICE  OPTION 


THE 


PHONE  REBATE 


Printer 


We  are  so  confident  of  our  LOW  PRICES  and  SUPPORT  that  we 
are  going  to  sk  you  to  make  ttie  initial  investment  by  calling 
us.  In  return,  wtien  you  buy  your  printer  from  us,  we  will  rebate 
the  cost  of  your  call  and  deduct  it  from  your  invoice. 

STORE  -   2720  S.  Harbor  Blvd.,  SuUe  E,  Santa  Ana,  CA  92704 


HOW  TO  ORDER:  Ourphonelinesare  opcnfrom  8a.m.  to  6  p.m.  PST  Monday- 
Friday.  We  accept  VISA,  MASTERCtiARGE  (at  no  extra  charge),  personal 
ctiecks  take  two  weeks  to  clear.  COD's  accepted.  Same-day  sliipment  on 
orders  placed  tKlore  1  pm.  Marrulaclurer's  warranty  applicable  on  all  equip- 
ment. Prices  subject  to  change. 


o  The  Pnnter  store.  1983 


NEW! 
LOWER  PRICES 
LONGER  LENGTHS 


DATA  TRAC  I  C-06,  C-12,  C-24 

From  the  leading  supplier  af  Computer 
Grade  Cassettes,  new.  longer  lengtli  C-12's 
(6  minutes  per  side)  provide  ttie  extra  few 
leet  needed  tor  some  16K  programs. 


Premium  5- screw  stietl  with  leader 
—  BASF  tape 

Internationally  acclaimed. 
Tliousands  ot  repeal  users. 

Error  Free  •  Money  back  Guarantee 


1  Dozen 


2  Dozen 


C-06 


7.00 


13.00 


C-12 


7.50 


14.Q0 


0-24 


9.0Q 


17.00 


2.50 


4.00 


500  C-12's— 38C  each., 

\  Shipping  S17    500 

SCO  Soite%  13c  03  4  s:hipping  StG  SOO 


$3.00/100   S20.00/1000 


CASSETTE 
STORAGE  CADDY 

Holds  1 2  cassttntjs  w/o  boxes 
Includos  edge  labels  .^^^ 

$2"  ^ 


and  Indei  card 


BASF  QUALIMETRIC 
aSJ— i       FLEXI-DISC 

'S))*'!    ^'''    SSDD.  Son  Sec 
o§2ijJ    Lifetime  warranty! 
$26.95/10     S120.0O/50     5215.00/100 


MICRO  CASSETTES 
in  convenient  short  lengths 


MC-10 

MC-20 

MC-30 

1  Doz 

1650 

1B0O 

19,00 

2  Dqz 

32  50      1      34  50 

3600 

Same  superior  tape  in 
prefnijfTi  she!)  with 
leaders.  Includes  box. 


SHIPPINGIHANDUNG  $3.50 

Any  quantity  (etcept  500  special) 


NOTE:  Outside  48  Conlin.  Stales  shipping 
S3. 50  PLUS  SI  per  caddy:  per  dozen  cas- 
settes: per  dozen  bones:  per  tQ  discs. 


In  Com.  U.S.  stiipmenis  are  by  UPS 
unless  Parcel  Post  requesleit 


Calilornia  residents  add  Sales  Tai 


WRITE  FOR  FREE  BROCHURE 
ASK  FOR  QUANTITY  DISCOUNTS 
for  IMMEDIATE  SHIPMENT 
on  Credit  Card  Orders 

Call:  213/700-0330 


VORK  lOXomputer  Luore 

9525  Vassar  Ave.  #CM   Chatsworth.  CA  91311 


Interaciivc  Atithoriu^  System.  The 
program,  which  sells  for  $149.95, 
permits  the  playback  of  packaged 
commercial  programs,  or  will 
allow  the  user  to  write  custom 
programs. 

Videohook  Corporatioit 
P.O.  Box  19597 
Seattle,  WA  98109 


Ergonomic 
Joysticks 


Comrex  has  released  a  pair  of 
joysticks  described  as  "elec- 
tronically and  ergonomicallv" 
designed  to  allow  game  players 
to  improve  their  skills  with  less 
fatigue. 

The  deluxe  ComMander, 
which  sells  for  $44,95,  is  shaped 
like  a  hand-held  telephone.  It 
features  a  precision  control,  self- 
centering  handle,  and  four  firing 
buttons  that  have  user-definable 
functions. 

The  standard  ComMander, 
which  is  priced  at  $19.95,  is  de- 
signed with  rounded  corners 
and  two  fire  buttons. 

Both  joysticks,  which  are 
equipped  with  coiled  cords,  are 
compatible  with  Atari  400/800, 
Commodore  64,  and  VlC-20  com- 
puters. The  deluxe  model  will 
work  with  Apple  computers. 

Comrex  International,  Inc. 
3701  Skypnrk  Drive 
Torrance,  CA  90505 
(213)  373-0280 


The  Comrex  deluxe  ComMander  joystick 
is  shaped  like  a  hand-held  telephone. 
The  standard  model  has  rounded,  smooth 
corners  to  fit  large  and  small  hands. 


Apple  Space 
Game 

Pentaptis  is  a  high-resolution 
space  survival  game  for  Apple  II 
computers  from  Turning  Point 
Software. 

You  begin  the  game  in  an 
uncharted  region  of  another 
universe.  To  return  home,  you 
must  defeat  the  Devilish  Mutant 
Army  for  control  of  the  stargates 
between  universes.  You  must 
use  your  speed  and  intelligence 
to  defeat  waves  of  Drangels, 
Eagulls,  and  the  Pentapus. 

Pentapns,  which  sells  for 
$29.95,  incorporates  graphics, 
sound,  high-score  editing,  and 
four  skill  levels,  including  a 
children's  level. 

Turning  Point  Software,  Inc. 
U  A  Main  Street 
Watertoum,  MA  02172 
(617)923-4441 


64K  VIC  Memory 
Expansion 

Advanced  Processor  Systems 
has  introduced  SELECT-A-RAM, 
a  64K  niemory  expansion  car- 
tridge for  the  VIC-20.  The  car- 
tridge provides  two  expansion 
slots  for  program  or  game  car- 
tridges or  additional  memory 
expansion  up  to  192K. 

The  unit  plugs  into  the  VIC 
memory  expansion  slot  and 
draws  its  power  from  the  VlC-20. 
The  memory  expander,  which 
sells  for  $169,  features  write  pro- 
tection, a  reset  switch,  and  op- 
tional use  of  external  power. 

Advanced  Processor  Systems 
P.O.  Box 43006 
Austin,  TX  7S745 
(512)  441-3202 


64  Spreadsheet 

Multiplan,  a  multiple-page  finan- 
cial spreadsheet  program  pro- 
duced by  Microsoft,  will  be  mar- 


MEETING  YOUR 
SOFTWARE 

NEEDS  FOR  LESS!!! 


"commodore  64c 

Brodsrbund 

Choplilter  (C)  30.40 

Sea  Fox  (CI  27.00 

Serpentine  (C)  27.00 

David's  Midnight  Magic  (D)  27.00 

Sky  Blazer  (D)  27.00 

A.E,  (D)  27.00 

Load  Runner  (D)  27.00 
Commodors 

Aasembter  6-1  (D)  16.90 

Logo  (D|  47.90 

Pilot  (Dl  47.90 

Pet  Emulator  (01  43.00 

Screen  Editor  (D)  16-90 

Bonus  Pack  ID.  C)  16.90 
CPIM  2.2  Operating 

System  |CT)  69.00 

Super  Expander  VSP  (CT)  16.90 

Easy  Finance  (1 -5)  (Di  19.35 

Easy  Call  64  (D)  73.75 

The  Manager  (D)  43.00 

Easy  Script  (D)  43.00 

Easy  Mail  64(D)  16.90 

Easy  Spell 64(D)  16.90 

Word /Name  Machine  (D)  16.90 

tntro  to  Basic  I  (C)  19.35 
Gortok  &  The  Microchips  (C)    24.80 

Easy  Lesson  f  Easy  Quiz  (D)  16.90 

Music  Machine  (CT)  16.90 

Codewriter  (0)  47.90 

Zork1,2, 3(D)  29.50 

Inventory  Mgmt.  (D)  43.00 

Payroll /Checkwrlting  (D)  43.00 

Accts.  Payable  (D)  43.00 

Accts.  Receivable  (D)  43,00 

General  Ledger  (D)  43.00 
Crsstlve  Software 
CarCosIS              (0)10.15(0)13.50 
Decision  Maker   (C)10.T5  (D)  13.50 
Household 

Finance  (0)13.50(0)16.90 

Home  Inventory  (C)  10.15  (D)  13.50 
Loan  Analyzer      (C)  10.15  (D)  13.50 

Moon  Dust  (CT)  23.65 

Astroblilz(CT)  23.65 

Trashman  (CT)  23.65 

Save  New  York !  (CT)  23 .65 

Spitball  (CT)  23.65 

Crisis  Mountain  (CT)  23.65 
Datimoil 

Space  Ark  (D)  24.25 

Swashbuckler  (D)  24.25 
□alaiolt      _ 

Zaxxon  (D,  C)  27.00 

Moonshutlle  (CT)  20.30 

PooYan(C.  D.  CT)  20.30 

Sandaof  Egypt  (D)  20.30 

Bruce  Lee  (D.C.CT)  27.00 

Genesis  (D.C)  27,00 

Healhcim  (D.C.CT)  27,00 

O'RileysMinelD.C)  20,30 
EPYX 

Terripleof  Apshal  (D)  27.00 
Upper  Reaches  of 

Apshai  (D)  13.55 

Curse ol  HA  (D)  13.55 

Sword  of  Fargoal  ID)  20.30 


Jumpman  |D,C) 
Heg  Sollwars 
He9Mon64(CT) 
Turtle  Graphics  II  (CT) 
Hes  Writer  64  (CT) 
Gridrunner  (CT) 
Retro  Ball  (CT) 
Benji  Space  Rescue  (D) 

27,00 

27.00 
40.60 
30.45 
20-30 
27.00 
30-45 

Tlmeworkj 
Dungeons  of  Algebra 

Dragons  (D.  C) 
Robbers  of  the  Lost 

Tomb  (D,  C) 
Wall  Street  (D,  C) 
Money  Manager  (D,  C) 
Electronic  Checkbook  (D.  C) 

19.10 

19.10 
19.10 
19.10 
19-10 

Coco  (D.C) 
Micro  Prose 

33.80 

Word  Pro  3  + 

65.00 

Floyd  01  the  Jungle  (D) 
Hellcat  Ace  (D) 

20.80 

20.80 

AATARI 

Sierra  On-Llne 

Brodsrbund 

Frogger  (D,C) 

23.65 

David's  Midnight  Magic  (D) 

23.90 

New  Jawbreaker  (D) 

20.30 

Apple  Panic  (C,  D) 

20,30 

Crossfire  (D) 

20.30 

Choplifter  (D) 

23.70 

Sirius  Software 

Serpentine  (D.  C) 

23.70 

Squish  'Em  (D) 

23.65 

A.E-  (D) 

23.70 

Replon  (D) 

27.00 

Sea  Fox  (D) 

20.30 

Blade/Blackpoole(D) 

27.00 

Labyrinth  (0.  C) 

20.30 

Critical  Mass  (D) 

27.00 

Genetic  Drift  (D.C) 

20.30 

Type  Attack  (D) 

27,00 

DatBiofI 

Way-Out  (D) 

27.00 

Micropainter  (D) 

22.65 

Bandits  (D) 

27.00 

Pac,  Coast  Hwy.  (C) 

16.90 

Ozzy  Ozone  (0 

23,65 

Text  Wizard  (D) 

33.80 

Shadow  Scorcher  (0) 

23.65 

Canyon  Climber  (C,  D) 

16,90 

Fast  Eddie  (D) 

23.65 

Clowns  and  Balloons  (C) 

16,90 

Spinnaker 

Basic  Compiler  (D) 

54.00 

Face  Maker  (D,  CT) 

23.65 

Spell  Wizard  (0) 

27.00 

Hey  Diddle  Diddle  (D) 

20.30 

Sands  of  Egypt  (D) 

20.30 

Kindercomp  (D) 

20.30 

Zaxxon  (D.  C) 

27.00 

Snooper  Troops  1  (D( 

27.00 

Moon  Shuttle  (D.C) 

20.30 

Fraction  Fever  (D,  CT) 

23.65 

O'Riley's  Mine(D,C) 

20.30 

Amazing  Thing  (0) 

27.00 

Rosen's  Brigade  (D,  C) 

11.50 

Synapso 

PooYan(D.C) 

20.30 

Ft.  Apocalypse  (D.C) 

23.70 

Bruce  Lee  (D,  C.  CT) 

27.00 

Protector  (D.  C) 

23.70 

Genesis  (D.  C.  CT) 

27,00 

Survivor  (D,  C) 

23.70 

Datamost 

Shamjs  (D,  C) 

23.70 

Swashbuckler  (D,  CT) 

24.25 

Qz.  commodore 


Commodore  64 

239.95 

1541  Disk  Drive 

239.95 

1530Datasette 

61.30 

1525  Printer 

214,75 

1701  Color  Monitor 

239.95 

1600  Modem 

50.50 

Parallel  Interface 

60.00 

3  Port  Expander 

30.00 

6  Poa  Expander 

75.00 

64  Prog.  Ref.  Guide 

17.00 

DidtsttM 

BASF5V4-'SSDD2pak 


5.50 


BASF  Soft  Box  (10)  23.80 
Joyailcks 

Pointmaater  10.95 

Pointmaster  Pro  1B.55 

FIreConirol  7.85 

Wico  Command  Ctrl.  19.50 

Wico"Bo33"  13.50 

Wico  Red  Ball  20.75 

CoiKO 

Adam  Computer  Sysleiti  595.00 

AdatTi  iDomputer  Module  445.00 


VIC  20,  T.I.  99  4A,  RADIO  SHACK,  IBM-PC 
SOFTWARE  LISTS  AVAILABLE 


For  additional  information  and  to  order,  call  Toll  free: 

1-800-527-8698    1-800-442-8717 


Outside  Texas 


Inside  Texas 


EPYX 

Temple  of  Apshai  (D) 

Crush,  Crumble  and 

Chomp  (D.  C)  20,30 

Jumpman  (O)  27,00 

Crypt  of  the  Undead(D)  27.00 
First  Star 

Call  (or  Availability  and  Pricing 
Micro  Prote 

Chopper  Rescue  (D.C)  20.75 

Floyd  of  the  JungiefD,  C)  20.75 

Hellcat  Ace  (D,  C)  20.75 

Wingman  (D,  C)  25.00 
SynapM 

Shamuall  (0,  C)  23.70 

Pharoah's  Curse  (D,C)  23.70 

Ft.  Apocalypse  (D,C)  23,70 

Nautilus  (D.C)  20.30 

Blue  Max  (D,  C)  23.70 

Dimension  X(D,C)  23.70 

Zeppelin  (D.  C)  23.70 
Spinnaker 

Pacemaker  (CT.  D)  23.65 

Snooper  Troop  1  or  2  (D)  30.40 

Hey  Diddle  Diddle  (D)  20,30 

Story  Machine  (D)  23.65 
Thorn  E.M.I. 

Jumbo  Jet  Pilot  (CT)  30.45 

Sub  Commander  (CT)  30.45 

Figure  Fun  (C)  20.30 

Soccer  (CT)  30.45 

Kickback  (CT)  30.45 

Home  Fin.  Mgmt.  (C)  20.30 

Darts  (C)  2030 
Parker  Brot, 

Frogger  37,00 

Q  Bert  37.00 

Astro  Chase  37.00 


Broderbund 

Serpentina  (D) 
A-  E.  (D) 

Arcade  Machine  (D) 
Apple  Panic  (D) 
Choplifter  (D) 


23.70 
23.70 
40.60 
20.30 
23.70 
David's  Midnight  Magic  (D)  23.70 
Datasoft 

Zaxxon  (D)  27.00 

Canyon  Climber  (D)  16.90 

Sands  of  Egypt  (D)  20.30 

Faihom  40(D)  23.70 

Lisp  (D)  67.50 

Micro  Painter  (D)  23.70 

Poo  Yan  (D)  20.30 

Bruce  Lee  (D)  27,00 

Genesis  (D)  27.00 

Moonshutlle  (D)  20.30 

SIrlus 

Call  for  Availability  and  Pricing 
Spinnaker 

Pacemaker  (D)  23,65 

Story  Machine  (D)  23.65 

Hey  Diddle  Diddle  (D)  20.60 

ProgratiM  for  all  Sy$ts(nt 
AvalonHill  Call  for 

Strategic  Availability 

Simulations  and  Price 


Terms  and  Ordering  Information: 

To  order  call  1-800-527-8698  anij  send  certified  checks, 
money  orders  or  personal  checks  (allow  2  weeks  to  clear), 
or  use  your  VISA,  Master  Card  or  American  Express. 
Inside  Texas  call  1-800-442-8717.  Include  $2  for  postage 
and  handling.  (C.O.D.orijers  add  $1.50)  UPS  Blue  Label 
$3, Canada  S6.  Other  countries  include  10%  for  P&H.  All 
products  factory  sealed  with  manufacture's  warranty.  All 
returns  require  R.A.#.  Prices  subject  to  change  without 
notice.  Order  desk  hours;  Mon-Fri    8-5,  Sat    9-1    CST. 
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802  N.  HIGH  SUITE  H 
LONGVIEW,  TEXAS  75601 


keted  by  Commodore  for  the 
Commodore  64  computer. 

The  program,  which  can 
handle  home  budgets,  financial 
planning,  small  business  ac- 
counting, educational  projects, 
and  statistics,  will  be  available 
on  disk  for  less  than  $100. 
Commodore 

Computer  Sifstems  Division 
2200  Wilsoii  Drive 
West  Chester.  PA  19380 
(215)431-9100 


Tl  Joystick 


The  Prostick  2002  is  a  direct  re- 
placement joystick  for  the  TI-99/4 
and  TI-99/4A  computers. 

The  joystick,  which  sells  for 
$29.95,  requires  no  additional 
interface  for  connection  with  the 
TI.  It  includes  a  4- way/8- way 
switchable  gateplate  that  allows 
8-way  action  to  be  disabled  when 
playing  games  that  are  limited  to 
vertical  and  horizontal  movement. 

The  Prostick  2002  has  two 
firing  buttons  located  on  the  top 
end  of  the  base,  allowing  both 
right-  and  left-handed  play.  The 
fire  buttons  are  designed  to  be 
controlled  by  the  index  finger 
for  faster  response  and  decreased 
fatigue  during  play. 

NezL'port  Controls 
15425  Los  Gatos  Boulevard 
Los  Gatos,  CA  95030 
(408)  358-3439 


Data  Base 
Manager  For  VIC 
And  64 

Jini  Micro  Systems,  creator  of 
several  data  base  managers  for 
Commodore  computers,  has 
released  Mini  Jini,  a  record 
keeper  for  the  VIC  and  64. 

The  program  is  available  in 
cartridge  format,  and  files  can  be 
saved  to  either  tape  or  disk.  It 
will  handle  between  35  and  500 
records,  depending  on  available 
memory. 

Mini  Jini  will  accept  up  to  10 
fields  of  information  per  record, 
can  sort  by  any  field,  and  can 
search  by  record  number,  name, 
or  phrase.  When  used  with  a 
printer,  the  program  can  gener- 
ate reports  and  mailing  labels. 

Mini  Jini  includes  a  math 
function  to  perform  calculations 
on  file  data,  and  it  can  be  used 
in  conjunction  with  word  pro- 
cessing programs  to  produce 
personalized  letters  and  custom 
reports. 

The  program  sells  for  $89.95. 
Data  files  with  sample  records 
set  up  for  dozens  of  applications 
are  available  on  disk  for  $14.95, 
or  tape  for  $9.95. 

jini  Micro  Systems,  Inc. 

Box  274 

Riverdale,  NY  10463 


TI-99/4A  Cartridge 
Connection 

Romox  is  producing  the 
GamePort  expansion  module  for 
the  TI-99/4A.  The  module,  which 
sells  for  $39.95,  plugs  into  the 
computer's  I/O  port  and  accesses 
the  9900  CPU  directly. 

The  GamePort  is  designed 
to  circumvent  the  reported  plan 
of  Texas  Instruments  to  modify 
its  internal  software  to  accept 
only  cartridges  programmed  in 
Tl's  patented  GROM  format. 

The  GamePort  module, 
which  accepts  both  GROM  and 
standard  ROM  cartridges,  in- 
cludes an  8K  ROM,  plus  RAM 
memory. 

Romox,  Inc. 
501  Vaudell  Way 
Campbell,  CA 


Grade  And 

Attendance 

Manager 

GradeCalc  is  a  grade  and  atten- 
dance management  package 
designed  to  relieve  teachers  of 
time-consuming,  record-keeping 
tasks. 

The  grade  section  can  aver- 
age grades  using  a  variety  of 
methods,  including  percentage 


COMMODORE  64  SOFTWARE 


THE  MAILER:  A  list  and  label  prosram  Ideal  for  mailins 
lists.  Disk.  $30.00 

SUPER  MAILER:  A  deluxe  version.  Adds  sorts,  searches, 
alphabetizing  and  more.  Disk.  $50.00 

DATA-BYTES:  A  data-storase  and  retrieval  prosram. 
Prints  hard  copies.  Integrates  witti  the  nnailer,  Disk.  $30.00 

THE  EDITOR:  Integrates  with  mailer  and  data  bytes  pro- 
grams. Add  sorts,  enhanced  editing  features  and  more. 
Disk. $30.00 

SALES  64:  Generates  personalized  sales  orders,  receipts, 
invoices  &  packing  slips  on  economical  plain  paper. 
Tractor  feed  compatible.  Disk.  $30.00 

TRS80  Model  100  version  S30-00  {(ape)  Deluxe  version  S50.00  (Mpe) 


SUSIE  SOFTWARE 

709  Wilshirc  Drive,  Mt.  Prospect,  IL  60056  (312)  394-5165 


GENERIC  GAMES 

*  *  * 

STAR  THIEF 

BY  JAMES  NITCHALS 
(APPLE  II  DISK) 

ONLY  $9.95 

COD  ORDERS  MUST  PAY  SHIPPING  AND  HANDUNG.  DEALER  IN- 
QUIRIES INVITED.  FOR  ADDITIONAL  INFO  ON  NEW  RELEASES  SEE 
THE  READER  INFORMATION  CARDS  IN  THE  BACK  OF  THIS  MAGA- 
ZINE. 
SEND  CHECK  OR  MONEY  ORDER  TO: 


N  C  D 


P.O.  Box  947 
Solana  Beach,  CA  92075 
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YOU 


AX 

AWTI-EUB    PRTftOL 
UPPLK   CIDIP  SPTDKH 
XiKADE   KACHIMI 
UHOR  A5SMr.,T 
Ai-XRI    BOOnCKPIP   KIT 
ATJUtI    JWCBO   ASSBM/TCTT    BD 
ATARI    XlcrcSOrr   BASIC    II 
ATARI    MUSIC  COIWOSKR-KIM 
ATARI    PILOT  KmCATtOH-BM 
ATARI    PhOCRAKKKR   HIT 
ATARI    SPZEC    UXDJHG 

atari  tbch  u5eb  hotes 

ataki  touch  TYPIWC 

ATARI   HRlTfcS 

BAKDITS 

BWK   BTRECr  MJUTIR 

BASIC   OOKPILUl 

UTTLZ    FOS   aORHAHDI 

baitlx  or  sniLcm 
BiLEsraAo 

t^I    BUDK    or    BLKCKKKL 
BOOK   or   ATARI    SOrTHARC'a) 

cyts 

CAF'IJ    COSU 
CASTLS   W1JTW5TIIS 
CEHTIPSJZ-FOH 
CHOPLirrXP    -    BDK 

coco 

CtJCD    II 
cnu^H   ?RIMT 
OQtKUHtCATO])  %1T 
GCxrVXRSATIONAL   rHKCH 
^CMVERSATICHAL   SPAWISH 
THE  COSMIC   BUJUiCI 
CBOSSFIRE-KW 
CYTPCII   KAfTIRS 

DA  ruz£ 

DATA    PEHTKT 

DATALIKK 

DAVID'S   HIDKIGffT   KACIC 

DtADLINF 

DELFEKDER 

DE    R£   ATARI 

CIO  DUt^ 

DIE):   HWdAGBR 

DI^   HORXSHOP 

DISIXTTE    INVOnOSY   SYSTEM 

OISKET 

DISJ^CAH 

Dl£]»IZ 

Division  I 

DHIEPER   RIVTR   LINE 

DOOCK    RACIR 

FASTXHH    FRDHT    (1941) 

EOIT  6502-rCm 

Tia    EXICATQR   KIT 

rAOPUKlH 

FAHTASTIC  vaiAi^Z-ROM 

7ILE   KUJAGXR  * 

ttaXlKlJa.   WIZARD 

rUUBt    UDHDS 

TTJ'SB  aoiaion-ta€ 
n.lP   OUT 
riRZBIXD-MM 
rem  APOCAl-rPSK 

rADCCcn 

CAIJLIIAM 
C5«JST   EMOX-rlTtRS 
CaOSTLi:   NAJiOH 
SUiBI   KASTX? 

GRAPHIC    CDTEKAtOft 

CRAFBIC;    KA5TXP 

TKI    HOME    ACCtXJUTAHT 


H.9i 

39. «i 

249. 9S 

39.95 
ta9.91 
&9.9S 

29.95 
24.9^ 
79- »S 
J4.9^ 
69.95 
99.9b 
39.95 
39.95 
Z9-9S 
19.95 
19.95 
14.95 
AO.OG 
3«.9S 
29.95 
**.« 
44.95 
49. 9S 
39.  M 
39.99 
279.95 
i*.95 
59.95 
19.95 
44.95 
19.95 
44.95 
99,95 
39.95 
]«.95 
49.95 
44.95 
19.95 
44. 9'^ 
29.95 
14.95 
24.95 
49.95 
40.00 
29. « 
44.95 
30. CQ 
14.95 
29,95 
I99>95 
164.95 
34.95 
34.95 
«.95 
S9.9i 
34.95 
14.95 
?9.95 
39.95 
J4.95 
)4.95 
44.95 
39. 15 
24.95 
19.99 
44-»5 
24.95 
39.95 
74.95 


£9.95 
21.95 
24.49 
2t.95 
2T,9S 
41.49 
2?.  95 
179. S5 
64.49 
«4.49 
29.95 
94.95 
45.95 
54.95 
21.95 
17.95 
^6.95 
24.95 
49.95 
E<B.95 
27.95 
n.95 
21.95 
27. « 
14.95 
24.49 
54.95 
ia.95 
21.95 
51.95 
11. 9S 
34.49 
27.95 
27.95 
314.95 
42.95 
42.95 
27.95 
29.95 
27.95 
11-95 
74.95 
27.95 
24.49 
14.49 
31  .95 
14.49 
11.95 
21.95 
24.49 
17.49 
34. 4» 
2a.  QD 
21.95 
J1.95 
21  .95 
J4.49 
21.95 
144.95 
149.45 
24.49 
2fi.49 
M.95 
59.95 
24.95 
26-95 
21.95 
21.95 
24.49 
24.49 
31,95 
21.95 
17.95 
2V.95 
2e-49 
17.49 
27.95 
54.95 


JR  [PEBQCMl 

ATARI      RanaSystems 


JOOWIt   TO  THE    PLAHrrS 

JUMPtlAH 

RIDS    AMD   THI   ATARl-HOor: 

RIHQKROOW 

t-RAZY   EflOOTOJT-ROM 

KIK   AaTKUR'S   HEIR 

LEG  I  Om  AIRE 

LFTTXH   PEftTECT    140/301 

utttxh  perfect  utility 
ujwar  liefer 
kaster  hzhory  hap 
haster  type 
hatiim:  zone 
hatch  boxes 

HAURAUDZn 

MAJI/65    (WITH   OS/A") 

mCKZY    IH   CHEAT   (KTTdOORS 

hiker  2q49'er-r0h 
missile  cohkah[>-rom 
kmster  smash 

HORL 

NAtn-ILUS 

HBdHMANCER 

THE   NICHTHAU 

OPERATION   WHIRL'MIHD 

OS-A+    i-    BASIC    A' 

PAIWT 

PIHCALl 

P.M.AKIHATOJt 

POKES-S.A.M. 

PRIPPIE    II 

PTRAHlO    PUZZLER 

DIE 

RASTER   BLASTER 

FlEADItK    FLlOlfT 

fCCWDABOVT 

&AKKY   LIGHTTWrr 

SA»R    THE    SEA   SZHPZHT 

SEA   QRASCtI 

SEA  rox 

747    UUiDINC   SIMULATOf) 

SHADCM  WORLD 

SHAKJS-RDH 

SHEAICZHS 

SOPTWAHi   AUTO-lCtrrH    (SAM) 

SPEED   READ    PLUS 

SPEEDWAY    BLAST 

fiPEU-lHC    BUt   CAHCS 

SPELL   MlZAHfl 

&TAPCK35S 

STAR  MAZE 

STAR   RAIOERS-ROM 

STAR    HARRIOR 

STORY   KACHIME 

SUPERMAH    III 

SURVIV^^n 

SWIFTY    TACK    HA^Ei* 

5YM    A5SKBLEP 

TELECQ#l 

TELETALE 

TEI.ETAR1 

TEMPLE    OF    APSilAl 

TEXT   VIZARD    I 

TIGERS    IN   TlfZ    SNOT 

-rm   ItliSE 

ttpe  attack 
TVTTi  nunTi 
vc 
visicalc 

MARI^ICX'S    HIVENCE 

WAY   OUT 

W[ZARI^PRIHCE:SS    HiRtS   AKV 

VIZARD  or   WDR   ~    ROH 

lOUH   AtAPU    COnPlTTER-BOOK 

TjOPH   1    II   OR    III 


29.45 
39.95 
19.95 
29.95 
49.95 
29-95 
35. OD 
149-95 
29-95 
29.95 
6.95 
39-95 
29.95 
29.95 
14-95 

ao-00 

49.95 
49.95 
34-95 
29.95 
44.95 
34.95 
34.95 
39.95 
14.95 
8Q.DG 
39.95 
29.95 
34.95 
34.95 
34.95 
44-95 
44.95 
29-95 
44.95 
29.95 
14-95 
2J-95 
]4.95 
29.95 
23-95 
34. 95 
44-95 
39.95 
59.95 
59.95 
29.95 
19.95 
79.95 
1:9.95 
44.95 
44.9'5 
39.95 
J4.95 
49.95 
34.95 
29.95 
49.95 
6*. 95 
49.95 
39.95 

19.95 
99-95 
39.95 
39.95 
39.95 
34.95 
25. OD 
TM.OO 
34.95 
19.95 
32.95 
44-95 

16.95 
39.95 
39.95 


21.95 
27,95 
11.95 
21.95 
14-49 
31.95 
35.00 
199-95 
31.95 
21.95 
4.95 
37.95 
2T.95 
11.95 
24.49 
54.95 
35.95 
14.49 
26.49 
21.95 
11.95 
24. 4S 
24.49 
31.95 
J4.49 
54-95 
29.95 
21-95 
24,49 
17.95 
24-49 
11.95 
11.95 
31.95 
iS.95 
21,95 
24.49 
16.95 
24.49 
21.95 
16.95 
34.49 
31.95 
21.95 
41.49 
41.49 
21.95 
27.95 
54.95 
21.96 
31.95 
J  1.95 
27.95 
24-49 
15-95 
24-49 
31,95 
14-49 
49.95 
36.95 
37.95 
37.95 
69-95 
27.95 
21.95 
27.95 
17.95 
17,49 
149.95 
24.49 
23-95 
23.95 
31.45 
12.95 
27.95 
37.95 


AMIEX   C0U)R    I    PLUS   nCMlTOR 

APPLE    EMULATOR  CBMH 

CAftDSOARD    16   CART    *    RESCf)  VlC-20 

TKE    CARD?     (FOB   PARALLEL   PRTR)  CBnMtVIC-21 

CARPiETTE  (CAsarPTz  iHTrcm        caHMivic-20 

CARDAPTEF/l    ATARI    3600    IMTrCE   VIC-IO 
CARDWRITER/1    LIGWT   PEH    K/CASS    CBM*4*VIC-3i5 
OWOWOOM   «4   HOME   COifPUTEll 
CQHHODORSCDLOR   PLOTTER 
□amODORE    1530    DATASETTt 
COIOWCOU    154  T    DISK   CtXIVE 
COWUDORE    1515    MIWTEH 
COtOtODOU    1600    M»IM 
COfOtOOORK   COLOR  MCNJLTOR 


3)9. QO 

79-50 

70-00 

5».00 

22. on 

50.00 

16.50 

369.50 

CBHK4bVIC-'20    11 9. 50 

CBHfrUVlC-JO      65.00 

CBH64AVIC-20    129.50 

CVMMlVtC-20    339.  5Q 

CBMt«VIC-10      95.50 

CBMM*VIC-'20    2t9.50 


COWIOOOEE    1650    AinOolAL   hODEH   □IHM*VlC-2fl    1fi^.5Q 


MICRO   EKPAFSIDH    CHASSIS 

VIDEO   PAX   BO    IBD    COLUHM> 

VIDEO   PAX   eo   WITH   CP/H 

ATAJU    aOQ    4aK 

ATARI    1200    ■64K 

ATARI    KUMIHIC   JXTPAD 

ATARI    PKKHAIWEB   KIT 

410    BECCRDER 

410    01 SE   DRIVE 

150    IHTZRFAnE   I«min_£ 

C.    ITOK    PRCHnUTXn   I 

C.    ITOM    PROmUTXH   II 

C,    ITOH   STAHWRlTER 

CASSETTE    'M   CABTRlOCE  PILI 

ELEPHAHT   SS/5D   DI5E 

El^PKAKT   SS/DD   OLSX 

ELEPHAHT   DS/M   0I£3£ 

EKOM    rX'BO   W/TRACTDR 

Ef^oN   MX-10D    r/T 

n.tP'M-rlL£ 

CEMIMI-10    PRINTER 

CmMI-15    PHJWTEF 

IR   MCHZ    400    KEYBOARD 

ItOTC    J2K    RAM 

lilTEC   4St    RAM 

HOSAIC   64K    RAM   SELECT* 

HATES   SHAianSDDI    300    BO 

HATES  aujmvxm  120O  bd 

NEC   e023    PRIHTEH 
HEC    If    HIRES   CREtN   3CftN 
liEC    13'    ECDHD   CRIIH    5CW 
M^VATlON  J>Oat  hODBH 
WaVATlOW   SMART-CAT    lOJ 
'MCrVATIOH   SHART-CAT    212 
PXtlCOH   SS/SD/IDR       [  UJK) 
PEflCOM   S5/DD/I0B      (17tXI 
PERCOM   SS/DD/2DRS    I 152XJ 
PERCOH   DS/DD/IDR       !152X! 
PERCc«   DS/DD/3DRS    [704X1 
SIGHALMAM    KK    II    HDOEH 
EJ^t     12-    A>iaCA  MONITOR 
VtpSAWRITER    GRAPH    TABI.ET 
WICQ  JOYSTICK 
»IICQ   RIDBALL  JOYSTICX 
yiCO   DELUKE   JOYSTICK 
MICQ  TRACKHALL 
MICO    12    IT   CITEHSIOH   caxi 


CBMU 


15.75 

C&tibi  129-00 

CBMU  219.00 

|4B9-il00    IS&ATE-169-00 

J519-tl00    MBATE-419.0D 

94.95 


49.95 
T2.95 
414.95 

3»4 .95 
£49.95 

1125.00 

21.95 

10/16-95 

S0/19.9S 

16/35-95 

LOirii: 

LOHII 

2I-9S 

Lown 

UWt  J 
94.95 
69.95 
119.95 
I49.9S 
194.95 
499.95 
459-95 
149-95 
79.95 
109.95 
179.95 
434.95 
419.95 
539.95 
859.95 
649.95 
939.45 
79.95 
159.95 
339.95 
21.95 
24.95 
29.45 
49.95 
6.95 


f C  commodo 


m 

» 

;' 

1 

B'*^*:- 

Pi| 

AIKRESSOR  CARr/VIC20 

ALIEX   SOCOEH  CASS/VICZO 

A.^DKD«EDA   CONQUEST  CASS/CU 

APt   ESCATC  DIS)t/VIC3D 

BLADE    OF    BLACXPOOLX  OlSKfCH 

CAVE<-IN  CAKt/VIC20 

CHECEBOQE  CASS/VIC20 
COWl/TER   FOOTRALL   STRATlCTt  CaSS/GU 

COHPUTEFt   STOCKS   4    90KDS  CASS/C64 

CWC&ITRATICK  CAS3/vrC30 

CRITICAL  «AES  OISI/C** 

CROSSFIRE  CASS/VLC30 


L-- 


(D  Hayes 

r   FRANKLIN. 

NEC      IBI 


27.50 
10.25 
12.50 
27.50 
27.50 
2^.56 
13.75 
11.00 
n.75 
11.  DO 
27.50 
21.00 
34.50 


DEADLY   PUCK 
DEADLY   SKIES 
DD«3W   ATTACC 
DROJIS 
TACOUEER 
P-AST    EDOr 
FIHAL  ORBIT 
fT-    APOCALYPSE 
FROGCER 
FTCJIT   FLY 
FUEL   PIRATES 
CALACTJC    B.I.1T* 

CAuiCTic  cnossriPE 

caia  meVER 

GCLO   HINE 

GRIDRUHMER 

HAMCMAM 

HARRIER 

HESHOM   iWHITOfi 

HESWRITER   W/P 

HESURITER   €4 

HEY    DIOOLE   DIDDLE 

rn   SEAftCH   or   THE   MOST 

AHAZIHS   THIHC  PISV^^^M 

JUKP    NAN 
XIHttERCOm* 
HARTIAH    RAIDER 
METEOR 
HGfiSlTEK  MAZ£ 
miLTISOUKS   SrNTH 
NUHEER::HA5tP 

iiUMaEft  crumch 
mnuLER  CuLPER 
PKAROH'5   CURSE 
PREDATOR 
PMlTECtCR 


CAJff/V:C20 

CART/v:C20 

CART/VIC3D 

CASS4DL£Kyt' 

DISI^/CH 

cAirr/v:c20 

CAJtT/CM 
CASSAQIiS^yM 
DISK/ CM 
CKSS/V1C20 
CASB/VlC2a 
CASS/VIC20 
CASB/V1C20 
CART/VICM 
D1SK/VIC20 
CART/U/VIC30  27.50 
flKCASS/VICJO  6.25 
CASS/V[C2a  24.00 

CART/MfcVlC20    27.50 
CART/VIC20  27.50 

CAPT/CM  31.00 


24.09 
27.50 
2T.iO 
24.00 
24.00 
27.50 
24-00 
24.00 
24-00 
9-00 
n.OD 
17.35 
lO.lSi 
27.50 
27.50 


OlSf/VU 


27.50 
27. 5Q 
21.00 
11.75 
7,50 
27.50 
11, ?& 


DISK/CU 
DIEK/CU 
DISK/VrC20 
HlXA^S/VIC30 
CABT/VIC20 
DISK/VIC20 
6KCASS/VIC20     17,25 
CAPT/VICIO  27.50 

BR  CASS/VIClO  17.25 
CASSfcDISK/H  24.00 
CART/VIC20  27,50 

CART/VIC>0  10-35 


QUICK    BROMN    POK    M/P   CART/VIC3B/44    44.75 


RAIH    GN    I  SHAH 

RZAOANSMICS 

HEFTOB 

KCSCUE  AT    RlC£L 

RETRO   BALL 

RICOCHET 

ROBOT   PAHIC 

SCORPIQW 

SKAKU5 

SKARX  TRAP 

SIDEWINDER 

SIMM 

6502    E4tOF   DEV    SYS 

SKI    BUN 

SHAKE    HYT£ 

SNOOPER  TROOPS    H 

SPACE   ArrACT 

3PlD£R  CITY 

SPORTS   SEARCH 

SQUISH' CFl 

STAfiCHOSS 

SUKVtVM 

SUARni 

SWORO   :>F    FARCOAL 


CASS/VICiO  1J.75 

CART/V1C30  27.50 

ElSfJCb*  17-50 

16KCASS/VIC20  JI.OO 

CAfTT/CM  27.50 

ax   CASS/VIC20  13.75 

CART/VIC20  27.50 

CAHT/VIC20  37.50 

CAHT/VEC20  27,50 

D1EK/VIC20  11.75 

BK   CASS/VIC30  31.00 

CASS/VIC20  11,00 

CASS/M/VIC20  21.00 

SKCASS/VIC20  ^2.50 

CART/CM  24.00 

DISK/CM  37.50 

BK   CASS/VJC20  fc.25 

CAfrr/M/VIc20  2T.50 

CASS/V1C20  11.75 

CAffT/t4/VIC20  24,00 

DISK/DM  2T.50 

CASSiDISK/CM  24.00 

CASS/VIC2D  21. OQ 

!tKCA^/VlC2D  21.00 


STH   THE   SoUHD/KUSIC   CABT/VIC20 


TELEK^ARD 

TORC 

TumoIL 

TURTLE  GRAPHICS 

TURTLE  GRAPHICS    H 

TYPE   AWACK 

tne  V£IN   CAMZ 

VIC    rCWTH 

VIC^MZN 

VIC  MLSIC   CQKPOSEP 

UICTRn^ 

VIC    VAJKJC 

VIDEO   SEAKCH 

WOKD   SEARCH 

ZOHK    I    II    OR    III 


4t.oa 

15,75 
12.25 
27.50 
2T.50 
41.00 


CA££/CM 

CASS/VlClO 

CART/VIC20 

CAftT/VIcaO 

CART/CH 

CART/M/VICID    27.50 

DlSK/VIC2tl  24.00 

CAJrr/VIC20 

RKCAS.S/VIC20 

CARTA'IClO 

CASS/VIC20 

CASH/V1C30 

CASS/VIC30 

CASS/VIC20 


4V.25 

15.00 
ID.  00 
12.25 
9.00 
lJ-75 
13.75 
J7.50 


MOSAIC 
64KRAM 


EaGLE 

Texas 


Instruments  Oi\IDAIA 


ton  FASTEST  miLIVERY;  CASHltK'S  CHECK  OU  VISH/HASTERCARD  (MO  EXTRA  CIIBHCE  TOK  CAHJlS.  INCLUDE  HUHIH.  IIPIRATIOK  DIITI,  MAUI,  ADDKlSS  t  PHOHH .  PESSOHAI,  CHECK 
ALUIU  ^  JEEKS  TO  CLEAH.  PUHCflASE  OKDEK  MUST  IHCLUDE  CHECK.  SHIFFIKC  S,  HANDLIHC:  CHTJTlNEMTAt.  U.S.  i*  tf>  »IH|,  U.P.S.  STllKIT  AUDRISS  UCDIHItOl  AM  FRO  ALASKA 
HAWAII  I  mWJTXlRS  5.  ISIO  K[N|;  FUHE  lUN  1S»  Itl!.  HlSJ.  IHCUIDB  PHONIt  HDMBEB  II ITH  ALL  OROIItS.  ALL  ITEMS  AH£  NEU  HITH  MANUFACTUKEH'S  1IAK«AKTT.  ATFLE  COUNTBV. 
LTD.  CANStfT  GIIAhANTEE  THE  MEBCHAMTABILITY  OF  AMY  PRODUCT.  PRICES  AK£  SUBJECT  TO  AVAILABILITV  b  CHASdE  WITHDITT  MOTICEi.  DUE  TO  PUS  LOW  PRICES,  ALL  SALES  ARE 
FINAL.  MTUWEIl  MERCHANDISE  IS  SUBJECT  TO  A  RiSTtKKING  FEE  I.  MUST  CU.ME  IM  ORICIKAL  UHDAMACEU  CARTON  WITH  HHA  KUBBEB-  HO  SOFTyARE  EICHANGES.  CALlFOBKlA 
RESIDENTS  ADD  i\  TAX-  SENO  SI  FOB  NEU  FALL  CATALOG  (GOOO  TOUAHD  FIRST  PUHCHASEl-  APPLE  COUNTSK,  LTD.  IS  A  DISCOOVT  BAIL  OEDKR  UOOSS  TOR  TBI  ■ICBOCOIIPIITIR 
IHDUSTRV    t     IS    A   CALIFOBKIA   CORPORATION    NOT    AFFILIATED    WITH    AFPLE    COMPDTER    INC.    APPLE     IS    THADEHAM    OF    APPLE    COHPUTER    INC.  t.l.flj 

Call  us. .  .we  can  help!  (800)  222-2602      p  o  box  1099, 

Tech.  Info.,  Order  status  Call  (619)  765-0239  Juliaa    Calif.   92036 

Apple  Country,  Ltd  is  a  DISCOUNT  MAIL  ORDER  HOUSE  (or  ttie  micro  computer  industry 

and  IS  a  California  corporalion  not  alliliated  with  Apple  Compuler  Inc    Apple  is  a  Irademark  of  Apple  Computer  Inc. 


Prices  the  Compe 

i         Commodore64 521.9  -1 


Commodore 
64 

Avalon  Hill  Game  Company 

180-701  B-1  Nuclear  BorT>&er(Cj J12 

18O-702  Midway  Campaign  Id J12 

180-703  North  Allaniic 

Convoy  RaidBr  (C|    (12 

180-7CM  Nukewar  (C| S12 

180706  Planet  Miners  (C)  ,.J12 

180712Compute(Slocksi  Bonds  |C|  SIS 
180719AndromedaConquesl(C]  .S14 

181-721  Compuler 

Foolball  Strategy  (C) 112 

181-732  Telengard(C) $16 

Broderbund 

David's  Midnigt^l  Magic  , $23 

Choplit(er(CT)  $34 

Serpentine  (CT)    $27 

Sea  Fox  (CT)    $27 


Roundaboul _ 

6>lestoad- 

..$20 
.$20 

Mating  Zone 

EPYXyAutomated  Simulat 

14E-036  Jump  Man  IDl 

Human  Engineered 
Software  (HES) 

HEE-307  6502  Pmfessional 

Dev.  System  (C) 

HEE  400  Retro  Ball  (Crtl 

HEE-401  Hesman(Crt) 

HEE-402  Turlle  Graptiics  II  (Crl) ,    . 
HEE-404He5wriler64|Crl) 
HEE-412Gndrunner(Cf1i 

Infocom 

63E-001  Zofk  (D) 

$20 

ons 

$27 

-$23 
$27 
$27 
$45 
$35 
$27 

.$  27 

63E-002Zorkn(D) 

63E-003  Deadline  (0) 

63E-004  Starcross  |0( .    . 

$  27 
.$  34 

t  27 

63E-0O5Zorklll(D) 

t  27 

Sierra  On- Line 

54E-04a  FrOflger  (D)   

$23 

Jaw  Breaker 

.$20 

Sirius  Software 

70E-036  Blade  otBlackpoole(D|  $27 

70E-037  Type  Allack  (Cflj $27 

70E-043Rep1on(D) $27 

70E-O46  Critical  Mass  |D| $27 

70E-424  Snake  Byte  (Crl) $23 

70E-445  Spider  City  (Crt) $27 

70E-447  Squisti 'em  (Crl) $23 

70E-448  Final  Orbit  (Crt)  $23 

Spinnaker 

SKE-001  Snooper  Troops  *1  (0| $30 

SKE-004  Facamakar  (D) $  23 

SKE-006KindercDmp(D) $  20 

SKE-008  Hey  Diddle  Diddle  (D) $  20 

SKE-009  In  Search  ol  (tie  Most 

Amazing  Thine $  27 

Fraction  Fever  (CTl $  20 

Alphaijal  Zoo  (CT) , $  20 

Delia  Drawing  (CT) $  23 

Snyapse  Software 

SSE-01 1  Ft.  Apocalypse  (0) $  23 

SSE-016  Dralbs  (D) $  23 

SSE-01 9  Survivor  (D) $  23 

SSE-020  Pharoah's  Curse  (0) $  23 

SSE-311  Ft.  Apocalypse  (C) $  23 

SSE-316  Drelbs  (C) $  23 

SSE-319Survivor(C) $23 

SSE-320  Pharoah's  Curse  (C)    $  23 

United  Microwave 
Industries 

92E-302  Renaissance  (Cj $  20 

92E-331  HoIOrManla(C)  $20 


Commodore  64 $219 

VIC  20, $  99 

1525  Printer $229 

1530  Datasette $  64 

1541  DiskDrive $249 

1600  !*Iodem .$  89 

1701  Commodore  l*lonUor $289 

VIC  1311  Joystick $     8 

VIC  1312  GameFaddles $  16 


Vic  20 


VIC  12103KMemory£i!pander  ,  ,         ,    $34 
VIC  1 1 10 8K  Memory  Eipander.         $52 

VIC  1 1 1 1  16K  tilemory  Expander $89 

VIC  1011  RS232Tefminallnler(ace  .  ..$43 

VIC  1211  Super  Expander $59    vic'i'sOo'vIcmodem'.'T"'"'.',"','! ! '.'.'.  .lai 

Vl\^  Programmer's  Reference  Guide  -     $14 


VIC  1213  Vicmon  Machine 

Language  Monitor  $45 

VT  106A  Recreation  Pack $45 

VT  107A  Home  Calculation  Pack $45 


Educational 


Books 


Music 

Kids  and  the  Vic $  i8   Vic  Music  Composer  (CTl »  42 

Programmer's  Reference  Guide  (Vic)  .$  14    HESSynthesound(CT) $  49 

Programmer's  Reference  Guide  (64)    .$18 


Language  Arts 

Super  Hangman  (C)  $  14 

Simon/Hess  (C) $  13 

Concentration  (C) , $  13 

Home  Babysitting  $  23 

Math 

Skylvlath(C) $  12 

Space  Division , $  12 

Bingo  Speed  Math  (CT)  $  23 

Number  Crunch  (CT) .  $  23 

NumbefChaser  $  17 

NumberGu!per , $  17 


Reading  and  Language  Arts 

Finger  Spelling  (D.C)  , $  12 

My  Spelling  Easel  (Ages  3-10) .,$  26 


Programming  Tectiniques 

Intro  to  Basic  Prog.  I $  22 

Intro  to  Bas  ic  Prog.  II $  22 

Programmer's  Aid  Cart  $  22 

Turlle  Graphics/Hess  (CTl $  29 

Gorteck  &  the  li^lcrochip $  23 

Social  Studies/Science 

Visible  Solar  System $  23 

Reaganomics  (CTl $  27 


Commodore  Software 


Avenger $  23 

Superslot   $  23 

Siiper Alien ..  ..$  23 

Jupiter  Lander $  23 

Draw  Poker $  23 

Midnight  Drive  $  23 

Radar  Rat  Race $  23 

RaidonFortKnox $23 

Sargon  II  Cliess  $  29 

Cosmic  Cruncher $  23 

Gorf $  29 

Omega  Race $  29 

Sea  Wolf S  23 


Advenlureland , $ 

Pirate  Cove $ 

Mission  Impossible $ 

The  Count ,.....,,..$ 

Voodoo  Castle $ 

TheSkyis  Falling $ 

Mote  Attack  .,,......$ 

Bingo  Speed  Math $ 

Home  Babysitter ,  $ 

Visible  Solar  System  .$ 

Personal  Finance $ 

Quick  Brown  Fox  ,..,,. $ 

Call  Toll  Fraa 


Avalon  Hill 

Nuke  War $12 

Automated  Simulations 

Rescue  at  Rigel  (C) $20 

Ricochet(C)  $15 

Monstei  Mate  (CT) $27 

Sword  of  Fargoai  $27 

Broderbund 

Martian  Raider $15 

Mullisound  Synthesizer $15 

Shark  Trap $15 

Sky  Blazer  (CT) $27 

Sea  Fox  (CT) $27 

A.E.ICT) $27 

Creative  Software 

B(ack  Hole  (CT) $36 

Trashman  (CT)  $36 

AstrobtitzlCT) $36 

City  Bombers  Minefield  (CT) $20 

Apple  Panic  (CT) $36 

Chop(ifler(CTl    $36 

Serpent!  ne(C'r) $36 

Videomania  (CT) $36 

Terraguard  (CT) $36 

HES  Software 

HESMon(CTl $  29 

H  ES  Writer  (CT) $  29 

Synthesound  Music  Syntlvesizer  (CT)   $  49 

TurtleGraphics(CT) $  29 

VIC  Forth  (CTl $  45 

Victrek(C) $   15 

Predator  (CT) $  27 

Sirius 

Type  Attack ,  $27 

Snake  Byte .$27 

Thorn  EMI 

River  Rescue  (CT) $  29 

Mutant  Herd  (CTl  *  29 

Tronix 

GalaclicBI(tz(C) $17 

Swarm  (C) $20 

Sidewinder  (C) $20 

Gold  Fever  (CT) $27 

Deadly  Skies  (CT) $27 

United  Microware 

Spiders  olMars(CT) $34 

Meteor  Run  (CT) $  24 

Amok  (C)$  15    (CTl  $  27 

Alien  Blitz (Cl$  17     (CT}$  27 

Skymalh(C) $  12 

Space  Division  (C) $  12 

Super  Hangman  (C)  $  14 

TheAlien(C) $  17 

3DMaze(C) $  12 

Kosmic  Kamikaze  (C) $  17 

SubChase(C) $  15 

Renaissance $  20 

Cloud  Burst  (CT) $  27 

Satellites  &  Meteorites  (CT) $  34 

Outworld(CT> $  34 

WordCraH $  65 


1-800-634-6766 


Order  Line  Only 


1095  E.  Twain  (702)  796-0296 
Las  Vegas,  Nevada  89109 

IrTformation  &  Order  Inquiries 

(702)  369-5523 

We  accept  VISA  and  MasterCard 

Mon.  —  Fri.  8  A.M.  to  6  P.M. 

Sat.  9  A. M.  to  6  P.M. 

Dealers'  Inquiries  Invited 


tition  Cant  Touch 


A  ATARI 

600XL  .  . . CALL 
800XL  .  . . CALL 
1400XL  . .  CALL 
1450XLD  .CALL 

Atari  Inc. 

1010RBCorOar $  72 

1060  Disk  Drive S419 

1027  Primer Call 

1025Prinl6r M09 

830  Modem S!" 

660  Interlace »159 

481EnIenainer S64 

482  Educator »'  10 

4B3  Programmer S  52 

4S4Communicalor S289 

The  Bookkeeper  Kil S165 

CX4104  Mailing  Lisl J  19 

CXL  4007  Music  Composer    $  42 

Proarammino  2&3 EaS  22 

Conversational  Lanjuages    S  42 

0X4018  Pilot S  55 

CX405  Pilot i  92 

CXL4003  Assembler  Editor  S  42 

CX6126  Microsoft  Basic  II S  62 

CXL4022  PaoMan  - .  -  .$  30 

CXL4020 Centipede S  X 

CXL4006  Super  Breakout J  26 

CXL4008  Space  Invaders $26 

CXU009  ComputerCtlSSS '.  .i  26 

CXL401 1  Star  Raiders  S  30 

CXL4012  Missile  Command t  26 

CXL4013  Asteroids $  26 

The  Bookkeeper  -  - S102 

HomeFliineManaBer   . . , $  36 

Atari  Speed  Reading  $  54 

Home  Manager  Kit S  55 

Family  Finance J  36 

Time  Wise i  23 

Galaician $  30 

Defender %  30 

Paint - i  30 

Oil I  30 

Dig  Dug S  30 

£T  Phono  Home $  34 

AlariWriler   S  65 

Donkey  Kong  S  36 

Atari  Logo CALL 


Business  St  UUtities 

Vlsicalc S169 

Computari'sFinancial Wizard S  45 

Color  Accountant . , S  65 

Mail  Merge J  20 

Data  Perfect t  75 

Letter  Pertect  S105 

BankStreotWriier  S  45 

TentWizard    S  65 

File  Manager  800  + $  65 

Datasm652.0 %  59 

Syn  AssemblBf I  34 

KDos J  59 

Lisp  Interpreter %  79 

Basic  Compiler S  65 

Datalink S  27 

Atari  World    %  39 

Color  Print      _ J  27 

Graphics  Generator %  17 

Miciopainter        S  23 

BishopsSquare     S  20 

Graphics  Master S  17 

P  MP  Piopony  Management   $179 


Educational 


Pre-School 

Sammy  the  Sea  Serpent (C)$13(Dl$19 

Preschool  I.Q.  Builder  (QJ13(D)$24 

My  Fi/st  Alphabet(D)   S26 

Alien  Couiltar/PaceFlashlD.CI $26 

Humpty  Dumpty/Jack4JIII|C| -$25 

Faoemal<er(D) $23 

Juggles  Ralnt>ow(D.C) $22 


Let's  Spoll{C| $13 

DollYoursell  Spell  inafC)       $16  ^^^^^     ^  ,f,g  Great  Outdoors 

S.A.T.  College  Board  Prep(C| $89  j        L   .  ,   ^g, 

Profixes(D|  $26   '^'"P'  „°'    ," 


Math 

MonkeyUpATrea(D.C) 519 

Video  Math  Flash  Cards(0,C)  S13 

Alglcaic(D,C) $19 

Compumath-Fractlons  (Ca23(D)S29 

CompumalhDecimals (C|J23(0)S29 

Golf  ClassicJCompubar  (Angles)     .  (0,C)$26 

Cash  Register  (C)$13(D)$19 

Big  Math  Attack (Cl$17(D)$22 

Computation  Concentration ,  (C)  $1 3  (D)  1 1 5 


Reading  and  Language  Arts 

My  First  AlpHabetlD)   $26 

.WordfTiaker(D.C) $19 


Printers 


NEC 


Programming  Techniques 

Pilot  (Cons,  or  Educalorl       (C)  $59,  (Dl  $99 

Invitation  to  Prog.  »2  (CI $22 

Invitation  to  Prog.  #3 (CI $22 

Tricky  Tutorials— Santa  Cruz 

TT#1  Display  Lists  (CD)  $  17 

TT«2  HorlzWert.  Scrolling  (C,D) $  17 

TT#3  Page  Flipping  (C,  D) $  '7 

TT#4  Basics  of  Animation  |C,  Dl  . .  .$  17 
TT#5  Player  M isslle  Graptilcs  (C,  D[ .  $  24 

TTi6  South  &  Music  (CO) $  24 

TT#7  Disk  Utilities  (D) S  2* 

TT#8  Character  Graphics $  19 

TT#9GTIA $   IB 

TT#10Sound  Effects $  19 

Spelling  Genle(D,C) 119  Page6 *  ^ 

Compuread  (C)$17(D)$23  The  Next  Step *  27 

Memory  Bui|der(ConcBntration  (C)S13(D|S1 9  NfHJ    Hit  t  L*it 

.,.$  35 

...$27 

VooalTuTary  Builder  V.'.  .'..,.  .(C)$13(D)$"l9   Raster  Blaster $20 

Fishing  lor  HomonyrTvs(C| $13   Deadline »  3* 

Hey  Diddle  Diddle(O) $  20  Rjchoche! $  15 

Snooper  Troops  1  4  2  (DJ Ea.  $  32  Wiz  &  Princess .$  22 

Story  MachinelD) $23  All  Baba  and  the  Forty  TtHeves $  22 

Crossword  Magic(Dl $34  canyon  Climber $  20 

Crush.  Crumble  4  Chomp  $  20 

ii,,«ir  Zorkl.114111 Ea.$  27 

Music  ComposeriCTl"*."' $25  !°"P°-  «»«"'"™ If. 

Jerry  White's  Music  LesSons(C)  $20   Frogger J  " 

Magic  Melody  Box - $14  Chopllfter $  23 

Curse  of  Ra *  IS 

Ulysses  and  the  Golden  Fleece $  23 

Social  Studies  and  Geography  Tigers  in  tne  snow $  27 

Globemaster(D) $  27  David's  Midnight  Magic  (D) $  23 

States  and  Capitals  (C) $  12  SkyBla2er(D|  *  22 

European  Countries  and  Capitals  (C)  .$  12  Serpentine  (D| $22 

Sea  Fox  (D) *  20 

Sands  of  Egypt  (D) $  27 

„  Pool400(CT) $  27 

PJOnitOrS  Sort (D)$  27(CT)$  30 

i<u.»%w.^  WIzardolWor (D)$  27(CT)$  30 

Leading  Edge  '^''^'3  '°J  ;„. J  ?? 


I^JEC8023A  $«9  Gorilla  Hi-Res  12" $  85  Gold  Rush  (D|  . 


Epson 

FXBO  $599 

FXIOOFt $799 

Okidata 

MLB2A $419 

ML83A $549 

ML84P $979 

Citoh 


Bandlts(D)  $  23 

Way  Out  (D) $  27 

Amdek  Fast Eddy(CT)  $24 

Colon $299  vWorldWar(CT) $24 

The  Cosmic  Balance  (D) $  27 

USI  Chess  (D| $  45 

Amber $149  Checker (0) - . . .  .$  34 

Raptillian(D.C) $  23 

NEC  Submarine  Commander  (CT) $34 

8510Prowriter  $365   Green  Screen $169  Jumbo  JetPilot  (CT) $  34 

Mannesmann  Tally  iurcS, ::.::::;::::::::::::;» I? 

MT160L $599  Gemini  zaxxon  (D.C)  .  - $27 

Qume  Gemini  10x $299  Miner  2049er(CT) J  34 

QumeSprintll  + $1349    GeminilS $479  Twerps(D). $  23 

Flip  Out  (D( S  20 

The  Birth  ot  the  PhoenI* $  16 

Protectorll   (D($  23(CT)$  29 

BasBball(CT) ,  ..$  34 

PreppiBll(D.C) $  23 

Arcade  Machine(D) $39 

Cap  n'  Cosmos (D) $  29 

Spy's  Demise  (0) $  15 

Repton(D) $  27 

Critical  Mass  (D) $  27 

Bumper  Bash  (CTl $  27 

Millionaire  (D) $  55 

Poker  Sam  (Dl $  17 

Jump  Man  |D1 $  27 

HelltireWarrior(D,C)  $  27 

Tfion(D) $  27 

Adventure  in  Time  (D) S  20 

Wavy  Navy  (0) $  23 

Squish'em  [CT\ $  23 

Final  Orbit  (CT) $  23 

Pharo3h'sCufse(D.CTl $  23 

River  Quest  (O.C)  $23 


•  •  Specials  of  the  Month  •* 

WICO  "BOSS"  Joystick $  15.00 

WICO  Redball  Joystick  $  24.00 

Elephant  Disks  s/s $  16-00 

Verbatim  Disks s/d .$  24.00 

Disk  Savers  (Plastic  Sleeves)  Multi  Colored  1  Doz $     4.50 

Disk  Mailers S     3.50 

Flip  n'File  Diskette  Holder  w/Lock  (holds  25) $  18.50 

Flip  n'File  Diskette  Box  (holds  50) S  21.00 

Gorilla  Bai>ana  Printer $209.00 

Hayes  Smartmodem  300 $209.00 

Percom  Single  Density  Drive $389.00 

Percom  Double  Density  Drive $51 5.00 


Computer  Outlet 

ORD£fl/NG  INFORMATION  AND  TERMS:  For  Fast  Deiivery  send  c^shter  checks,  money  orders  or  aired  bank  wire  transfers.  Persoryal  and  company  checks  aftow  3  weeks  to 
dear  COD  orders  fS300  ny'rumurr^iand  r  :  ot  aU  orders  over  S300  SctiOQ!  purchase  orders  welcomed.  Prices  refiect  3  cash  discount  oniy  and  are  subject  to  change  Pfease 
enclose  ^ouf  phone  number  with  any  orders  Shipping  —  Software  t$2  50  minimum)  Shipping  —  Hardware  (please  call}.  Foreign  orders.  APO  &  FPO  orders  —  STO  minimum 
and  }5^'o  of  ali  Orders  over  $tOO  Nevada  residents  edtf  5v^  =  s  sales  tax  All  goods  are  new  and  tnclude  factory  warranty.  Due  to  our  low  prices,  all  sales  are  tmal.  All  returns 
musi  have  a  return  authorization  number  Calf  702-369-5523  to  otitain  one  before  returning  goods  tor  replacement. 


scores  and  letter  grades.  Reports 
on  missing  assignments,  grade 
totals,  averages,  and  assignment 
summaries  are  available. 

The  attendance  records  can 
generate  cumulative  totals  of  all 
attendance  records,  or  can  pro- 
duce reports  on  excessive  ab- 
sences or  other  problems. 

GradeCalc  is  available  for  the 
Commodore  64,  PET,  and  Apple 
computers  for  $29.95.  An  Atari 
version  sells  for  $34.95, 

Tamarack  Softivare,  Inc. 
Water  Street 
Darby.  MT  59819 
(406)821-4596 


Wizware  For 
Children 

A  new  line  of  software  called 
Wizware,  designed  for  children 
between  6  and  16,  is  available 
from  Scholastic.  The  programs 
are  available  on  disk  and  tape 


for  a  variety  of  computers  in- 
cluding Apple  II,  Atari,  TI-99/4A, 
and  VlC-20. 

Microzine  is  a  children's 
magazine  in  computer  format. 
The  articles  in  the  magazine  are 
designed  to  be  worked  with, 
rather  than  simply  read.  Micro- 
zine sells  for  $39.95  per  issue,  or 
$149  for  six  bimonthly  issues. 
The  programs  are  compatible 
with  Apple  11  and  Atari  800 
computers. 

Turtle  Tracks  teaches  chil- 
dren the  fundamentals  of  pro- 
gramming by  allowing  them  to 
experiment  with  colors  and 
shapes  as  they  control  the  move- 
ments of  a  "turtle." 

Square  Pairs  teaches  young- 
sters number  matching  and  how 
to  recognize  words  and  patterns. 
As  the  children  learn  more,  they 
can  use  the  software  to  design 
their  own  games. 

Your  VIC-20  is  a  hands-on 
introduction  to  the  VIC  for 
first-time  users.  The  program 


explains  input/output  devices, 
graphics,  music,  and  BASIC 
programming. 

Electronic  Party  allows  chil- 
dren to  create  electronic  greeting 
cards,  and  lets  them  move  sur- 
prise packages  through  a  maze. 
Inside  each  of  the  packages  is  a 
surprise  activity  that  can  be  acted 
out. 

Scholastic,  Inc. 
730  Broadmni 
New  York,  NYWU03 
(212)505-3000 


Murder  Mystery  - 

Computer  Style 

^^^^^■^^^^^■^^^^^■^^■^■^^^ 

Infocom's  The  Witness  is  a  1930s 
whodunit  that  is  available  for 
most  popular  microcomputers. 

The  game  immerses  players 
in  1930s  detail.  In  addition  to  the 
game  diskette,  the  package  in- 
cludes a  replica  of  a  30s  detective 
magazine  that  serves  as  a  users 


CASSETTES  !  !  ! 

FOR  YOUR  COMPUTER 

DIGITAL 

•  Computer  Grade     •  Wide  Dynamic  Range 

•  100%  Error  Free  •  5  Screw  Housing 

•  FuNv  Guaranteed  •  Carefutiv  Packed 

Alt  Prices  Include  U.  S.  Shipping 
'  Phone  Orders  Add  52. 50  C.  0.  D.  Fee ' 

COMPUTER  TAPE  PRICES 

Length      25  LOT  100  LOT        1000  LOT 


C-5  .45;  11.25 

C-10  .50/12.50 

C-20  .SS.'13.75 


.35/35.00  30/300.00 
.35/35.00  30/300.00 
.40/40.00      35'350.00 


BASF  DPS  Tapes  Add  .05  Cents  Per  Tape 
—  Custom  Lengths  Available  - 
. . .  Write  For  Volume  Prices. . . 

—  Noreico  Cassette  Cases  and  Labels  - 

Iw/r/i  Cassette  Orders  Only\ 

12-249  Cases    20  Ea.  250-  13  Ea 

12  Labels  for  .20  1 20  for  1  70 

1 000  Pinfeed  Labels  1 4.50 

S£ND  MONEY  ORDERS  OR  CHECKS  TO: 

CASS-A-TAPES 

Box8123-C 

Kansas  City,  fi/10  641 12 

816-444-4651 


BIG    BYTES 


IS41  Disk  Driwe. S219 

1701  Color  Monilor S219 


1530Dalas[tte S  59 

1526  Printer! OOcBs  S2B9 


leODMoriEra 

1520  Prlnter/Ploller... 


..S  59       1525Prrntir  SOcpi S199 

.,S159      1650AuIoMoilem S  89 


COMMODORE  64  $219 


Progfdmmers  (juidc, S  17 

Assembler/MorMtOi  ...S  15 

Super  Expantimt .., 5  \B 

LOGO......... „.... S  39 

PILOT , S  39 

CP/M2.2 s  59 

Intio  TO  eASlC_... S  17 

VKidle  Solar  Sv*iem £  16 

La!ari*n ...._  s  IB 

Pinbdil  SpecT^cutjr S  IG 

ZORK  Ml.or  ML S  25 

Suspended S  2S 

CREATIVE  SOFTWARE 

Cai  Com S  13 

Household  Fmanc« S  23 

Homa  Inwfloiotv  S    13 

Moon  Du&i ,., „.  S  29 

Trashmdn..,,., ,„. S   29 

SIERRA  On-LINE 

froggt*.,, S  24 

Jawtjreaher S  21 

Ml.  Cool s  24 

C'PBPV S  2? 


Eaiv  Calc..,,,.., S  55 

Ewv  F>nanct  l.ll,lll,IV.V..S  17 

Th*  Uan^gnr S  35 

G«nB>4il  Ltdg«r .....,.,.  S  35 

Accounts  fteoivtbln. S  3S 

Accounti  Payibt* $  35 

P*yroll S  35 

InwBntofv. ...S  35 

Cod«wni»r„^„.„,^,^™„,. S  39 

Easy  Script „ S  3S 

E«v  Spall ..., .,.  S  17 

SPINNAKER  SOFTWARE 

Fic«miktf S  ?6 

Kindircomp...,.,,, S   22 

Snoopet  Troops  Nil.  1 S    29 

DffllJDiaming S   29 

Storv  Mflchmn... S    29 

HES  SOFTWARE 

Gndfunnsr S  Z9 

SvnthDiaund  64:: „.„  $  36 

&4  Forih.. „ S  49 

6502  Dev^rlojjBr S  23 


VIC  -  20  $99 


PrograrT^mers  CuiCl«.... 

VicMon 

Atomv  Mission 

Voodoo  C4(Tlt„„,,.,.,., 
VijLbr*  SdIsi  Sysi«m.. 

Goftek  Learner 

Chtld'i  r.Q 

Menu  Planner. 


CREATIVE  SOFTWARE 

Chcphrrer. 

HouH^riQ^d  Finance 

Home  Invpniorv., 

Homf  Office 

PBINTEHS 

Siar  Gemini  ICX 

Prow'iXtr  S51C 


$  26 
S  16 
S  26 


S309 
S379 


Simplicalc S  )S 

flit' S  IB 

WiiHf , „.  S  IB 

Monvv  DaCitlOni  I  Of  II.....  S  22 

Spaerf/Bingo  A^atlt $  1? 

Quilmailci S  17 

VoueOwn  I.Q S  t? 

Imro  in  BASIC  I  0(.|l S  19 

SIERRA.ON'LINE 

FraSScr ,,..S  24 

JawbieaUtr $   22 

Ljna  Levpar S    24 

Sammy S  24 

ACCESSORIES 

Elephant  DilfceilBS S  20 

Elephant  Tiuntti  Stnrag*.,.  S    19 


Even  if  it's  not  listed,  we  probably  have  it, 
at  the  lovest  price  possible. 
SEND  FOR  OUH  CATAI.OC;; 


All  prices  include  cash  discount;,  VISA/MC  tjrders  accepited  -  add  3.5'/,.  C.Q.D,  ordisrs 
add  S5.00.  Far  quickest  delivery  send  bank  check  or  money  order.  All  sales  are  Final 
-  defective  merchandise  exchanged  For  same  product  only.  Shipping  add  3'X.  (52. 50 
minimum!.  Ohio  customers  add  5.5%  sales  tax.  Catalog  Sl.QD  [refundable  first  order), 
rv,1DST  OROERB  SHIPPED  WITHIN  10  HOURS! 

VISA/MC  ORDERSONLY   1 -800- 6  38-2  6  1  7 

Information  and  in  Ohio    1-216-758-0009 


1309  BOARDMAN-POLAND  ROAD.  POLAND..  OHIO  ^iilSlI 
HOURS:  Monday  -  Friday  10  a.m.  -  10  p.m..  Saturday  -  10  a. h. 


330    COMPUTE!    October  1983 


THE  FIRST  LOW  COST  6502  COMPUTER  WITH  48K  RAM  THAT'S  COMPLETELY  COMPATIBLE  WITH  APPLE  II® 

Introducing  the  RAM-TECH 'RT  2  computer  which  offers  you  greater  flexibility  than  the  Apple  11 +*  at  a  price  that's  easier 
on  your  finances.  The  RT  2  will  run  all  software  and  use  all  peripheral  hardware  designed  for  the  Apple  II  + .» It  s  100%  Apple 
compatible  yet  it  offers  you  features  not  available  on  the  Apple  II  +  .'* 

COMPARE  THESE  FEATURES: 

—  supports  upper  &  lower  case  characters  from  the  keyboard 

—  high  quality  ABS  case  will  not  crack  and  is  light  weight  -^^ 

—  RF  modulator  included  in  addition  to  composite  video  output  WCCr/- 

—  high  quality  light-touch  keyboard  with  upper/lower  case  key  WCfr/- 

—  15  key  numeric  key  pad  for  fast  data  entry  (optional)  %Ur 

—  high  power  switching  power  supply  (8.5  amps  total)  will  power  two  'I  ^^^^^^^_ 
disk  drives  and  several  peripherals  easily,  has  internal  circuit  breaker                                               ^^^^^^^^^    ^ 

—  eight  expansion  slots  to  increase  flexibility  with  peripheral  cards 

—  48K  RAf^  expandable  to  64K  (192K  RAM  upgrade  card  available  soon) 

—  socketed  IC's  for  quick  and  easy  service 

—  thousands  of  programs  (business  &  home)  available 

—  operates  identically  to  the  Apple  II  +  '  with  exception  of  extra  features  on  RT  2 

—  full  90  days  parts  and  labor  warranty  with  fast  service  turn-around 

THE  RAM-TECH-  RT  2  IS  EVERYTHING  YOU  ALWAYS  WANTED  FROM  AN  APPLE''  (AND  MORE),  BUT  THOUGHT  YOU  COULDNT  AFFORD.  AHO  THAT'S  GOOD  NEWS! 
BUT  THE  BEST  NEWS  IS  THE  PRICE:  WITH  OPTIONAL  NUMERIC  KEYPAD: 

$525.00  -^  $18.00  shipping  &  handling  $575.00  +  $18.00  shipping  &  handling 

COMPARED  TO  APPLE  11"  WHICH  RETAILS  AT  MORE  THAN  DOUBLE  THIS  PRICE  AND  OFFERS  YOU  LESS,  YOLI  CAN  SEE  WHY 
THE  RAM-TECH-  RT  2  SHOULD  BE  YOUR  CHOICE.  MAKE  NO  SYWTAX  ABOUT  IT,  THE  RT  2  IS  FOR  YOU! 

PERSONAL  I.D.  OPTION  —  We  win  bum  your  name  into  ROfVl.  When  you  power  up  your  Ram-Tech  your  name  will  be  displayed 
on  the  screen.  AN  EXTRA  MEASURE  OF  SECURITY  AGAINST  THEFT.  „    ,^^  „„  ,     ,  „       .■ 

Indicate  on  your  order  what  name  you  wish  to  use  (maximum  8  letters  including  spaces)  —  ADD:  $25.00  tor  l.U.  option. 

ALSO  AVAILABLE:  (sub-assemblies  for  do-it  yourselfers)  —  90  days  warranty 

1  -  ABS  case,  high  quality,  Apple'  look-a-iike  and  color  matched,  will  replace  Apple"'  case S  68.50 

2  -  same  as  #1  above  but  with  numeric  keypad  cutout liTn  nn 

3  -  keyboard  with  upper/lower  case  key,  direct  replacement  for  Apple'^  or  Ram-Tech" JUncn 

4  -  same  as  #3  above  but  with  numeric  keypad,  use  in  combination  with  #2,  also  fits  Apple® f  To^n 

5  -  RF  modulator  with  TV  switch  and  cable,  also  fits  Apple* fJonn 

6  -  switching  power  supply,  8.5  amps,  internal  circuit  breaker,  high  power,  also  fits  Apple*' toocnn 

7  -  motherboard,  completely  assembled  &  tested,  fully  operalional  with  burned  BOMS f^o  nn 

8  -  bare  motherboard  w/  parts  discription  screened  on  board  and  instructions,  highest  quality  G10  epoxy $  4a.0U 

SHIPPING  &  HANDLING  FOR  ABOVE:  cases  #1  &  2  add  10%;  all  others  add  5% 


PERIPHERALS,  CARDS  &  ACCESSORIES  FOR  YOUR  RAM-TECH*  OR  APPLE® 

all  items  #1  to  19  guaranteed  for  one  year  (disk  drives  for  six  months) 

11  -  interger  card $  97.50 

12  -  PAL  card $114.00 

13  -  language  card $  72.50 

14  -  RS-232  serial  card $  84.00 

15  -  Z-80  CPIM  card $  92.00 

16  -  VERSA  card $345,00 


1  -  16K  RAM  card $  58.00 

2-80  column  card $  94.50 

3  -  clock  card $135.00 

4  -  communications  card $  89.00 

5  -  disk  controller  card $  58.00 

6  -  EPROM  writer  card $124.50 

7  -  FORTH  card $  98.50 

8  -  lEEE-488  card  w/cable $186.00 

9  -  parallel  printer  card  w/cable $112.00 


17  -  analog/digital  card $116.50 

18  -  system  cooling  fan $  63.00 

^ 19  -  joy  stick  w/button ■ $  24.50 

10  -  parallel  printer  buffer  and  grappler  card  with  cable $245.00 

DISK  DRIVES:  Guaranteed  high  quality  for  use  with  all  Apple'-  compatible  (or  Ram-Tech')  controllers  -  DOS  3.3  &  3.2 
OSES    SPECIAL    LOW    POWER   COISISUIVIPXION    CIRCUIXRY 


TEAC   55A $325.00 

SHUQART $285.00 

SHIPPING  &  HANDLING:  add  S3.50  per  item  #1 


19  . 


$370.00  with  controller 

$330.00  with  controller 

disk  drives  add  SI 0.00 


TO  ORDER 


DEALER  INQUIRIES  REQUESTED 


—  ALL  PHICES  IN  U.S.  CURRENCY 

—  VISA  OR  MASTER  CARD:  SEND  NUMBER,  EXPIRY  DATE, 
BANK  NAME  S  CARD  HOLDER'S  tJAME,  INCLUDE  PHONE 
NUMBER. 

—  CHECKS  &  MONEY  ORDERS  O.K.  -  CHECKS  NEED  THREE 
WEEKS  TO  CLEAR.  (NO  C.O.O.'S  TO  U.S.  DUE  TO  POSTAL 
REGULATIONS) 

—  CANADIAN  ORDERS  ADD  25%  FOR  CDN  FUNDS  EXCHANGE. 

—  U.S.  CUSTOMERS  WILL  HAVE  TO  PAY  U.S.  CUSTOMS 
4.7%  DUTY.  DUTIES  COLLECTED  BY  POST  OFFICE. 
WE  ASSUME  NO  LIABILITY  FOR  CUSTOMS  CLEARANCE 

*Apple  Is  a  trademarii  of  Apple  Computer  Inc. 


DEPT.  OP 

P.O.  BOX  205,  STATION  CART. 

MONTREAL,  QUEBEC,  CANADA   H4K  2J5 

(514)  335-1717 


'Barn-Tech  is  a  trademark  of  99506  CANADA  INC. 


ACCOLADE 
COMPUTER 
PRODUCTS 


ATARI  850  Interface  StSS.OO 

ATARI  410  Recorder  75.00 

ATARI  Disk  Drive  449.00 

PERCOM  Double  Density  599.95 

EPSON  Mx  80  ft. 

w/graffrax  $479.95 
EPSON  Mx  100  ft. 

w/graftrax  697.50 

EPSON  Fx  80  (160  CPS)  595,00 

GEMINI  lOx  (120  CPS)  329.95 

GEMINI  15  649.95 

0KIDATA82A(120CPS|  459.95 

DAISY  Silver  Reed  799.95 

BMC  [12"  Green)  99.95 

BMC  (ir  Color]  342.50 

ATARI  Writer  $77.50 

Programmer's  Kit  49.95 

Family  Finance  38.95 

Juggles  House  22.95 

Juggles  Rainbow  22.95 

My  First  Alphabet  27.95 

ATARI  Basic  45.95 

Missile  Command  28,95 

Pacman  34.95 

Centipede  34.95 

Oix  34.95 

Dig  Dug  34.95 

Defender  34.95 

Galaxian  34.95 

Donkey  Kong  38.75 

E,T.  Phone  Home  38.75 

Eastern  Front  38.75 

Miner  2049Br  37.50 

Zaxxon  29.95 

Frogger  26.95 

Choplifter  33.95 

Dealer  Intfuiries  Welcome 

WE  WILL  TRY  TO  MEET  OR  BEAT 

ANY  ADVERTISED  PRICE 

ACCOLADE  COMPUTER 

PRODUCTS 

4858  Coronado  Ave. 

San  Diego,  Ca  92107 

(619)223-8599 

CaKI  Fles.  add  6%  Sales  Tax 

Shipping  &  Handling  $4  00 

Foreign  Orders  add  $5  00 

PaymenI  in  U  S  Funds  only 

COD  Charge  SI  65 

COD'S.  Casriier  Check  or  Money  Orders 

Personal  checks  must  take  2  weeks  to  clear 


manual,  a  copy  of  a  1930s  news- 
paper page,  a  suicide  note.  West- 
ern Union  telegram,  and  a 
matchbook. 

Clues  necessary  to  unravel 
this  adventure  mystery  are  hid- 
den in  this  paraphernalia.  The 
game  sells  for  $49.95  to  $59.95 
depending  on  the  version. 
Infocom,  Inc. 
55  Wheeler  St. 
Cambridge,  MA  02138 


Thinking  Game 
For  Apple    

Pensatc  is  a  thinking  game  of 
evasion  for  Apple  computers. 

The  object  of  the  game  is  to 
get  to  the  top  of  an  8x8  playing 
grid  while  avoiding  other  playing 
pieces.  One-  and  two-player 
options  are  available,  and  a  game 
can  be  instantly  replayed  once  it 
is  over. 

The  game,  which  includes 
hundreds  of  possible  setups,  is 
available  from  Penguin  Software 
for  $19.95. 

Penguin  Software 
830  4lh  Ave. 
Geneva,  IL  60134 
(312)  232-1984 


Computer  Aided 
Instruction 
Programs 

Random  House  has  announced 
a  new  series  of  Computer  Aided 
Instruction  programs  called  Cus- 
tom Ware. 

The  programs,  described  as 
a  "mini  authoring  series,"  make 
it  possible  for  the  user  to  create 
and  edit  his  own  CAI  lessons. 

The  initial  Custom  Ware  of- 
fering includes  lessons  for  grades 
three  through  six  on  topics  in- 
cluding multiple-meaning 
words,  figurative  language, 
synonyms  and  antonyms,  pre- 
fixes and  suffixes,  dictionary 
skills,  and  spelling  demons. 


Instructions  provided  with 
the  package  allow  the  user  to 
customize  the  programs  by  cre- 
ating additional  lessons  fol- 
lowing Random  House's  formats. 

Custom  Ware  is  available  for 
Apple  II  and  IBM  computers. 

Random  tioiise 
7307  S.  Yale  Ave.  W3 
Tulsa,  OK  74136 


64K  RAIVI  For 
Timex/Sinclair 

Gladstone  Electronics  has  intro- 
duced a  64K  RAM  expansion  for 
the  Timex/Sinclair  computer. 

The  RAM  pack,  which  sells 
for  under  $100,  is  enclosed  in  a 
molded  plastic  case. 

Gladstone  Electronics 
1585  KeiDiiore  Aire. 
Buffalo,  NY  14217 
(716)874-5510 

Data  Base  For 
Commodore  64 

Melcomp  has  produced  Database 
64,  a  data  management  system 
for  the  Commodore  64. 

With  the  program,  the  user 
can  define  the  number  and 
length  of  fields,  and  records  can 
be  displayed  on  the  screen  or 
printer  in  a  variety  of  formats. 
Database  64  is  menu-driven  and 
is  written  in  BASIC  for  easy 
modification.  The  program  sells 
for  $39. 

Melcomp 
P.O.  Box  1085 
Melbourne,  FL  52901 

Weather  Sensor 
For  VIC  And  64 

The  Home  Automatic  Weather 
Station  is  an  external  sensing 
device  that  allows  a  Commodore 
64  or  VIC-20  to  monitor  weather 
conditions  indoors  or  outdoors. 
The  package  includes  software 
to  analyze  conditions  and  make 
weather  predictions. 


VIC  1701 

COLOR  MONITOR 

■•^^-    ^HI^^H  COMMODORE  64 

PICK  YOUR  BEST  9^ — :rrr=ff!g*i^.  [  "mSJi!""" 

COMMODORE  COMPUTER  , 

PACKAGE  AND  SAVE  EVEN  MORE .. .         ffSBr-  I        ""^^^^ 

C64  $229.00  C64  $229.00      iSS^S^SSS  vici54i  disk  drive 

VIC  1541       239.00    or    VJC  1530         65.00  ^^.      ^^        ^     ^^^^i^ 

VIC  1701       249.00  VIC  1701       249.00  MK^Som^mten^atxx^aikK 

Total $700.00  Total $530.00  PractiCalc20 

SAVE.  ...$    17.00  SAVE.  ...$    13.00  For  the  Commodore  VIC-20 

16K  RAM  required 
—  Mt    •  _i  Tape(CV2T10) $28.00 

Everything  you  need  Disk  (cv2dio) 33  oo 

+r»  ei  inrirtH-  \tc\i  tr  PractiCalc  64-For  the  Commodore  64 

lu  s>uppur  I  yuui  ^^p^  ^^^^^^ ^j ^3^00 

COMMODORE  VIC20  and  C64  Disk(C60Dn)  3900 

Cardco,  Creative  Software,  EPYX,  HES,  UMI,  WfCO,  Romox. 


GET  ATI.  PERIPHERAL 
EXPANSION  BOX 
^  FREE 

"i  *        We  will  give  you  T.l.'s  Peripheral  Expansion  Unit— a 

I  ,  $249.98  retail  value— FREE— when  you  buy  any  three 

I  ;  of  the  below  listed  items— OR— when  you  buy  $350.00 

worth  of  in-stock  software  (no  substitutions). 

'    '"■  PHP  1220  RS  232  Card S  135.95 

PHP  1240  Disk  Conloller  Card 189,95 

PHP  1250  Expansion  System  Disk  Drive 300.95 

PHP  1260  Memory  Expansion  Card  32K 227.95 

f^Cr  A  T  I  PHP  1270  PCoda  Card 189.95 

"CI    M   I.I.  PHP  31 1 1  Tl  Writer 75.95 

CpCCQU   SYNTHESIZER  PHP  31 13  Microsoft  Wuhiplan ,,75.95 

pp§£  We  carry  in  stock  all 

hardware  and  software  for 

T.I.  will  give  you  a  Speech  Synthesizer— a  $99.95  retail  ti  Knme  COITIDUterS. 

value— FREE— when  you  buy  six  solid  state  software  car- 

tridges.  Offer  expires  January  31, 1984.  Ask  for  Coupon.  m.   - 

QUANTITIES  LIMITED!  WV  TEXAS  *^?^^. 

^  Instruments 


SOUTHERN  ftUOIOV«DEOELECTROMiCS,  l«C 

1782  Marietta  Blvd.,  N.W..  Atlanta.  Georgia  30318 

Order  Toll  Free  1-800-241-2682 
In  Georgia  (404)-351-8459 


For  a  complete  listing  of  afl  SAVE's  products,  send  $5.00 
for  our  catalogue  (refundable  with  your  first  order). 

Enjoy  the  convenience  of  in-home  shopping.  Cat!  our 
toU  free  number  today  for  orders  only. 

Use  your  American  Express.  VISA,  Mastercard,  check 
or  money  order.  Minimum  order  of  $50.00.  Outside  con- 
tinental U.S.A.  minimum  order  $250.00  U.S.  currency. 
Shipping  and  handling  charges  are  extra.  All  prices  are 
subject  to  change  without  notice.  Allow  2-4  weeks  for 
delivery.  Prices  good  through  November  15, 1983< 
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ATARI 

I  Computers  for  people; 


800  48K 


$199.00* 


'  after  tlOO.  ntMte  from  ATARI    cuh  price  *2M.       •  includ**  frM  prog nm mar  packao* 

81 0  Disk  Drive. $369.00 


Educator $1 09.75 

Programmer $  51.75 


Entertainer $  63.75 

Bookeepar $1 94. 75 


600XL  $$$$$149.00 
1 800  XL. . .  $CALL$ 
1200  XL.  $499.00 
1 400  XL  .  $CALL$ 
1 450  XL  .  $CALL$ 

1 025  Printer $399.00 

1020  Color  Printer  .$245.0O 

1027  Printer $299.00 

1010  Reconier $75. OO 

410  Recorder $75.00 

BIO  Disk  Drive $399.00 

1050  Disk  Drive S33S.0O 

850  Interface SCALLS 


PARKER  BROTHERS 

Tutankham  R $33.75 

Super  Cobra  R $33.75 

Astro  Chase  R $33.75 

Froggor  R $33.75 

QBert  H  $33.75 

Popeye  R $33.75 

Risk  R $42.75 

ChessR $42.75 

SPINNAKER 

Story  Machine  R $28.75 

FaceMskerR $24.75 

Klndoromp  R $20.75 

Fraction  Fever  R $24.75 

Delta  Drawing  R $26.75 


SSI 

Battle  ol  Shilo  C/D $26.75 

Tigers  In  the  Snow  C/D...  .$26.75 
Battle  for  Normandy  C/D  ..  $26.75 
Knights  of  the  Desert  C/D  .$26.75 

Cosmic  Balance  C/D $26.75 

ON-LINE 

Frogger $24.95 

Wliard  i  Prln  $26.95 

ROKl-AN 

Wizard  of  War S29.75 

Corf $29.75 

Dalui  Invader $27.95 

BIG  5 
Miner  2049 $32.75 


BUSINESS 

Vlalcale $159.75 

Letter  Perfect $115.75 

Letter  Perfect $1 49  75 

DatgPerlect $99!7S 

Text  Wlzzard $49.75 

Spell  Wlzzard $64.75 

File  Manager $69.75 

Home  File  Mgr $69.75 

Bookeeper $119.75 

C-R.I.S $199.75 

Atari  Word  Pro $109.75 

Tai  Advantage $35.75 

Home  Accountant  .....  .$59,75 

Bank  Street  W $49.75 

Atari  Writer $55.75 

ADVENTURE 

Preppie $19.95 

Proppiea $19.95 

Diskey $39.95 

Sea  Dragon $25.50 

Stralos $25.00 

Treasure  Quest  .........  $1  3.50 

Serins  1-12 $15.95 

Saga  Series  16 $24.95 

Stone  of  Sisyphus $29.95 

Eliminator $18.95 


[appkz 


SSI 

Battle  of  ShIlo $26.75 

Tigers  in  the  Snow —  $26.75 

Cosmic  Balance $26.75 

Knights  of  the  Desert .  $26.75 
Battle  for  Normandy..  $26,75 
Germany  1 985 $36.75 


RAN  A 
DISK  DRIVES 

Elite  1 $295.00 

Elite  2 $449.00 

Elite  3 S559.00 

MICRO-SCI 

A2 call 

A40.... ..call 

A70 call 

MUSE 

Castle  Wolfanstein $20.75 

Caverns  of  Frieteg $20.75 

Robot  War $26.75 


CONTINENTAL 

Home  Accountant $51.75 

Book  of  Apple  Software  .  SI 6.75 
BRODERBUND 

Bank  Street  Writer $44.75 

AE $24.75 

Apple  Panic $21.75 

Chopllftor $24.75 

David's  Midnight $24.75 

SPINNAKER 

Kindercomp S21.75 

Slory  Machine $23.75 

FaceMaker $23.75 

Snooper  Trooper $29.75 

Delta  Drawing $34.75 


EPYX 

Temple  of  Apshal $26.95 

Star  Warrior $26.95 

Crush,  Crumble  &  Chomp  .  $22.75 

ADVENTURE 

SagaSI  Advenlureland  ,.  .$29.95 
Saga#2  Pirate  Adventure. $29. 95 
Sasa«3  Secret  Mission. .  .$29.95 

Stone  of  Sisyphus $24.95 

ALIEN  GROUP 

Atari  Voice  Boi $99.00 

Apple  Voice  Box $129.00 


S  commodore 

■  VIC  64 $AVE 

I1S41  Disk  Drive Call 

11525  Printer Call 

llS30  Oatasette $64.00 

In  10  8k  Rom $53.75 

I121I  Super  Expander  .S53. 75 
1 121  2  Programmers  Ad. $44. 75 

11213  Vlcmon $44.75 

jvic  20  dust  cover $6.99 

I  Vic  64  dust  cover $6.99 

MICROSPEC  64 

I  Inventory  Mgr $79.75 

■  General  Ledger $79.75 

JPayroll  Mgr $79.75 

lAccounts  Rec $79.75 

I  Accounts  Pay ,.$70.75 

I  Oats  Base , , $69.75 

^hecktjook  Bal $64.75 


HES64 

64Forth  R $55.75 

Hesmon  R $29.75 

Turtle  Graphics  R $49.75 

Heswriter  R $38. 75 

Gridrunner  R $29.75 

Attack  of  Mut  Cam  R. .  .$34.75 

Turtle  Tutor  R $29.75 

Turtle  Trainer  R $29.75 

Paint  Brush  R $23.75 

Benji  Space  Rescue  D.$29,75 
Home  Manager  C/D  ..  $39.75 

Time  Money  Mgr  D $55.75 

OmniCalc  D $79.75 

Sword  Point  D $24.75 

EPYX        64 

Temple  of  Apshai $26.00 

Upper  Reaches  of  A  ....  $1  5.00 

Crush  Crumble  &  C $23.00 

Jumpman $28.00 


CARDCO 

Cardprlnler  /  LQ1 $499. OO 

Cardprinl  DM1 $109,00 

5  Slot  Expansion  64 $54.00 

64  Write  NOW $39^00 

64  Mall  NOW $29.00 

2j  Write  NOW $29.00 

64  Keypad  $29.00 

Universal  Cass.  Int $29.75 

Printer  Utility $19.75 

6  Slot  Expansion $79.95 

3  Slot  Expansion $24.95 

Vic  20/64  Printer  int $59.95 

BRODERBUND  64 

Serpentine  R $26.75 

Choplifter  R $32.75 

Seafox  R $26  75 

PARKER  20 
Frogger  (ROM) $33.75 

OBert(flOM) $33.75 

Tutankham  IromI $33.75 


SPINNAKER  64 

Kindercomp $21 .75 

Story  Machine $23.75 

Face  Maker $23.75 

Snooper  Trooper $29.75 

Delta  Drawing $34.75 

Shamus  II  c/d $24,95 

Pinhead  c/d   $22.95 

QUICK  BROWN  FOX 

QBF  Word  Processor $49.95 

UK 

Latter  Perfect $105,00  | 

Data  Perfect $95,00 

ADVENTURE  INTERNATIONAL 
S,  Adams  Adventure $28.75 

VIC-64 

Household  Finance  C/D.,  524. 75 

VIC  20 

King  Arthurs  Heir  Cass  . , ,  $24,75 
Monster  Maze  Rom $?4.75 


uiauiii 


HARD  DISK 
DRIVES  for 

APPLE     IBM-PC     TRS60* 

5  MAGABYTE  DRIVE SI  099  75 

10  MEGABYTE  DRIVE  SI  399  75 

15  MEGABYTE  DRIVE SI  799  75 

20  MEGABYTE  DRIVE S2275.75 

■Atlrt  S-IO  00  lor  TRS  SO  D..»i.i 


SINGLE  DRIVE  AT88  S1  ...$359.00 

DUAL  DRIVE  AT88  S2 $559.00 

DRIVE  with  printer  port  ...$449,00 

AT88  Expansion  Board $139.00 

DUAL  HEAD  44S1 $575.00 

DUAL  DRIVE  44S2 $949.00 

SINGLE  DRIVE  40S1 $529.00 

ADD  ON  DRIVES $CALL 


Li;co  Computer  Marketing  &  Consultants 


TO  ORDER 

CALL  US 


TOLL  FREE   800-233-8760 


In   PA  1-71  7-  327.1824 


16K  ATARI  RAMS49.75 

32K  RAM $69.75 

48K  RAM $99.75 

64K  RAM S1  29.75 

128K  RAM  ....$399.75 
TECH  NOTES... $29. 75 

BOOK  of  ATARI 
SOFTWARE  1983 

346  pages $1 6.75 

CXdl  5  HOME  FILING 

MANAGER  S4  1    75 

CX14007  MUSIC  COMP  S33  75 

CXL-lOO?  ATARI  BASIC  S45  75 

CX81  36  MICROSOFT  S65  75 

CX4119  FRENCH  -545  OO 

CX41  18  GERMAN.  S45  OO 

CX4120  SPANISH  S45  00 

CX4108  HANGMAN  S12   75 

CX4102  KINGDOM  S12   75 

CX4I 12  STATES  SI  2  75 

CXL4O03  ASSEMBLEH  S45  7' 


EASTERN  HOUSE 

Monkey  Wrench  2 $52.75 

INHOME 

Baseball S29.95 

I  OS  I 

Speedway  Blast S29.95 

Pool  1.5 S2e.95 

GALAXIAN   $29.75 

DEFENDER S29-75 

DIG  DUG S29.75 

SPEED  READING S53.75 

ATARI  WRITER S54.75 

BOOKKEEPER $102.75 

CX4018  PILOT  HOME  ....$54.75 

CX  405  PILOT  EDU $91.75 

CX404  WORD  PRO $99.75 

CXL401  3  ASTEROID  -S25.75 

CXL4020  CENTIPEDE  .529.75 
CXL4022  PACMAN  .529.75 

CXL401  1  STAR  RAIDER  .S29.75 
CXL4004  BASKETBALL  S25.75 
CXL4O06  SUPER  BREAK.  S25. 75 
CXL4O0e  SPACE  IN  VAD,  ■  $25.75 
CX8130  CAVERNS  OF  M. $27.75 


APX 

Eattern  Ft.41  $25.50 

OaRay  Atari $19.95 

Math-TIC'Tac $1 5.95 

Pras  of  US $1 5.9S 

3R  Math $19.95 

Typo  Attack $24.95 

Family  Budget $19.SS 

F.  Cash  Flow S19.9S 

BROOERBUND 

Sank  Street  Writer  O $44.75 

AED $24.75 

Apple  Panic  O $23.75 

Choplifler  ROM $32.75 

David's  Midnight $24.75 

Stellar  Shuttle  C/D $18.75 

Ft.  Apocalypse $24.75 

HES 

Gridrunner  R $27.75 

Sword  Pornt  D $24.75 

INFOCOM 

Zork  1/2/or  3 $29,95 

FIRST  STAB 
Astro  Chase $22.95 


RANA 
DISK  DRIVE 

10O0 SCALL 

ADEN  GROUP 
Voice  Box  2  .  $99.75 

DON'T  ASK 

Sam $41,75 

Abuse $15.95 

Teleatri $27.95 

Poker  Sam  .,$24.95 
Amulet 

Nuke  Sub $16,75 

MagicStoryBook $24, 7  5 

Thunder  Island $13.95 

ARTWORX 

Hazard  Run $24.95 

Hodge  Podge $16.95 

S.  Poker S26.95 

Bridge  3.0 .$18.95 

EPYX 

Jump  man $26.97 

Temple  ot  Apashi $27.75 

Star  Warrior $27.75 


A 

ATARI 

Compuicn  for  people. 

O 


MODEMS 


ANCHOR  MARK  I 
ANCHOR  MARK 
HAYES  SMART  ,  . 
HAYES  MICRO  II 
Micro  Bit 

lMPP-1000 

NOVATION 

CAT 

D-CAT 

J-CAT 

APPLE  CAT  II..,. 
212  APPLE  CAT  . 


$79.00 

I.    579.00 

.5239.00 

5309.00 


$159.00 

$144.00 
$155.00 

$115.00 
$279.00 
S589.00 


MONITORS 

NEC  Jei260 $125.00 

NEC  JB1201 $155.00 

NEC  TCI  201 $315,00 

Amdek  Color  I $275,00 

Amdok  300  Green $1 49.00 

Amdek  30O  Amber  .,,.  $149,00 
Gorilla  Green  $99.00 


WICO 

JOYSTICKS 

APPLE  -  VIC  -  ATARI  ■  Tl 

Command  Control S20.95 

Ftedball $22.75 

Apple  Trackball $58.00 

TRACK  BALL  »52  75 

EXTENSION  CORO  $9  75 

APPLE  ADAPTOR $18  95 

T.i.  ADAPTOR $9.95 

POINT  MASTER  $12   75 


[appkz 


APPLE  DUMPLING  GX  S99  7S 

APPLE  DUMPUNG  64      116  Butt«1S179  75 

INFOCOM 

Zork  I,  II,  or  III $26.75 

Deadline $33.75 


BLANK  DISKETTES 

ELEPHANT  SS/SD $18.25 

ELEPHANT  SS/00 $21.75 

KANGAROO  SS/DD  with 

Storage  case $24.75 

I  MAXELL  MD  I $29,75 

MAXELL  MD  II  S39.75 

OISK  CASF  (holdv  10)  id  9b 
loiSKCfiSf  (holOi  SO]  S19  75 
IROMCASF      iholtls  101       S19  7fi 

SANYO 

I  MBC  lOOO $1549.00 

I  (with  micfopro  software  package} 

MBC  12S0 $2195.00 

MBC4O50 $2749.00 

EFD  160  Disk $499.00 

5500  Letter  Q,  Printer..  .$649.00 


PRINTER 
INTERFACING  AVAILABLE 

APPLE  DUMPLING  GX  .      ,,    $99  75 

APPLE  DUMPUNG  64    .(16BuflBrt      $179.75 


ATARI        APPLE  VIC 

....$35.00   $79.00    $65.00 

,..,$35.00   $79.00 

....$35.00   $79.00 

....$35.00 $79-00 

....$35.00 $79,00 


EPSON 

CI  TOM 

NEC 

OK  I  DATA 

GEMINI 

SMITH  CORONA $35.00 $79,00 

Atari  parallel  Printer  cable  (6')  .,,$39,95 
Microbits  Parallel  Cable $89,95 


$65,00 
$65.00 
$65.00 
$65.00 
$65.00 
$65.00 


commodore  ^^l 

HES         VIC-  20  ^1        I 

TorgC $14.75 

HES  Games  I  C $14.75 

HES  Games  II  C  $14.75 

VIC  Fortil  Rom $42.75 

HES  MON  Rom $28.75 

Turtle  Graphics  Rom  ,,,. $28,75 

HES  Writer  Rom $28,75 

Shamus  Rom $28,75 

Protector  Rom  $31.75 

Robot  Panic  Rom $28.75 


DISKETTE  SALE 

BULK  DISKS  (qty  1  50)  $1 .50  ea. 

CenronCC-10(3blankcassettes),,.$3,75 


V^^ 


.v-^" 


jV" 


PROWRITER  2P S699.00 

GEMINI  15 $449.00 

PRINTMASTER SI  589.00 

SMITH  CORONATP1 . .  .5549.00 

CITOH  8600B 


51025.00 

STARWRITER SI  099  00 

OKIDATA  82 save 

OK1DATA83  lowest 

OKIDATA  84P  ''"'^^ 

°     "^ AVAILABLE 

OKIDATA  93 save 

TRACTOR S49.75 

OKIDATA  92 SSAVE 


SAVE  -PRINTERS! 

GORILLA  GX-1 00 $1 99.00 

EPSON $CALL| 

GEMINI  10X $289.00 

PROWRITER $359.00 

NEC  8023 $399.00 


[^^        TO  ORDER 

CALL  TOLL  FREE 

800-233-8760 


in  PA  1   717-327-1824 


or  send  order  to 
Lyco  Computer 
P.O    8ox  5088 
Jersey  Shore.  PA  1  774C 


POLICY 

In-stock  items  shipped  within  24  hours  of  order.  Personaf 
checks  require  four  weeks  clearance  before  shipping.  No 
deposit  on  C.O.D.  orders.  Free  ship  ping  on  pre  pa  id  cash  orders 
within  the  continenlal  U.S.  PA  residents  add  sales  tax.  All 
products  subject  to  availability  and  price  change.  Advertised 
prices  show  4%  discount  offered  for  cash,  add  4%  (or  Master 
Card  or  Visa.  DEALER  INQUIRIES  INVITED. 


The  Home  Aiitamafic  Weather  Station 
can  be  connected  to  a  VIC  or  64  to  mon- 
itor changing  weather  condiiions. 

The  sensor  is  designed  to  be 
used  as  an  educational  tool  or  as 
a  monitoring  tool  for  sensitive 
environments  such  as 
greenhouses.  The  package  is 
available  for  S199.95.  The  soft- 
ware comes  in  both  tape  and 
disk  versions. 

Vaisala  Inc. 

2  Tower  Office  Park 

Wolnini,MA018m 

(617)933-4500 


DOS  Enhancer  For 
VIC  And  64 

Softron  has  introduced  EZ/DOS, 
a  program  that  simplifies  the  use 
of  the  Commodore  1540/1541 
disk  drives. 

The  machine  language  pro- 
gram is  loaded  into  memory  and 
then  is  invisible  until  you  need 
it.  Call  the  menu  and  execute 
one  of  the  options.  They  include 
LOADing  or  SAVEing  a  pro- 
gram, replacing  a  program, 
VERIFYing  a  program,  reading  a 
disk  directory,  formatting  a  new 
disk,  renaming  or  erasing  a  file, 
or  renaming  a  disk. 

The  program,  w^hich  is  avail- 
able on  disk,  sells  for  $29.95. 

Other  new  products  avail- 
able from  Softron  include: 

The  Do  It  Yourself  Book,  a 
book  and  software  package  for 
the  VIC-20.  The  disk  version  is 
available  for  $29.95,  and  the  tape 
version  is  available  for  $27.94. 

Pizza  Time!  is  an  8K  arcade 
game  for  the  VIC-20.  The  disk 
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version  sells  for  $24.95,  and  the 
tape  version  sells  for  $22.95. 

Softron's  Keyboard  Soft/Lay 
is  a  keyboard  overlay  that  in- 
cludes BASIC  commands,  mem- 
ory locations,  and  DOS  com- 
mands. It  is  available  for  both 
the  VIC  and  64  for  $8.95. 

Softron,  Inc. 

2067  Broadway,  Suite  27 
New  Yorl::,  NY  10023 
(212)  490-0077 


The  Family  Tree 

A  pair  of  genealogical  programs 
for  the  TRS-80  Color  Computer 
are  available  from  The  Word 
Merchant. 

The  programs  are  Family, 
which  maintains  data  on  255 
ancestors  in  eight  generations, 
and  Famprint,  which  uses  the 
information  in  the  Family  data 
base  to  print  out  three  genealog- 
ical forms.  They  are  Pedigree, 
which  provides  five  generations 
of  information  for  any  name; 
Family  Group  Chart,  which  pro- 
vides information  on  each  hus- 
band-wife pair;  and  Reference 
Number  Index,  which  lists  all 
names  with  their  corresponding 
reference  numbers. 

The  programs,  which  re- 
quire Extended  BASIC  and  32K, 
are  available  as  a  package  on 
cassette  for  $9.95. 

The  Word  Merclmnt 
P.O.  Box  232 
Lifitz,  PA  17543 


Optical  Scanner 
System 

Databar  has  introduced  an  opti- 
cal scanner,  called  OSCAR,  de- 
signed to  read  specially  coded 
programs  into  most  popular 
microcomputers. 

The  $79.95  scanner  includes 
an  issue  of  a  monthly  magazine 
which  contains  BASIC  programs 
coded  for  scanning.  Subsequent 
issues  of  the  magazine  will  sell 


for  $10. 

The  OSCAR  system  is  ex- 
pected to  be  available  in  early 
1984. 

Databar  Corporation 
10202  Crossto-wn  Circle 
Eden  Prairie,  MN  55344 
(612)  944-5700 


Color  Computer 
Spreadsheet 


EUte-Calc  is  a  machine  language 
electronic  spreadsheet  for  the 
TRS-80  Color  Computer.  The 
program,  a  product  of  Elite  Soft- 
ware, adjusts  itself  to  any  mem- 
ory size,  but  requires  Extended 
BASIC  lo  run. 

With  EUte-Calc,  spread- 
sheets of  255  rows  by  255  col- 
umns can  be  created.  Manipula- 
tion of  data  is  accomplished 
through  a  variety  of  functions, 
including  LOG,  SQR,  ABS, 
SUM,  AVERAGE,  MIN,  and 
MAX.  Relational  operators  and 
the  trigonometric  functions  also 
are  supported. 

The  program  includes  HELP 
displays,  rapid  entry  modes  for 
text  and  data,  and  an  option  for 
automatic  cursor  movement. 
EUte-Calc  is  available  on  tape  or 
disk  for  $44. 95. 

Elite  Software 
Box  11224 

Pittsburgh,  PA  15238 
(412)795-8492 


CALENDAR 


October  19-21,  Pinehurst  Hotel 
and  Country  Club,  Chapel  Hill, 

NC.  "Introduction  to  Computers 
and  Their  Applications."  A 
three-day  seminar  sponsored  by 
LEARNING  AT  PINEHURST. 
Hands-on  instruction  and 
learning  sessions  on  software, 
hardware,  languages,  applica- 
tions, and  the  history  and  future 


HARMONY  VIDEO  &  COMPUTERS 

800-221-8927 


COMMODORE 
VIC  20 

COMMODORE 
VIC  2N  DATASETTE 
COMMODORE  DISC  DRIVE 
1525B  PRINTER 
COMMODORE  MONITOR 
VIC  TELEPHONE  MODEM 
RS  232  TERMINAL  INTERFACE 
IGEE-488  INTERFACE 
VIC  8K  MEMORY  PAC 
VIC  16K  MEMORY  PAC 
MOTHER  BOARD 
VIC  3K  SUPER  EXPANDER 
VIC  PROGRAMMER'S  AID 
VIC  MON 
INTRO  TO  BASIC  I  &  II 


89.95 
199.95 

59.95 
209.95 
209.95 
249.95 

69.95 


APPLE  2  PLUS 

999.95 

APPLE 2E 

CALL 


EPSON 
MX  80  PRINTER 

399.95 

EPSON 
FX  80  PRINTER 

599.95 


ATARI 
ATARI   400W16K 
ATARI   800W48K 
ATARI    1200XLW64K 
ATARI   410  RECORDER 
ATARI   1010  RECORDER 
ATARI   810  DISC  DRIVE 
ATARI    830  ACOUSTIC  TEL.  MODE 
ATARI    850  INTERFACE 
ATARI    822  THERMOL  PRINTER 
ATARI    1020  40  COL.  PRINTER 
ATARI    1025  80  COL.  PRINTER 
ATARI    16K  MEMORY  EXPANDER 
ATARI   WORD  PROCESSOR 
ATARI    BASIC  REF.  GUIDE 
ATARI    PROGRAMMER  KIT 
ATARI    ENTERTAINER  KIT 


ALL 


WE  CARRY  A  FULL  LINE  OF  SOFTWARE  FOR 
ATARI  AND  COMMODORE    j 
CALL  FOR  LOWEST  PRICES 


VCR  PRICES  TOO  LOW  TO  PRINT! 


VIDEO  TAPE  (By  case  of  10  only) 

HS  VMS  HIGH  BETA 

120  T1G0         GRADE         L500 


TDK 

FUJI 

MAXELL 

MEMOREX 

SCOTCH 

SONY 

JVC  T 


RCA      ' 
PANASONIC 


l!Ri)] 


pv-  *?'^,  ■.^♦i^V'Tr.;^  ?.''.^=T.^> - V.  v--;*-^ 


8.50  TDK  PROFESSIONAL  T120 

MAXELL  PROFESSIONAL  L750  OR  T120 
MEMOREX  PROFESSIONAL 


FOR  THE  LOWEST  PRICES  ON  VIDEO  CALL  800-221-8927 

To  order  simply  dial  loll  free  800-22 1  -8927  with  your  Master  Card  or  VISA  ar«J  your  order  will  arrive  via  U  PS  or  send  certified 
check  or  money  order  only  lo:  HARMONY  VIDEO  AND  ELECTRONICS.  2357  Coney  Island  Ave.,  Brooklyn,  NY.  11223.  and 
add  approximate  shipping  postage  and  insurance  charges.  Credit  cards  for  phone  order  only.  For  customer  service  please  dial 
(212)  627-8960.  All  pries  and  availability  subject  to  change  without  notice.  All  orders  shipped  out  oi  state.  Dealer  inquires 
invited!!!  For  sales  info  dial  (212)  627-6989.  Open  Sun.  10-4  Mon.-Thur.  9-7  Fri.  9-3. 

800-221-8927 

COMMODORE       ATARt      APPLE       TEXAS  INSTRUMENTS        EPSON 


of  computers.  Course  fee  is  $550 
per  person;  group  discounts 
available.  For  more  information, 
write  LEARNING  AT  PINE- 
HURST,  P.O.  Box  2328,  Chapel 
Hill,  NC  27514. 

October  20-21,  Mission  Val- 
ley Inn  and  Convention  Center, 
Raleigh,  NC.  Carolina  Micro- 
Expo.  Over  50  seminars  on 
microcomputers  and  their  use 
will  be  presented.  Local  and 
national  manufacturers  and 
suppliers  will  demonstrate 
equipment.  For  more  informa- 
tion, contact  Richard  Gardner, 
Show  Manager,  HMM  Assoc- 
iates, Inc.,  8400  Glenwood  Av- 
enue, Raleigh,  NC  27612.  (919) 
782-0824. 

October  26-28,  Red  Lion 
Inn,  San  Jose,  CA.  Annual  Con- 
ference of  the  California  Educa- 
tional Data  Processing  Associa- 
tion (CEDPA):  "Update  '83:  Are 
We  Ready  For  1984?"  Sessions 
will  focus  on  the  spectrum  of 
computing  power  available  to 
data  processing  and  instructional 
professionals  and  explore  the 
impact  of  high  technology  on 
education.  For  information  and 
registration,  contact  Jane  House- 
holder, Office  of  the  Los  Angeles 
County  Superintendent  of 
Schools,  Room  226,  9300  East 
Imperial  Highway,  Downey,  CA 
90242.  (213)922-6141. 


November  3-6,  New  York 
Coliseum,  New  York,  NY.  Elec- 
tronic Fun  Expo.  New  York's 
first  state-of-the-art  consumer 
electronics  show.  Open  to  the 
public.  For  more  information, 
write  to  Bill  O'Brien,  Electronic 
Fun,  350  East  81st  Street,  New 
York,  NY  10028.  (212)  734-4440. 

November  5-6,  Scottish 
Rite  Center,  San  Diego,  CA.  4th 
Annual  San  Diego  Computer 
Fair.  The  fair  will  feature  short 
technical  sessions,  programming 
and  computer  game  contests, 
door  prizes,  commercial  dis- 
plays, and  displays  by  computer 
user  groups.  Registration  is  $5, 
Saturday  night  banquet  fee  is 
S12.  Reservations  can  be  made 
by  mailing  a  check  or  money 
order  to:  San  Diego  Computer 
Society,  P.O.  Box  81537,  San 
Diego,  CA  92138.  (619)  565-8720. 

November  16-18,  Pinehurst 
Hotel  and  Country  Club,  Chapel 
Hill,  NC.  "Introduction  to 
Microcomputers  and  Their  Ap- 
plications." A  three-day  seminar 
featuring  hands-on  instruction 
and  learning  sessions  on  soft- 
ware, hardware,  languages,  ap- 
plications, and  the  history  and 
future  of  microcomputers.  Course 
fee  is  $550;  group  discounts  are 
available.  For  more  information, 
write  to  LEARNING  AT 
PINEHURST,  P.O.  Box  2328, 


Chapel  Hill,  NC  27514. 

November  17-19,  Hynes 
Auditorium,  Boston,  MA.  Fifth 
Annual  Northeast  Computer 
Show  and  Software  Exposition. 
Features  nearly  500  displays  and 
exhibits  of  microcomputers,  ac- 
cessories, peripherals,  and  soft- 
ware. Show  hours  are  10:30  a.m. 
to  5:30  p.m.  daily.  Admission  is 
S7.50.  For  more  information,  call 
or  write  Northeast  Expositions, 
822  Bovlston  St.,  Chestnut  Hill, 
MA  02167.  (800)  841-7000  or  (617) 
739-2000  (in  Massachusetts). 


Netv  Product  releases  are  selected  from  sub- 
missions for  reasons  of  timeliness,  available 
space,  and  general  interest  to  our  readers.  We 
regret  that  we  are  unable  to  select  all  new 
product  submissions  for  publication.  Readers 
should  be  aware  that  we  present  here  some 
edited  version  of  jnaterial  submitted  by  ven- 
dors and  are  unable  to  vouch  for  its  accuracy 
at  time  of  publication. 


COMPUTE!  welcomes  notices  of  iip- 
cottiing  events  and  requests  that  the 
sponsors  send  a  short  descriptio)!,  Ihe.r 
name  and  phone  number,  and  an  address 
to  which  interested  readers  may  write  for 
further  information .  Please  send  notices 
at  lenst  three  months  before  the  date  of  the 
event,  to:  Calendar,  P.O.  Box  5406, 
Greensboro,  NC  27403.  © 


ciiSH  HOUR 

SI  K  'Iter  Software's 

HOME  ENERGY  OPTI-MI$ER 

•  Finds  the  best  ways  you  can  save 

energy — and  money     •  Calculates 

how  much  you  con  save  with  solar 

heat,  many  other  options       •  Easy, 

accurate    •  For  homes  anywhere 

SAVE  HUNDREDS  EACH  WINTER 

Atari*  400/800  or  Apple  II", 

32k.  min.  Delivery  in  4-6  weeks. 

S39.50  Pa.  residents  add  S2.37  tax. 

Shelter  Sofnvfirc  - 

Box  521     Emmous  PA  18049 
SOFTWARE  THAT  PAYS  FOR  ITSELF 

•  Alan  Inc Apple  Compulers  Inc  '" 
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$179 


For  ^179  our  TYPE  E  PRINT  turns 
tho  OiiveUi  Praxis  typewritei"  into  (he 
perfect  printer  for  your  personal 
comfjuli^r.  Best  of  all,  our'  cable 
simply  PLUGS  ON  -  no  soldering! 
And  it'i  smart  enough  to  bie  fully 
compatible  with  rnost  systems. 

Applied  Creative  Technology  Inc 

BOO  433  5373 

(817-2B1-6905J 


I 


48K;52i<  Memorv  Board 

For  ATARI-  400 
52K  AdtJressaDie  Memory 
Easy  10  tnslall 
32K  Memory  Board 

Fd!  ATABr  400  01  BOO 
Uo  Modifications  Requirea 
16K  Memory  Board  S49.95 

For  ATARI-  800 
No  MoOJticalions  Required 

We  Wtll  Meel  Advenised  Pnces 

BUILD  YOUR  OWN  MEMORY 

48Ky52K  Board  (No  Components)  S35.00 

32K  Board  (No  Components]  S30.00 

1BK  Board  (No  Components]  S10.00 

48lf  52K  Complete  Kit  S90.00 

32K  Complete  Kit  S80.00 

16K  Complete  Kit  $35.00 

Add  S2  Shipping  S  Handling 

yisa  &  MasterCard  Accepted 

'ATARI  IS  a  Irademafk  at  Atari  Inc 

Dfialer  Inquiiies  Welcofne 

Tiny  Tett,  Inc. 

P.O.  Box  12609   •   Dallas.  TX  75225 
, 214-373-8926 


NEW!!   FACTORY  DIRECT 


SPACE  SAVING 


C.R.T./T.V.  STAND 


IN  DURABLE 
FORMICA 

(Oak-Beech-Beigel 
For  Moil  Populir  Conputeri 

VIC-ATARI-TI  TlMEX-64-elc] 

NOW  ONLY  S47.0O* 

HE  LEVEl  VUEING  -  COVERS  CABLE  JUMBLI 


VIC-20 "  AFFORDABLE  SOFTWARE 


BILOWS  CAR  RACE  •  BILOWS  BOMBERS  ■ 

•  BILOWS  CHOPPERS  •  DENVER  SKIERS  • 

•  BILOWS  SUBS  •  BILOWS  MISSILES  • 

Hi-RetDlutltn  EnpKIci,  Siund  t  te\m. 

Cassette  Tapes        s  6.00* 
6-Pac  Special  $30. oo- 

ORDER  TODAV 

CHECK,  MONEY  ORDER 

EI\ITERPR15E5 

BOX  661  655 
MIAMI  SPRINGS  FLORIDA  331  66 


Wasting  Money?  We  Have  the  World's  Most 
Cost  Edeclive  Development  System. 


'^m 


J  lncludf?s  HL>«ki[  1  0  .1  powerTu! 

mactime  coae  editor  d^lHigguf 

utility  piogram  thai  makes  coding 
A     tor  S-bit  Micros  a  snap 
r  •  Pfogram  from  Ccmmodoce  yiC-20 

keyPoard  into  built-in  4K  ROM 

emulator 

•  Jumpei  \a  targel  ROM  socket 

•  Test  programs  ir  circuit 

•  Built  m  EPROM  piogiammer  and 
power  supply 

•  Bums  A  funs  EPROMS  tor  !he 
Commodoie  VIC-20  too 

•  Comprehefisivi=  manuals 

•  Fits  tXPANSIOrj  PORT 

PROMQUEEN  CARTRIDGE 
ONLY  S199  U.S.  S269  CAN. 
Can. 


U.S. 
5299,00 
S  29.95 
S  39.95 


S399.00 
S  39,95 
S  49,95 


-I-  Prices 

Promqueen  64 

8K  boarO  w  1  Eprom 

16K  board  w  1  Eprom 

8K  BOM  board 
w   1  Eprom-C64  S  39, 95     S  49.95 

Distributed  in  U.S.  by  Artiutus  Tolal  Solt,  Inc. 

4202  Meridian,  Suite  214 

Bellingham.WA  98226 

Ph.  800-426-1253,  m  Washington  206-733-0404 

Distributed  in  Canada  by 

IBC/Distribution  Canada 

4047  Gamble  St..  Vancouver.  BCV5Z2X9 

Ph.604-879-7812  


FREE    CATALOG! 

JEWEL    THIEF 

ADVENTURE     GAME    -    »1^.95 

CBN  TOU  BREfiH  INTO  THE  CRVSTRL  CITY 
MUSEUn  BNO  STEAL  THE   BLUE  WKLLOBV 
DIflHONO  WITHOUT  9EING  CftUGHT? 
FDR:  VIC20  -  REQUIRES  BK  EXPBNDER 

zxei/TiMEXiaaa  -  requires    itn 
cohmoddre   6'.     h19.951 
hatprq    m      ih^.iJSi 

ANDROID 

STRflTAGY     GAME     -    S18.9S 

RETHEIVE  THE  S-S.B.  FROM  THE  BLIEK 
fiNDROIDS.   BET  PBST  INTERCEPTERS . 
DESTROYERS.  BND  THEN  GEORGE. 
FORi  VIC2e  -  REQUIRES  16R  EXPBNDER 

ZX81 /TIMEXIBBB  -  REQUIRES  1 6K 

COMHODORE  64 

flVfllLflBLE  DN  CASSETTE  OR  DIS^. 
BOO  tl.Be  FOR  EACH  DtS^  aROEREO. 
CHECK  OR  MONEY  ORDER  (NO  C.O.D.). 
FORIEGN  ORDERS  BSD  tZ.BS. 
ORDERS  PROCESSED  IN  1-3  DfiYS. 
*       DEALER  INQUIRIES  INVITED-   • 

MORE  PROGHflNS  OVfllLBBLE- 
5END  FOR  f-REE  CATALOG. 

CRYSTAL  MICROSOFT  LTD. 


P.O.    BOX    440952 

HOUSTON-     TX. 

77244 


^m 


FtY 


Your 

Computer 


FLIGHT  SIMULATOR  GAMES 


Sky  Pilot  {8K  VIC-20)  $18.00 

Runway  20  (16K  VIC-20)  $25.00 

Runway  64  $25.00 

Micro-Pilot  (EPSON  HX-20)  $18.00 

ADD  $2'«'  FOR  DISK  VERSION 


TORPEDO.'" 


Submarine  Battle  Games 

8K  VtC-20  or  Commodore  64    $25.00 

SUSIE  SOFTWARE 

709  Wilshire  Dr.  Ml.  Prospect,  IL  60056 

(312)  394-5165 


AAAA 

HAVING  LOADING 


PROBLEMS  ? 


GET  A  Z-DUBBER 

iM  01  !he  tjmat  vonotion  in  cass««e  rscordef?  usod  with  ihe 


because  _.  ...  ^ 

ZXSO  SI  TSlCOO.:sonieinv«Ypoof  Jhope)  you  may  behovinj  a 
rnrdiirr.9tociclifiacassett»pnDflTafTfl  Tno(2  Dubber)cofmflCUbe 
Tw.— Ti  !hBct3isoiier«oord*rajvJihO'campyTBf  aidiisciroirtrYpro- 


CHARGE  OR  COD  ORDERS  CALL 

1-800-227-3800 

MX.  FOR  OFEDATOR  MS 


EST  I  tm^K.   SEATTLE,  WA98III 

wcwo  TecHHmocr  1204,  236  b*te 
CAU.  OS  WKITC  TOR  DEALER  IKFORMATION 


Make*  checks  afl  wglcomc  m  caJh- 


VIC-20 
COMMODORE  64 

THE  RECIPE  BOX 

Now  ywj  CArt  easily  it!>fe  and  ^KaJI  yout  favofiia 
redpos  on  your  Commtxkwa  computer.  THE  RECIPE 
BOX  is  a  Hajmpifftft  rpernHtrrrtf*  disk  syawoi  thai  OTme» 
mr^ti  |h$&e  a^kjiiliional  tetf  uca$ 
SEARCH  BV  IHORED<EMT  —  Onlv  haw  a  pourxi  Ol 
hamtwrgeir  .r  the  freorer''  Ui  THE  RECIPE  BOX 
show  you  all  the  leopes  thai  you  have  on  hte  itiai  use 
hamfiurgef.  or  any  otf>w  ingrodtant  you  choose 
SEAHCH  BY  CATEGORY  —  Cotte  your  recipes  as  to 
txeakfasl.  luncn.  dmrrer.  srwcVs.  eTc 
SEARCH    BY    CATEGORY  IHQREIMENT    -    Any 
corrAination  ol  the  above 

AtlTOWATIC  MEASUREMENT  —  THE  RECIPE 
BOX  Will  auTomahcaliy  sc*!e  up  of  down  the  anounl 
(/  ingreciiftnia  ^ou  rw«d  accofding  lo  ftow  many 
MTvingi  ^Du  wart 

SCREEN  OR  PRINTED  OUTPUT  —  Have  pinted 
copies  10  use  m  the  krlchen  or  gtve  to  Ifionbs 

THE  RECIPE  BOX  i-equtrsf  one  disk  drive  «rd  wilil 
rim  on  a  5K  VIC-20.  Comnwlore  $4.  Pleua  specify. 
Send  check  or  mofwy  order  tor  J21 .95  lo' 

Aries  Marketing  Co. 
P.O.  Box  4196 
4200  Shannon  Drive 
Baltimore,  Md.  21 205 

Md.  residents  add  5%  sales  tax 


SM'ESH 

Screen  displays  are  the 
interfaces  between  micros 

and  liuman  beings. 

Qood  screen  displays  are 

the  hallmark  of  top  rank 

application  programs  —  but 

they  are  expensive. 
The  ESH  (ergonomic  screen 
handler)  from  SM  allows  you 

to  produce  superb  screen 

displays  with  an  astonishing 

economy  of  effort. 

for  cbm  8032  or  8096 


COMMODOR  64 


ADt       FOR    PRESCHOOERS 
TEACH  VOURCHILDREN  THE  ALPHABET 
EARLY  WITH  GRAPHICS  AND  SOUND 
OHLT    S18.95    ON   CASSETTE 
OR     S21.95    ON    DISK 


VIC-20 


(CASSETTES  ONLY)  ,    , 

THE  ALPHABET  CAKE $9.9S>|ea) 

LEARMING  NUMBERS  0-50 

PART   I....J9.95{") 
LEARNING  NUMBERS  51-100  ,    , 

PART  II. ...S  9.95(") 
PARTI&II  ARE  AVAIL.  IN:  ENGLISH; 
SPANISH;  FRENCH.ANDeiRMAN 
VERSIONS  PLEASE   STATE   LANG 
ANY  3  VIC-20  CASSETTES  FOR  INLY  S  25.- 
Check  or  Mon«v  oriler+«.50Po5t.N.Y.Hes*74ti. 


SOFTWARE 


47  CNERNUCNA  AVE. 
MERRICK, N.Y.U56E 
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VIC  &  APPLE 

DISCOUNT  SOFTWARE  (game,  uti 
lity,  educ,  applications)  for  the  VlC-20 
and  APPLE  11+  or  APPLE  lie  (1  disk, 
48K>.  Write  for  a  full  catalogue  —  30-day 
warranty  on  fau  Ity  merchandise  —  please 
pay  in  your  country's  currency.  VIC  on 
cassette  only. 


U.S.A.  - 
CAN. 


U.K. 


VIC-20 

SNAKMAN 
CRICKET 
KRAZY  KONG 
ESCAPE 

APPLE 

CHOPUFTER 

CASTLE  WOLFN. 
SNEAKERS 
RASTER  BLASTER 


$9.00  £4.00 

9.00  4,00 

9.00  4.00 

9.00  4.00 


14.00 
14.00 
12.00 
14.00 


8.50 
8.50 
7.50 
8.50 


DlSCDUni    aDFTLURRE 

P.O.  Box  1489 

Niagaraon  the-Lake,  Ont., 

Canada  LOS  IJO 


ATTENTION 

TEXAS  INSTRUMENTS 

TI-99/4A 

OWNERS 

We  have  hundreds  of  3rd  party  indepen- 
dent soitware  programs  on  cassette  and 
disk  ready  to  run  on  your  TI-99. 4A. 
Games,  business,  and  educational 
programming  at  discount  prices  as  low 
as  S8.95  ea.  Plus  all  Tl  hardware  and 
software  at  incredibly  low,  low  pnces, 
including  the  new  TI-99.2  and  CC-40 
computers.  We  also  have  dust  covers, 
heavy  duty  joysticks  with  Tl  adapters, 
and  many  more  accessories.  Call  or 
write  now  for  a  FREE  listing.  We  ship 
your  order  U.P.S.  the  same  or  next 
business  day  to  insure  fast  sen/ice.  Visa 
and  MasterCard  accepted  (NO  service 
charges)  or  C.O.D.  is  okay. 

THE  MUSIC  WORKSHOP 

59  E.Tioga  St. 
Tunkhannock.  PA  18657 

CALL  1-717-836-4522 


APPLE-ATARI ■COMMODORE-n  OWNERS 

PROTECT  YOUR    INVESTMENT 
CLEAR  ANTI-STATIC  VINYL 


Jhist 
Covers 


Full  One  Year  Guarantee 

COVERS    .\I/AU«BL£    FD«    VOUR    SPEC[FIC    nOi.E'  5 

ATARJ-CGMMODORE-TI 

COMPUTER  AUG  /(CCEiSORY   CDUFfiS      [ACn        S995 

APPLE 

WEHAVE  OVER  1,000  MAKES  AMO  MDDEiS 

PLEASE    STATE    MAKE    AND    HOOE.    WHEN   OBDERINC 

ALSO    AMILASLE:    ANTI-STATIC    HATE    !a'V24"    ill,    55 
lOEAl    FOR    hOME    OP    OFFJff    L'5E 


Call  OF  Wriit 
ior  Bpocmiri! 


COM-COV 


VBT 


217   787-9.172 

ILLINOIS  uT^^I^       il3  KXKTER  cot  RT 

ADD  5!   SALES  T*«  SPRI\(,MKI.r>.IL(,27IM 

ALL   ORDERS  A&D   S2   FQB   SWIPPIM  i'ja  wAkOLIN: 
PLEASE   fiLLOM  4-6  UEEXS   F8ft   DELIVEftV 
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FREE   FREE   FREE 
for  C64/V20* 

One  ^  pietf  set  ui  the  linest  quality,  hand 
made  computer  covers  for  the  C64/V20', 
printer  and  disk  drive.  A  $23.95 
value!. -.When  you  enter  your  one  year 
subscription  to  SOFTYPE...Why  spend  hours 
ot  typing?. ..Avoid  irustraliunsi!!  Ll'I  SOFTYPE 
do  it  lor  you!. ..for  as  Itltle  as  $3.99,  uo  will 
send  you  one  menu  driven  tape  or  diskette* " 
a  month  with  all  the  public  domain  programs 
tor  your  C64/V20"  printed  in  the  monthly 
issues  ot  this  magazine,  CJrder 
no\v!!!...betore  the  Christmas  rush. 

~     Cfi-1"   t  year  subscription  lo  SOFTYPE 
-     V20"  (with  FREE  covers!  S47.88 

~     Set  ol  three  covers,,,  OnlvS2J.95 

tcy.is  .irffj  fr,.  >,ih,v  |,iyi 

Z     One  month  Ot  SOFTYPE...  S:j.99 

■  'Acki  sl.~5  trif  (Ii^k  LtTsion  i;ft  is^u*- 

Send  check  or  money  order  to: 
SOFTYPE 

18Q7  Cohble  Creek 
Houston,  Texas  77073 

•TRADEMARK  OF  Ct)M.M(JLX)Kt  BL;SI^>tSS  M-UMISES 
VOL  PAV  OSJLV  FOR  IH[  SlRVK.l  AND  TAPE 
FUE  PROGRAMS  ARE  FREE 


KINDER  KONCEPTS 

30  PROGRAMS  FOR  KINDERGARTEN  CHILDREIf 

READING  READINESS.  MATH  CONCEPTS 

PERCEPTION.  COLORS  SHAPES.  ETC 

Disks  S39.50  lor  5  programs* 

All  30  on  1  disk  with  Backup  -  iWSM 


For  COMMODORE  PET-    and  64,™ 
and  APPLE  II -H 


We  also  carry   ■Master  Grades',  "Mullipte  Ctioice", 

"Football  Scoyf  and  other  uselul  pfcgrams  for 

leachers 

Please  add  S2.00  per  disk  lor  sliipping  &  titndling. 


MAKE  YOUR  OWN  CARTRIDGES! 

•  Complete  Sj'stein  • 
Pragrims  8K 
Cartridge  to 
-AUTO-RUN"  (opll 
at  Power-up  — 
YOUR  BASIC  or 
Machine-Code  Pnsn, 

•  Protot-.pe  GAMES 

•  EDUCATIONAL  use - 
NO  Laid  May 

•OS-3  721  plugs  into  VIC-20 

•  E.xparr-iion  socket  on  boarxl 

•  Carts.  Erasable  &  BLK  Locatable 


OS-3723  ZIP  socket  module 
Allow.<;  programming  2764.  2732A.  27.12 
2716,  2364.  2,i:i2, 2516  EPROMS 

OS-37A  System  (Pgmr. . «  K  Carl) 

0S-.17B  .System  (Pgnir.,  ZIP  mud) 
(Software  Tipe  incl.  Disk  add  S2| 

OS-3722  Blank  8K  Carts. 

Blank  2764  EPRO.MS 

OTTO  SYSTEMS 
8135  ENGINEER  ROAD 

SAN  DIEGO,  CA  92111 
(619)  569-5665 

.Add  S4  Shipg  H  HndiK.  -  CA  ns.  6W  tas 


S24.Sn 


$88..™ 
$88.50 


S24.50 
$11.50 


MIDWEST  SOFTWARE 

BOX  214  •  FARMINGTON,  Ml  48024 
Phone:  313-477-0897  (4:00  pm   .   11:00  pm) 


Please  send  for  complete  descriptions  and  ordering 

mlormanon 

■  Sample  disk  with  2  programs  lor  SlO  00 

•    and  TM  iraoemafhs  o!  Commnloie  Busmess  Macmnes 

anil  ADpie  Compuler  Ccmoany 


GEI-IIN]  :r  EFSOI^  FR::iTER 
CGNFISUSfiTICN  PRQSRfif 

!f  ,'O-d  have  troable 
understanding  ail  thosi  jci:tw£,'-e  ccces 
tStat  cenfigure  j'Cjr  printer,  t^o'  this 
!S  the  prog.'-afi  far  /du.  JLEt  turri  en 
)-3ur  pr:^,tsr,  boot  fre  prjgriE  did 
:h:oEE  froe  the  seni.  .lare  than  i  i::?:; 
print  types.  We  aiso  incldde  3  previex 
of  ctiier  -functijn^.  i'/ailiiile  on  the 
SsTini.'Epson  printers.  PrDgran  is 
ivjiiabie  for  .apple  H*,  fttaris  ar,d 
V:c-23.  Sp.ecifY  cDjputer  type,  ,Tie,i!cry 
s::e  ind  either  disk  or  tape  when 
orderir.3.  Send  :hecP  or  .icne/  a-'der 
f:r  2I.9Ef£isi.)14.?i(tape)  :q;  D2«N 
m  OUT  SG^WhRE,  3 
Hc!tEvi:!E,?<Y  Il/i; 


m  OUT  SG^WhRE,  33  Stcrsi  Zrue. 


WHERE 
DOES 
IT 
GO  ? 

This  package  makes  short  work  of 
tracking  35  expenses  and  7  incomes 
{which  may  be  changed,  deleted  or 
added  too).  Suggesrions  and  instructions 
for  its  use  are  provided. 

Daily  or  weekly  records  may  be  stored 
and  then  entered  on  supplied  monthly 
forms. 

Household  financial  record  keeping 
becomes  easy  and  pleasant.  (The  results 
may  surprise  you.) 

T I  99/4 A  Cassette  Package SI  2.95 

(Fla.  Add  5%  Tax) +S    1 .50  Postage 

Free  Additional  Information 


I.S.A. 
9808  N.  W.  67th  Court 
Ttmarac,  Florida  33321 


I  n  IJKICE  INTRODUCTION 

I  Commodore  Sf  Tl 


Spreadsheet 

19.95 

Data  Base 

19.95 

Word  Processor 

9.95 

Payroll 

9.95 

Nailing  List 

9,95 

Inventory 

9.95 

Games  Pak' 

19.95 

Education  Pak* 

19.95 

Business  Pak* 

19.95 

('Valu-paks  have  5 

programs) 

ALORUM 

,  41  Clyde  Ave. 
Mtn.  View,  CA  94043 
(415)  968-8500 


/^ 


SOfTWARE    SUPBn    SAVINGS 


f\ 


"    AE 

"     BANKSTREET  WR. 

11     CASTLE  WOLFEN. 

2      DONKEY  KONG 

HM  FROGG£R 

iw    HOME  ACCOUHTANT  47.99 

»    Mm>MAN  27.99 

■  1  KNIGHTS  DESERT  27.99 
LEGACY  LLYLGAMYN  28.99 
QUICK  BROWN  FOX 45.99 


23.99 
49.99 
19.99 
36.99 
22.99 


"     RANA   DISK  DRIVES         CALL 


34.95 
69.95 
29.95 
49.95 
34.95 
74.99 
39.95 
39.95 
39.95 
65.00 


SARGON  II 
"«  SNOOPER  TROOPS 
"»  SUSPENDED 
""  TEMPLE  APSHAI 
"     ULTIMA   II 
.J     ZAXXON 
■  ""ZOflK  1,2,3  EA. 
DISKS  ELEPHANT 

'3  SSSD  Sf  7.99/ JO 
"  SSDD  $21.99/ W 
3      DSDD       326.99/ W 


23.99 
31.99 
33.99 
27.99 

39.99 


34.95 
44.95 
49.95 
39.95 
59.95 


26.99   39.95 
26.99   39.95 
MAXELL 

S28.99/  10 
S40.99/10 


P.O.  BOX  569 

Th«  Com^uUf  CMpfe//  qePT.  8 

THOV,  Ml  48099 

UASTZR  C*J1D/VI3A.C«C»CS'IM«V  OflOEflS/CCC  ACCEPTED 
BlilP^HG:   UStZ  CAHJUUU   FOREKU  SIO  MCH   KXi   AV  TJU 


^ET  THE  MOST  FROM! 
j     YOUR  V1C-20/C64     g 


VIC-20 

QUALITY 

EXPANSION 

BOARD 

ONLY 
S3 1.95 


•  UPT0  3  GAMES  OR  UTILITY  CARTRIDGES. 

•  3  LARGE  SLIDE  SWITCHES.  NOT  SMALL 
DIP  SWITCHES 

•  RESET  BUTTON.  NO  NEED  TO  TURN 
COMPUTER  OFF  BETWEEN  GAMES. 

•  FUSED  TO  PROTECT  VIC, 

•  HIGH  QUALITY  GOLD  PLATED  EDGE  CON- 
NECTOR AND  NICKEL  PLATED  BOARD. 

•  SOLID  RUBBER  FEET  SUPPORTS  BOARD 
WHEN  INSERTING  CARTRIDGES. 

•  INSTRUCTIONS  AND  HINTS. 


TO  ORDER 
SEND  CHECK 
lALLOW  3 
WEEKSI 
OR  MONEY 
ORDEF5. 


MESI 
RO.  BOX 
51544 

NEW  OR- 
LEANS. LA 
70151 


ADO  $2.00 
POSTAGE  a 
HANDLING 
LA.  RESI- 
DENTS ADD 
3%  TAX 


VIC-20  IS  A  TRADEMARK  OF  CBM-  INC 


^«5»       POSTAGE  PAID        Vf 

^^  SOFTWARE  '-■?0 

100%  MACHINE  CODE 

MONEY  BACK  GUARANTEE 

Q.  WARRIOR  •13.95U  s 

On  a  routine  patrol  of  your  dcfenct?s,  you  discover  that 
the  Zoronian  mutanls  are  breaking  through  in  huge 
numbers,  you  engiaye  the-m  in  baiile,  almost  at  once  s!ou 
realise  \io\jt  laset  snares,  your  main  defiances  £ire 
mallunctiomng,  ihey  are  designed  to  detect  and  destroy 
muiam  life  forms.  Instead  ihcy  are  hunting  you  Thi? 
mmants  are  bringing  up  their  Z-rammer  laser  bolts  You 
summon  help,  none  comes  You  are  alone,  but  you  art;  a 
Q  WARRIOR.  Joystick  required,  fjre  in  any  direction 

PLAGUE  *13.95us 

Use  your  sup«T  enifi^y  boh  lo  destroy  the  advancing 
Plague-Pests,  but  watch  out  fo:  ihwir  guandi&ns  patrolling 
the  screen  If  anything  touches  you  =  Plague  Pests,  their 
stun  bombs,  eggs  oz  patrolling  guardians,  you  iwill  crash 
to  the  bottom  of  the  playmy  area  while  (he  pests  will 
advance. 

CHRISTMAS  SPECIAL  -  BUY  ANY  TWO  GAMES 
AND  GET  ONE  FREE!  Send  cheque  or  mont'y  order  to: 

CHADWELL'S  SOFTWARE 

DEPTTS,  230. 4144A   97  Street 
Edmoiilon.  Albena.  Canada  T6E  5Y6 

US.  ORDERS  WELCOME 
DEALER  INQUIRIES  WELCOME 


CASSZTTE  INTZBf ACE 
'  W^  A>Y  STANDARD  CASSETTE: 

ON  ■^^TS  TO  the;  CAssrrn: 

^-iVH!  OlS ->c  CASSCTTt  woroa 
r  rn ;-  ^   battehies 
r  •Micyj'  'iiTcn^-EP  to 
Qni>7 

\  "a^*^  POSTPAID  ADD  S250 
^H"^^  r    ursDE  us 


THE  UODEU  INTXEfACE 

hL  :3l;.  .  .  ■-  :" 

Els  ■».   (WTEHES-SGLDErf 


(charge  or  cod  orders  CALL! 


1-800-227-3800 

-ASK  FOR  OPERATOR  325 


BYTESIZE 

UICHO  TCCmiOLOar   12061  236-aiTE 


PO  BOX  123OT  OEPTOM 
SEATTLE.  WA  98111 


CJ!iA.&^ymtiroRDZMj^^QiaiULTiou  i 


VIC  &  64 

beaCOPYc.a.o. 

(cassette  aided  duplicator)  now  you  can 
make  backup  copies  of  all  the  costly, 
non-saveable  cassette  programs  you 

BOUGHT, 

OUR  BACKUP  VI  .0  UTILITY  PROGRAM  WILL 
LET  YOU  MAKE  DUPLICATES  THAT  RUN. 

BACKUP  V1 .0  WILL  WORK  WITH  A  STANDARD 
5K  UNEXPANDED  VIC.  MEMORY  EXPANStON  IS 
REQUIRED  TO  COPY  PROGRAMS  LONGER  THAN 
3K  BYTES 

S24.g5 

PLUS  S2.00  SHIPPING  &  HANDLING 

SOFTWARE  PLUS 

6201  SUITE  C 

GFIEENBACK  LANE 

CITRUS  HEIGHTS,  CA  9561 0 

VISA.  MASTERCARD.  AND  MONEY  ORDERS 

CA  RESIDENTS  ADD  6%  SALES  TAX, 

VIC  IS  A  TRADEMARK  OF  COMMODORE 

916-726-8793 


'PUBLIC  BOMAOT™ 
—   SOFTWARE  — 

Supporting  all  COMMODORE  computers 

Written  by  users,  for  users 

*  GAMES  *   UTILITIES  *  EDUCATIDNAL  • 

Over  1 300  programs  and  growing. 

VIC  20™ 

ViC  coHeclior  ^1  -  70+  programs-  Tape/Disk-  Si 0.00 
VIC  coileciion  p:  2  -  70+  programs  -  Tape/Disk  -  %  1 0.00 
ViC  collection  #3  -  70+  programs  -  Tape/Disk  -  SlO.OO 
VIC  colleciior  ttA  -  50+  programs  -  TJp&>DiSk  -  SlO.OO 

C090IODORE  64~ 

COMMODORE  64  «1  -25-i-prQgrdm3-Tape/DisK-Sl0.O0 
COMMODORE  64  ^2  -25+prt>grarnS-Tapfi/Disk-S1i0.0O 
COMMODOHE  64  * 3  -  25+ programs- Tape/Disk- SlO.OO 

PET*  /  CBM® 

PFr./CBM  -  5  Utiltv  -  Tapes/Disks  -  S 1 0,00  each 

PET;CBM  -  1 1  Game  -  Tapes/Disks  -  11 0.00  eacti 

PET/CBM  --  6  Educational  -  Tapes/Oisks  -  $10.00  each 

DUk'SET:  Reset  Switch 

Works  on  Vic  20  or  Commodore  64  -  S5.00 

All  prices  include  shipping  and  handlirvg. 

We  are  YOUR  world  wide  user  saftwarsconnecljon. 

An  altemetivB  to  the  high  cost  ol  software. 

CHECK.  MONEY  ORDERS, 
VISA  and  MASTERCARD  accsplsd. 

For  A  Free  Flyer  Write: 

Public  Domain,  Inc. 

5025  S.  Rangeline  Rd.,  W.  Milton,  OH  45383 
Phone  (513)  698-5638 


The  CJnKeyboard 

a  friendly  alternative 


SM-TEXT+CUDA 

A  powerful  combination 

of 

superb  text  processing 

and  a 

name  and  address 

data  base 

maths  and  multi-search 

facilities  make  this 

pair  into  virtually  a 

complete  commercial 

administration  system. 

for  cbm  8052  or  8096 


sy 


.^^ 


'£  i 


%. 


^^ 


•  USE  IT  AS  A  GAME  CONTROLLER 
•USE  IT  AS  A  -MOUSE" 


rt(t£  PROti^^M> 


'THE  HELPING  HAND' 

DRAWING  BOARD 
OrGITlZER 


I. 


Epson®  IVIX70/IVIX80 

&IVIX1Q0 
Replacenient  Ribbons 


Manufaclured  by  Aspen  Ribbons.  Inc. 
Buy  direct  from  nnanufacturer  &  save, 
Standard  ink  color  is  black.  Red,  green, 
blue,  brown,  &  purple  colors  are 
available  for  S2,00  extra  per  ribbon. 
PRICES 


Epson®  MX70/80  $2.75  to  $6.50  ea. 
Epson®  MX100  $4.75  to  $975  ea. 
Price  depends  on  quantity  ordered. 


CALL  FOR  FREE  CATALOGUE. 

"Aspen  Ribbons.  Inc.  is  not  affiliated  wilh  any 
company  mentioned  in  this  ad. 


Aspen  Ribbons,  Inc.  itoon  ssthst 

Boulder.  CO  30301-2796     (303)444-4054 

Telex'  46-0055     End  User:, 800-525-0646 

Wholesale:  800-525-9965 


October  1933    COMPUTE!    3^1 


\/Hl<X^'U£.<Ur6ly 


STOCK  HELPER " 

Commodore  64 

Stock  HELPER  is  a  tool  to  maintain  a  his- 
tory of  stock  prices  and  market  indicators 
on  diskette,  to  display  ctiarts.  and  to  cal- 
culate moving  averages.  Stock  HELPER 
was  designed  and  written  by  a  "weekend 
investor"  for  other  weekend  investors. 
Stock  HELPER  is  available  for  S30.00 
U.S.  or  S37.00  Canadian  plus  shipping. 

(M)agreeable  software,  inc. 

5925  lyagnolia  Lane  •  Plymouth.  MN  55442 

(612)559-1108 

HELPERisa  trademark  of  ( Mlagreeah  le  Sof  Iware,  I  nc 
Commodore  is  a  trademark  ol  Commodore  Electronics  Lid 


BEAT  THE  HIGH  COST 
OF  SOFTWARE 


Before  you  buy  anv  more  software,  you 
owe  II  to  yourself  to  join  S^FTRADESS  " 
the  fastest  growing  worldwide  trading 
network.  Members  swap  software  and 
info  for  i\\  computers. 
Annual  membership  includes: 

•  Quadefly  trading  directories 

•  Monthly  and  flash  updates 

•  Personalized  trader  [isiings 

•  Trader  support  systems 

•  Plus  much  more 

Imagine  having  access  to  hundreds,  even 
thousands  of  programs,  each  costing  ni.- 
mare  than  the  price  of  a  starnp  or  phone 
call,  loin  now  to  beat  the  price  increase 
and  find  out  about  the  new  member  $$ 
offer.  S49-95  U.S.  S64.95  FOREIGN.  SASE 
for  info.  Indicate  computer  model 
S^FTRADERS"  INTERNATrONAL 

1610  Shomaker  Dr. 
Murphysboro.  IL    62966 


sn-Los 

Loadable  Operating 
Systems  from  SM  are 
designed  to: 
maximise  the  usefulness 
of  expanded  memories 
provide  the  optimum 
environment  for  memory- 
greedy  programs, 
provide  an  extended 
vocabulary  of  BASIC 

commands, 
for  cbm  8032  or  8096 


NEW!  t 


Songs^nd  Visuals 

Full  L'hurd  Capabilily 

tisifllenl  Sonii  Rcpr<iifuciiun 

Speclanilar  full  Culor  Graphics 

Siknl  Slghl.  Hr  Tlirw  King!.  Jo)  To  Thr  World.  II 

CAjnf  Upon  \  Hidnighl  Ckir.  Ttit  FIrtI  Sorl.  Jinglr 

feUi.  HirL  Thf  Hrrald  AngrJi  Sing.  0'  Unit  To«n  of 

haichFin.  A»i)  In  A  Mingrr.  0  Conw  All  Vr 

\  Fiilhtul.  God  Rpit  Yp  MetT)  OnU^nifn.  Wf  Wijh  Vou 

KA  MfiT>  ChriilmM.  Dtck  Thf  Hilli.  U  Chriilmij  Tm. 

For  (/••  tVftfi  '      ^ 

ri  99/4A  rCas*«(t«s  onfyj 

fComodora  64  {C9m*9tto»  A  Dltkm) 

CASSiTTE:  519.95:  0\tl:  S24.9& 

nn  a-  lie  inbn  I  kiiMti 

PinMll  Ofctl.  im  2  ■■•tt  llln  tir  ItHtn 

■iiW^m  tnHnti  iM  um  Ui 

Milir  iHflrlii  Wtktmt 
iP.OJai  gZD4  Dtpt.  Cia.  Malta 
«  BUSS,  inw)  Z2I-IZ49 1 
NATIOIIAl  PRDERAIIING  AND  SOFTWARE 

342    COMPUIE    October1983 


16K  RAM  PACKS  ONLY 

VIC 20       $42.95  U.S.         ZX81 

32K  RAM  PACKS  $60.00  U.S. 

Please  state-  your  machine  name  on  your 
order.  6  month  warranty.  Add  S2.95 
p-Fh. 

EXPANDABLE  RAM  PACKS  ■  VIC  ONLY 
KiKRamPack  '69.95  US.  +  P&H 

3ZK  Ram  Pack  -89.95  U  S    +3  50  P&H 

ITl^.'  lollouiing  can  tw  buill  into  your  Ram  Pack  now  or  5atcr 

v.^  will  insldCI 

IC  Chips  Toolkit  '19.95U.S.  +  3OC  P&H 

IC  Chips  Machine  Code  lHonitor  "19.95  US    +  50c  P&H 

PLUS    available  soon      Inlitl  8088  Co-processor   »  40 

Colomn  Rom      Installs  in  yojr  expandable  Ram  Pack 

only 

3  Sol  MoiJvr  Board  +  8K  Ram  S  77  95  US-  +  $295P&H. 
comes  wilh  battery  connector,  mode  switchable  to  Vic  + 
3K.  Vtc  -*-  8K.  Vic  +  I6K.  isolation  s\AJitch.  for  super 
expander  cartridge,  Gmontti  warranty,  runs  any 
commercial  software  at  the  flick  of  a  switch 
Send  cheque  or  money  order  lo 

CHADWELL'S  SOFTWARE 

[X-pt  CM.  230. '1144A    97  Street 
Edmonlon,  Alberta.  Canada  T6E  5Y6 

US  ORDERS  WELCOME 
DEALER  INQUIRIES  WELCOME 


^^    ./^PERSONAL  PERIPHERAL 
pljP^  PRODUCTS  presents: 

^^SPEAKEASY 


vic-20 

SPEECH 


COM-64 
SPEECH 


Cartrtdje.  Instructions  i  Dictionary  S69  00 

FALL  SPECIAL:  Cassette  Editor  (,  Extension 

Speaker  Res.  S19.95.  with  SPEAKEASY       FREE 
Commodore  64  Adaoter  Boa/d, . ,  J12  95 

BARE  BONES  BOARDS 

Assembled    Krt 

8KRam/VIC -20  Block  Switched J29  95    J24  95 

16K  Ram  Expander  (or  VIC-20 M9  95    $44  95 

3  Slot  Switched  i  Fused  8oard/VIC-20 .    J24.95    J19  95 
NEW:  4  Slot  Switched  &  Fused 

Board/COM-64 $44,95    534  95 

COMING  SOON:  Mighty  Modem 

VIC-20/C()M-64 $79  95 

ADD  J2  00  toUi  Omw  Handlinj/IIIRtisideflts  Aild  6%  Sales  Tix 

PERSONAL  PERIPHERAL  PRODUCTS 

w^m  P-0  BOX  3423  #— ,, 

I  "^  I  FOX  VALLEY  MALL  b^-j 

AURORA.  IL  60505  •  (312)  961 2347 

i;OM-64  t  VIC-20  IS  A  TRADEMARK  Of  COMMODORE 


SOFTWARE 
PACKAGE 


Reg.  M  59 

Features: 

•  Accounting  Ledger 

•  Inventory  Control 

•  Letter  Writer 

•  Mail-Out 

For  TI-99  VJC-20 
ATARI  COM-64 

Toll  Free  1-800-221-7171 

In  Ga.  1-404-925-4686 

BfZWARE.  INC.  5014  Hwy.  29  Lilburn.  Ga.  30247 


VfC-20  USERS 

CARTRIDGE  BACK-UP 

•  PROTECT  YOUR  INVESTMENT 

•  BACK-UP  YOUR  CARTRIDGES  ONTO 
CASSETTE  OR  DISK 

•  SAVES  WEAR  ON  YOUR  CARTRIDGES  AND 
THE  MEMORY  PORT 

•  BACKED-UP  CARTRIDGES  RUN  LIKE 
ORIGINALS  (8K  RAI^  REQUIRED) 

•  SYSTEM  ISANEASYTOUSE  PROGRAM  AI^D 
A  HIGH  QUALITY  CARTRIDGE  INTERFACE 
BOARD 

$49.95  POSTPAID 
CASSETTE  BACK-UP 

•  PROTECT  YOUR  INVESTMENT 

•  BACK-UPANYCASSETTETAPEONTOTAPE 
OR  DISK 

•  EASY  TO  USE  PROGRAM 

•  REQUIRES  NO  USER  MEMORY 

S19.95  POST  PAID 
VISA/MASTERCARD  ORDERS; 

PHONE  (215)  269-4803 
SEND  CHECK  OR  MONEY  ORDER  TO' 

E-M  TECHNOLOGIES 

P.O.  BOX  185 

DOWNINGTOWN,  PA.  1833S 
PA  RESIDENTS  ADD  6% 
6  MONTH  REPLACEMENT  GUARANTEE 


SOFTWARE 
COMMODORE  64 


7ftsSraft.PolyptiotiicMusi[;Edilor&genBrator, 
Enter  up  tc)  93  measures  ol  3  pan  harmony  on 
easy  to  use  graphic  display.  Disk:  $22.95  lor  64 
S17.95  for  VIC.  Tape:  S!9.95  lor  6<,  $1495  for 
VIC,  Add  $1.50  (or  Postage  and  Handling. 
Crieck  or  visa,  Master  Car<J  accepted. 

We  have  a  large  seleclion  ol  software  for  Itie 
M— Word  Processors.  Data  Base,  Mailing  List, 
Accounting  Package.  Spread  Stiees.  Education. 
al  Applications,  Home  and  Personal  Record 
Keeping,  Proflrammers  Aids,  Games. 


ASK  FOR  FREE  CATALOG 


PROFESSIONAL  MICRO  SERVICE 

100  W.  22nd  St.,  P.O. B.  7268 

Baltimore,  Md.  21218 

301-366-0010 
Dealer  inquiries  invited- 

Commodore  64  is  a  registere<]  IrademarH  of 
Cornmodore  Business  Machines. 


I-CHING  SOFTWARE 

FOR  THE 

COMMODORE  64 

•  Undcrsund  the  Present 

•  Probe  the  Future 

•  A  New  Contemporary  Inieqiretation 
■  Based  on  the  ancient  Chinese  "Book 

of  Changes" 

•  Includes  an  analysis  of  changing  lines 


disk  12^5 

NY.  State  Resid.  ADD  SALES  TAX 
SEND  CHECK  OR  MO.  TO: 


CYGNUS 

Expert  Systems  Inc. 


P.O.  BOX  38  J 

WATER  MILL,  N.Y.  11976 


SM-KIT-SET  B,  F  and  M 

The  5M-KIT  family 

represents  the  cream  of 

programmers'  productivity 

aids. 

SM-KIT  B  de-bugs,  enhances 

and  restructures  BASIC 

programs. 

SM-I^IT  M  does  the  same  for 

assembler  programs. 

SM-KIT  F  is  a  disK  doctor, 

specialising  in  floppy  disk 

ailments.  Recovery  from 

most  disk  problems  assured. 

for  cbm  8032  or  8096 


STATISnCAL  SYSTEM 
Far  VIC  20  &  64 

NUMBER  CRUNCHER.  A  menu 
driven,  interactive  data  and  stat- 
istical  analysis  system. 

Program   includes  data  entry,   edit- 
ting,   transforrmtion,   and   storage. 
Missing  values  are  recognized. 

Statistical   functions  include  means, 
std.   deviations,   t-tests,   ANOVA, 
correlation,   multiple   regression, 
stepwise   regression,  scatter  plots, 
and  contingency   table  analysis. 

Send   $50    to 

Dr.   Jerry  L.   Hintze 
865   East  400   North 
Kaysville.  Utah  84037 
(801)-546-0445 

Specify  VIC   memory  size,   tape  or 
disk.     Money   back   guarantee! 


And  now 
for  your 

64 

Note 
Pro 

Call 
301-3G6-8138 


1^' 


f^owerful  Utility  Software 
lor  creating 


•  MUSIC 

•  SOUMD  EFFECTS 

•  HI-RES  GRAPHICS 


Nole  Pro  I— Starter  sound  ana 
music  eOitof,  Tap9-S24.9S, 
Disk'Ur.95 


Mote  Pro  II— Advancefl  sound 
and  music  editor.  Tape-S46.96, 
Disk.S49.9S 


Notfl  Pro  Bridge— Copyable 
mactiine  language  routine  wtiicn 
can  be  added  to  your  programs 
(D  give  high  speed  SID  control 
and  play  o(  Note  Pro  files 
Tape-S24.95.  Dis1(«7.95 


Plol-a-lot— Hi-res  drawing  board. 

Use  hi-res  screens  in  your  own 

programs. 

Tapo-S14.95,  Disk-$17.95 


*  Order  Today         *  Dealer  Inquiries  Welcomed 


Electionic 

Lib 

Industries 


P.O.  box  7167 
too  W.  22nd  Street 
Ballo..  Md.  212te 


Free 
Brochure! 


HEXADECIMAL  DESK  CLOCK 


DtD  YOU  BUY  YOUR  ATARI* 

TO  FILE  AND  INDEX: 

ADDRESS  BOOK    COttECTlONS 

HOUSEHOtO  INVENTORIES    RtSEARCH. 

CLUB  MEIVIBERSHIPS' 


NOW  you  can  do  all  this  with 

your  CASSETTE  recorder. 

Introducing 

^  LISTIT'^ 

PovMiful  ind  Vtratili 

Minu  Drtviii/1  BK/Ston/Formt 

Print  Tut/Eim/Diliti/iUd/Couiit 

Crtm-Hltarinct/Prlitt  LjMi  imJ  Utttl 

A  REAL  DATABASE  FDR  ONLY 


:jZ4.95; 

Send  check  or  MO.  plus  SI  50  shipping 

lomeSpun 


di 


9  Peter's  Path 
E.  Seta  uket,  N.Y.  11733 

N.Y.  Residents  add  applicatile  sales  tax 
Dealer  Inquiries  accepted. 


VIC-20 
COMMODORE  64 


USERS  GROUP  MEMBERSHIPS 


Wltti  sortwara  purchase,  Sond  toi  your  FREE  [US- 
COUNT  solfwQre  cotalogo  lodovl 
Group  t>enettts  Include: 

•  Newsletter  Itull  ot  pfogtanis,  reviaws  h  ideas) 

•  Access  to  extensive  club  llbrarv 

•  auesHons  tiot4ine 

•  Free  ods  lor  memtjeis 

•  Contests 

■  Discounts 

•  Software  and  hordware  locator  servtco 

■  Momtjers  only  repoii  service 

•  AND  MUCH  MUCH  ll^DREIII 


MEMBERSHIPS  ALSO  AVAILABLE 
WtTHOUT  SOFTWARE  PURCHASE 


Write  or  call  today  for  FREE  Cataloge 

803/797-1533 

LORDS  OF  BASIC 

P,0.  Box  459,  Dep!.  101 

Lodson,  SC  29456 

Distributor  &  Dealer  InqtJiries  Invited 

VIC-20  •  Commodore  M  ore  Reg  TM  ot  CBM 


Solid  mahogany  timepiece  represents  the 
time  in  base  sixteen.  Features  Include: 
handrubbed  linish,  gold  tone  characters 
and  hands,  and  a  quartz  movement 
accurate  to  within  10  seconds  per  month. 
Clock  measures  4V2  in,  square,  can 
be  hung  (bracket  Included),  and  runs  for 
over  1  year  on  a  standard  AA  battery. 
An  atlrai;trve  addition  to  the  work  area  of 
any  computer  professional  or  hobbyist. 
0nlyS18.95plus$1.5ashipping&  handling. 

PA  residents  add  6%  sales  lai. 
Please  allow  3-5  weeks  tor  delivery. 
Send  check  or  money  order  to: 

CXGXTIME 

P.O.  Box  403,  Ambler,  PA  19002 


DISK  DUPLICATOR 
FOR  COMMODORE 
SINGLE  DISK  DRIVES 

(1540,  1541  and  2031  used  with  a 
VIC-20,  commodore 64,  CBM  4000  or 
CBfi^  8000  computer) 

DISK  DUPLICATOR  provides  you  a  last 
and  easy  way  to  make  back-up  copies  of 
your  precious,  irreplaceable  diskettes.  En- 
joy ttie  convenience  of  a  dual  disk  drive 
witfiout  the  expense.  DISK  DLIPLICATOR  is 
100%  ti^ACHINE  LANGUAGE,  100%  FAST, 
and  most  importantly,  1 00%  AFFORDABLE 

Don't  let  an  accident  or  mistake  catch 
you  without  back-up  copies  of  all  your 
diskettes.  ORDER  "DISK  DUPLICATOR" 
TODAY  at  tfie  special  introductory  price  of 
only  SI  4.95  postage  paid  (check  or  money 
order  only  please). 

H&H  ENTERPRISES  DEPT.  123C 

5056  NORTH  41  st  STREET 
fv^lLWAUKEE,  WISCONSIN  53209 


VIC-20/C-64 
TERMINAL  SOFTWARE 

SAVE  DATA  ON  CASSETTE 

OUTPUT  TO  PRINTER 

UPIOAD/OOWNIOAD  PROGRAMS 

Store  your  data  an  lape,  redd  il  bock,  downlood.  or  mak 
a  printed  copy  o(f  line.  Sa«e  On  line  lime  Require^  8K  c 
mo.f  EXP  on  VIC 


$24 


95  ON  CASSETTE  |01SK  SOtiN) 
SPECIFY  VIC  or  C-64 


Alio   Avoilobte   -   Moth   lotof   (msre   than  mere  drill)  add 
vubrrQct  ■  mult;    ■  div    -  4.95  CO.  gr  alt  4  -   13. 95 

Coming  Soon!  Vic  Chriitmot  [Graphics  &  Sound] 


Have    VoLj    Checked    The 

Price    of    a    2764    Eprom 

Recently? 

Why      Buy      An      Eprom 

Programmer     That     Can 

Only    PrpgrOm    2K    Or    4K 

Eprorri'i? 

Check  Our  Features! 

ONLY  S89.95 

EPROM  PROGRAMMER 
FOR  VIC  &  64 


Prngtami  J7SB,  2f\6.  ??32, 
373?A,  353Z.  276*  gnd  37123 
Ep.bm. 

FuUv  buMerffd  wii^  built  in  powei 
ivpp'jiet  DokJ^'v  regulqlion 
d-tiigri  oi  VPP  ujpply  prcventi 
ipiliDi  Ihal  ton  dtiftay  Ep'omi 

UhHiici  CJSER  PORT,  leasing 
«iipani.Di  port  hte 

j-our  ehoitc  irduded  nfith  ordei. 
oth^.sop'tonal  ^iSSOO) 
Chrnkv      vtaivrv,      TTEnn^fcri      ROM 
clala  Id  FiAM    *ci'iii<<i. 


ELECTROSHARP   TECHNOLOGIES 

1981  SANDAtWOOD  DR.,  SANTA  MARIA,  CA   93455 
Check,  Money  Order,  sr  C.O.O.   B05-922-4095 
805-734-0288 
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Introducing  the  most  logical  place  to  store 
Elephant  Memory  Systems®  lor  lesser  brands 
of  disks);  The  Trunk. 

With  its  alphabetized  library  index,  you  can 
file  or  retrieve  up  to  60  dislcs,  instantly. 

The  Trunk  is  made  of  durable  molded 
plastic  with  a  hinged,  one-piece  lid,  to  keep 
disks  safe  from  dust,  dirt,  and  other  detriments 
which  disks  despise. 


And.  it's  portable.  Because  the  lid  doubles 
as  a  carrying  handle  so  your  Elephant  Memory 
Systems®  disl<s  can  go  anywhere  you  do. 

There's  a  model  for  5V4"  and  8"  floppies,  as 
well  as  a  cassette -and-game  file  and  a  special 
Atari®  version. 

So  if  you're  looldng  for  the  best  disk  storage 
system  on  the  market . . , 

The  Trunk  is  an  open-and-shut  case. 


THE  TRUNK.  ENDORSED  DV  ELEPHANTS. 

Elephant  Memory  Systems   Disks 

A  full  line  of  top-quality  floppies,  in  virtually  every  5-/0"  and  8'  model,  for  compatibility  with  virtually  every  computer  on  the  market. 
Guaranteed  to  meet  or  exceed  every  industry  standard,  certified  100  %  error-free  and  problem  free,  and  to  maintain  its  quality  for  at  least 

12  million  passes  for  over  a  life-time  of  heavy-duty  use  I. 

Marketed  exclusively  by  Leading  Edge  Products.  Inc..  Information  Systems  and  Supplies  Division,  55  Providence  Highway  Norwood, 
Massachusetts  02062.  Call:  tall-free  1-800-343-8413;  or  m  Massachusetts  call  collect  16171 769-8150.  Telex  951-624. 
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APPLE'  lie  64K 


A  personal  computer 
is  supposed  to  be  a 
computer  for  persons. 
Not  just  wealthy 
persons. Or  whiz-kid 
persons.  Or  privileged 
persons. 

But  person  persons 

In  other  words,  all  the  persons  whom 
Apple,  IBM,  and  Radio  Shack  seem  to 
have  forgotten  about  (including,  most 
likely  you). 

But  that's  okay  Because  now  you  can 
get  a  high-powered  home  computer 
without  taking  out  a  second  mortgage 
on  your  home. 

It's  the  Commodore  64,  We're  not 
talking  about  a  low-priced  computer  that 
can  barely  retain  a  phone  number 
We're  talking  about  a  memory  of  64K. 
Which  means  it  can  perform  tasks  most 


$1395*  $99r   $1355 


TRS-80'lin6K 


IBM'PC64K 


other  home  computers  can't.  Including 
some  of  those  that  cost  a  lot  more. 
(Take  another  look  at  the  three  comput- 
ers above.) 

By  itself  the  Commodore  64  is  all 
the  computer  you'll  ever  need.  Yet,  if 
you  do  want  to  expand  its  capabilities 
some  day  you  can  do  so  by  adding  a 
full  complement  of  Commodore  pe- 
ripherals. Such  as  disk  drives.  Modems. 
And  printers. 

You  can  also  play  terrific  games  on 
the  Commodore  64.  Many  of  which 


Appie  !S  s  registered  iraciemaf  k  of  Apple  Comptirer. , .  ,^ 

TRS-eO  IS  a  regislered  irademark  of  Tandy  Corp  I BM  is  a  regislered  trademark  af  I  nlernalional  Business  Machines  Corp 


will  be  far  more 
challenging  than 
those  you  could 
ever  play  on  a 
game  machine  alone. 
And  as  great  as  ail 
this  sounds,  what's 
even  greater-sounding 
is  the  price.  It's  hundreds  of  dollars  less 
than  that  of  our  nearest  competitor 

So  while  other  companies  are  trying 
to  take  advantage  of  the  computer 
revolution,  it  seems  to  us  they're  really 
taking  advantage  of  something  else: 
Their  customers. 

*Mgnufacttjrers'  suggested  list  prrces 
Monitor  included  wim  TRS.eO  III  only  Commocore  Business 
Machines-RO-  Bos  SOOR.  Constiohockeo.  PA  1942P; 
Canada-3370  Pharmacv  Avenue.  Agincourt.  Oni..  Can.  MIW  2K4. 

ft  commodore 

COMPUTERS 


